From 26e1ea9feaed676fe8581f4e7d14aa7c39b5f3eb Mon Sep 17 00:00:00 2001
From: Dmitri Naumov <github@naumov.de>
Date: Sun, 14 Feb 2021 11:33:21 +0100
Subject: [PATCH] [PL/RM] MP, fix a Jacobian entry.
---
ProcessLib/RichardsMechanics/ComputeMicroPorosity.h | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/ProcessLib/RichardsMechanics/ComputeMicroPorosity.h b/ProcessLib/RichardsMechanics/ComputeMicroPorosity.h
index a6429aaf844..79ecf3d9c32 100644
--- a/ProcessLib/RichardsMechanics/ComputeMicroPorosity.h
+++ b/ProcessLib/RichardsMechanics/ComputeMicroPorosity.h
@@ -187,7 +187,7 @@ MicroPorosityStateSpace<DisplacementDim> computeMicroPorosity(
i_sigma_sw, i_p_L_m) = -dsigma_sw_dS_L_m * dS_L_m_dp_cap_m;
jacobian(i_p_L_m, i_phi_m) =
- rho_LR_m * (delta_S_L_m + phi_m * delta_e_sw);
+ rho_LR_m * (delta_S_L_m + S_L_m * delta_e_sw);
jacobian(i_p_L_m, i_e_sw) = -rho_LR_m * S_L_m * (alpha_B - phi_M - phi_m);
--
GitLab