From 5269fa0fb763e7193738b6ae7ba1c62288da8ff9 Mon Sep 17 00:00:00 2001
From: Jaron Kent-Dobias <jaron@kent-dobias.com>
Date: Fri, 1 Oct 2021 20:59:10 +0200
Subject: Lots of work.

---
 schofield.wl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'schofield.wl')

diff --git a/schofield.wl b/schofield.wl
index c60daf5..f32d855 100644
--- a/schofield.wl
+++ b/schofield.wl
@@ -187,7 +187,7 @@ resLow[n_, g_, δ_][m_] := formResiduals[Gls[[;;m+1]], dGdξLowList[n, g][m], δ
 
 resHigh[n_, g_, δ_][m_] := Rest[formResiduals[Ghs[[;;m+1]], dGdξList[n, g][m, 0], δ][[;;;;2]]]
 
-res[F_, g_, δ_][m_] := Join[resLow[F, g, δ][m], resHigh[F, g, δ][m], {ruleθ0[g] / 0.00005, ruleAH[g] / 0.02} /. Around[x_, _] :> x]
+res[F_, g_, δ_][m_] := Join[resLow[F, g, δ][m], resHigh[F, g, δ][m], {ruleθ0[g] / 0.00005(*, ruleAH[g] / 0.02*)} /. Around[x_, _] :> x]
 chiSquared[F_, g_, δ_][m_] := Total[res[F, g, δ][m]^2]
 
 newSol[eqs_, oldSol_, newVars_, δ_:0, γ_:0, opts___] := FindRoot[
-- 
cgit v1.2.3-54-g00ecf