MAM4xx: Fixing bug.

odiazib · odiazib · commit 70133258618f · 2025-11-06T10:27:45.000-07:00
diff --git a/src/mam4xx/gas_chem_mechanism.hpp b/src/mam4xx/gas_chem_mechanism.hpp
@@ -97,7 +97,7 @@ imp_prod_loss(Real prod[clscnt4], Real loss[clscnt4], VectorType &y,
   prod[2] = (rxt[4] + 0.500000 * rxt[5] + rxt[6]) * y[4];
   loss[3] = (het_rates[4] + rxt[4] + rxt[5] + rxt[6]) * y[4];
   prod[3] = zero;
-  for (int i = 4; i < 31; ++i) {
+  for (int i = 4; i < clscnt4; ++i) {
     loss[i] = het_rates[i + 1] * y[i + 1];
     prod[i] = zero;
   }

Original file line number	Diff line number	Diff line change
`@@ -97,7 +97,7 @@ imp_prod_loss(Real prod[clscnt4], Real loss[clscnt4], VectorType &y,`
`97`	`97`	`prod[2] = (rxt[4] + 0.500000 * rxt[5] + rxt[6]) * y[4];`
`98`	`98`	`loss[3] = (het_rates[4] + rxt[4] + rxt[5] + rxt[6]) * y[4];`
`99`	`99`	`prod[3] = zero;`
`100`		`- for (int i = 4; i < 31; ++i) {`
	`100`	`+ for (int i = 4; i < clscnt4; ++i) {`
`101`	`101`	`loss[i] = het_rates[i + 1] * y[i + 1];`
`102`	`102`	`prod[i] = zero;`
`103`	`103`	`}`