diff --git a/src/+equations/Soil_Inertia1.m b/src/+equations/Soil_Inertia1.m index 73e43b96..6e882dec 100644 --- a/src/+equations/Soil_Inertia1.m +++ b/src/+equations/Soil_Inertia1.m @@ -12,10 +12,10 @@ ke = exp(gamma_s * (1 - power(Sr, gamma_s - dels))); % (Kersten number, Eq.(15)) - phis = theta_s0; % (porosity, phis == theta_s = theta_s0) + phis = theta_s0; % (porosity, phis=theta_s=theta_s0) lambda_d = -0.56 * phis + 0.51; % (thermal conductivity for air-dry soil, Eq.(16)) - QC = 0.20; % (quartz content, ≈fss if no measured data) + QC = 0.20; % (quartz content, approximate to fss if no measured QC) lambda_qc = 7.7; % (thermal conductivity of quartz, W/m.K, constant) lambda_s = (lambda_qc^(QC)) * lambda_d^(1 - QC); % (thermal conductivity of the soil solids, Eq.(18))