diff --git a/pvcoefficients/0jets/0jets.txt b/pvcoefficients/0jets/0jets.txt
deleted file mode 100644
index e69de29bb2d1d6434b8b29ae775ad8c2e48c5391..0000000000000000000000000000000000000000
diff --git a/pvcoefficients/0jets/ggH_coeff.m b/pvcoefficients/0jets/ggH_coeff.m
new file mode 100644
index 0000000000000000000000000000000000000000..7ac714d5ed9c4ee2b099c04ca26ca528e28a888e
--- /dev/null
+++ b/pvcoefficients/0jets/ggH_coeff.m
@@ -0,0 +1,5 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+{PVB[0, 0, MH^2, Sqrt[MT^2], Sqrt[MT^2]], PVC[0, 0, 0, 0, MH^2, 0, 
+  Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]], PVC[0, 1, 1, 0, MH^2, 0, Sqrt[MT^2], 
+  Sqrt[MT^2], Sqrt[MT^2]], PVC[1, 0, 0, 0, MH^2, 0, Sqrt[MT^2], Sqrt[MT^2], 
+  Sqrt[MT^2]]}
diff --git a/pvcoefficients/0jets/ggH_coeff_LR.m b/pvcoefficients/0jets/ggH_coeff_LR.m
new file mode 100644
index 0000000000000000000000000000000000000000..d259e633cf50794dfa3175b444b7781a2e3cf1fb
--- /dev/null
+++ b/pvcoefficients/0jets/ggH_coeff_LR.m
@@ -0,0 +1,7 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+{2 + Eps^(-1) + DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2], 
+ Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/(2*MH^2), 
+ 1/(2*MH^2) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+       (2*MT^2)]^2)/(2*MH^4), 3/4 + DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/4 + 
+  (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+   (4*MH^2) + (Eps^(-1) + Log[Mu^2/MT^2])/4}
diff --git a/pvcoefficients/0jets/rep_rule_0jets.m b/pvcoefficients/0jets/rep_rule_0jets.m
new file mode 100644
index 0000000000000000000000000000000000000000..0e543f7eaab6a50ac05a6eb320ff2c4b71fa12ba
--- /dev/null
+++ b/pvcoefficients/0jets/rep_rule_0jets.m
@@ -0,0 +1,11 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+{PVB[0, 0, MH^2, Sqrt[MT^2], Sqrt[MT^2]] -> 
+  2 + Eps^(-1) + DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2], 
+ PVC[0, 0, 0, 0, MH^2, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] -> 
+  Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/(2*MH^2), 
+ PVC[0, 1, 1, 0, MH^2, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] -> 
+  1/(2*MH^2) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+        (2*MT^2)]^2)/(2*MH^4), PVC[1, 0, 0, 0, MH^2, 0, Sqrt[MT^2], 
+   Sqrt[MT^2], Sqrt[MT^2]] -> 3/4 + DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/4 + 
+   (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+    (4*MH^2) + (Eps^(-1) + Log[Mu^2/MT^2])/4}
diff --git a/pvcoefficients/1jets/1jets.txt b/pvcoefficients/1jets/1jets.txt
deleted file mode 100644
index e69de29bb2d1d6434b8b29ae775ad8c2e48c5391..0000000000000000000000000000000000000000
diff --git a/pvcoefficients/1jets/ggHg_coeff.m b/pvcoefficients/1jets/ggHg_coeff.m
new file mode 100644
index 0000000000000000000000000000000000000000..3a29eaadabc562c1b8edcdcc01cf1d6b2e4d8b9b
--- /dev/null
+++ b/pvcoefficients/1jets/ggHg_coeff.m
@@ -0,0 +1,17 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+{PVB[0, 0, S, Sqrt[MT^2], Sqrt[MT^2]], PVB[0, 0, T, Sqrt[MT^2], Sqrt[MT^2]], 
+ PVB[0, 0, U, Sqrt[MT^2], Sqrt[MT^2]], PVC[0, 0, 0, 0, U, MH^2, Sqrt[MT^2], 
+  Sqrt[MT^2], Sqrt[MT^2]], PVC[0, 0, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], 
+  Sqrt[MT^2]], PVC[0, 0, 0, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]], 
+ PVC[0, 0, 1, 0, U, MH^2, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]], 
+ PVC[0, 0, 2, 0, U, MH^2, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]], 
+ PVC[0, 1, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]], 
+ PVC[0, 1, 0, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]], 
+ PVC[0, 1, 1, 0, U, MH^2, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]], 
+ PVC[0, 1, 1, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]], 
+ PVC[0, 1, 1, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]], 
+ PVC[0, 2, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]], 
+ PVC[0, 2, 0, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]], 
+ PVC[1, 0, 0, 0, U, MH^2, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]], 
+ PVC[1, 0, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]], 
+ PVC[1, 0, 0, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]]}
diff --git a/pvcoefficients/1jets/ggHg_coeff_LR.m b/pvcoefficients/1jets/ggHg_coeff_LR.m
new file mode 100644
index 0000000000000000000000000000000000000000..b336f29222ba23da1ff21869239ccc45957f38d3
--- /dev/null
+++ b/pvcoefficients/1jets/ggHg_coeff_LR.m
@@ -0,0 +1,58 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+{2 + Eps^(-1) + DiscB[S, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2], 
+ 2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2], 
+ 2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2], 
+ Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+   (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2/
+   (2*(MH^2 - U)), 
+ Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+   (2*(MH^2 - S)) - Log[(2*MT^2 - S + Sqrt[-((4*MT^2 - S)*S)])/(2*MT^2)]^2/
+   (2*(MH^2 - S)), 
+ Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+   (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2/
+   (2*(MH^2 - T)), DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+  DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U), 
+ -DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+  DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)), 
+ DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S) - 
+  DiscB[S, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S), 
+ DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+  DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T), 
+ -1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+   (2*(MH^2 - U)^2) + (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/
+   (2*(MH^2 - U)^2) - 
+  (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+   (2*(MH^2 - U)^2) + 
+  (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+   (2*(MH^2 - U)^2), -1/(2*(MH^2 - S)) - 
+  (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S)^2) + 
+  (MH^2*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S)^2) - 
+  (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+   (2*(MH^2 - S)^2) + 
+  (MT^2*Log[(2*MT^2 - S + Sqrt[-((4*MT^2 - S)*S)])/(2*MT^2)]^2)/
+   (2*(MH^2 - S)^2), -1/(2*(MH^2 - T)) - 
+  (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+  (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+  (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+   (2*(MH^2 - T)^2) + 
+  (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+   (2*(MH^2 - T)^2), -DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S)) + 
+  DiscB[S, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S)), 
+ -DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+  DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)), 
+ 3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) - 
+  (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) + 
+  (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+   (4*(MH^2 - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+  (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+   (4*(MH^2 - U)), 3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+   (4*(MH^2 - S)) - (S*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - S)) + 
+  (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+   (4*(MH^2 - S)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+  (MT^2*Log[(2*MT^2 - S + Sqrt[-((4*MT^2 - S)*S)])/(2*MT^2)]^2)/
+   (4*(MH^2 - S)), 3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+   (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) + 
+  (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+   (4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+  (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+   (4*(MH^2 - T))}
diff --git a/pvcoefficients/1jets/rep_rule_1jets.m b/pvcoefficients/1jets/rep_rule_1jets.m
new file mode 100644
index 0000000000000000000000000000000000000000..dd96eb975ab89dbe8726cde5c19bb515c60e69d4
--- /dev/null
+++ b/pvcoefficients/1jets/rep_rule_1jets.m
@@ -0,0 +1,76 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+{PVB[0, 0, S, Sqrt[MT^2], Sqrt[MT^2]] -> 
+  2 + Eps^(-1) + DiscB[S, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2], 
+ PVB[0, 0, T, Sqrt[MT^2], Sqrt[MT^2]] -> 
+  2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2], 
+ PVB[0, 0, U, Sqrt[MT^2], Sqrt[MT^2]] -> 
+  2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2], 
+ PVC[0, 0, 0, 0, U, MH^2, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] -> 
+  Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+    (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2/
+    (2*(MH^2 - U)), PVC[0, 0, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], 
+   Sqrt[MT^2]] -> 
+  Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+    (2*(MH^2 - S)) - Log[(2*MT^2 - S + Sqrt[-((4*MT^2 - S)*S)])/(2*MT^2)]^2/
+    (2*(MH^2 - S)), PVC[0, 0, 0, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], 
+   Sqrt[MT^2]] -> 
+  Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+    (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2/
+    (2*(MH^2 - T)), PVC[0, 0, 1, 0, U, MH^2, Sqrt[MT^2], Sqrt[MT^2], 
+   Sqrt[MT^2]] -> DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+   DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U), 
+ PVC[0, 0, 2, 0, U, MH^2, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] -> 
+  -DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+   DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)), 
+ PVC[0, 1, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] -> 
+  DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S) - 
+   DiscB[S, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S), 
+ PVC[0, 1, 0, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] -> 
+  DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+   DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T), 
+ PVC[0, 1, 1, 0, U, MH^2, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] -> 
+  -1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+    (2*(MH^2 - U)^2) + (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/
+    (2*(MH^2 - U)^2) - 
+   (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+    (2*(MH^2 - U)^2) + 
+   (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+    (2*(MH^2 - U)^2), PVC[0, 1, 1, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], 
+   Sqrt[MT^2]] -> -1/(2*(MH^2 - S)) - 
+   (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S)^2) + 
+   (MH^2*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S)^2) - 
+   (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+    (2*(MH^2 - S)^2) + 
+   (MT^2*Log[(2*MT^2 - S + Sqrt[-((4*MT^2 - S)*S)])/(2*MT^2)]^2)/
+    (2*(MH^2 - S)^2), PVC[0, 1, 1, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], 
+   Sqrt[MT^2]] -> -1/(2*(MH^2 - T)) - 
+   (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+   (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+   (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+    (2*(MH^2 - T)^2) + 
+   (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+    (2*(MH^2 - T)^2), PVC[0, 2, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], 
+   Sqrt[MT^2]] -> -DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S)) + 
+   DiscB[S, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S)), 
+ PVC[0, 2, 0, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] -> 
+  -DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+   DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)), 
+ PVC[1, 0, 0, 0, U, MH^2, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] -> 
+  3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) - 
+   (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) + 
+   (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+    (4*(MH^2 - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+   (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+    (4*(MH^2 - U)), PVC[1, 0, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], 
+   Sqrt[MT^2]] -> 3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+    (4*(MH^2 - S)) - (S*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - S)) + 
+   (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+    (4*(MH^2 - S)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+   (MT^2*Log[(2*MT^2 - S + Sqrt[-((4*MT^2 - S)*S)])/(2*MT^2)]^2)/
+    (4*(MH^2 - S)), PVC[1, 0, 0, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], 
+   Sqrt[MT^2]] -> 3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+    (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) + 
+   (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+    (4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+   (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+    (4*(MH^2 - T))}
diff --git a/scripts/X_LoopRefining_0and1jets.nb b/scripts/X_LoopRefining_0and1jets.nb
index 259b0f9cb33300b5c7811417c155b60598a826d0..4a6887fc4eba441e51c890ef52df8e2c8ec17984 100644
--- a/scripts/X_LoopRefining_0and1jets.nb
+++ b/scripts/X_LoopRefining_0and1jets.nb
@@ -10,10 +10,10 @@
 NotebookFileLineBreakTest
 NotebookFileLineBreakTest
 NotebookDataPosition[       158,          7]
-NotebookDataLength[   4727157,     102940]
-NotebookOptionsPosition[   4685092,     102393]
-NotebookOutlinePosition[   4685445,     102409]
-CellTagsIndexPosition[   4685402,     102406]
+NotebookDataLength[   4675351,     101705]
+NotebookOptionsPosition[   4643295,     101275]
+NotebookOutlinePosition[   4643648,     101291]
+CellTagsIndexPosition[   4643605,     101288]
 WindowFrame->Normal*)
 
 (* Beginning of Notebook Content *)
@@ -60,38 +60,7 @@ Cell[BoxData[{
   3.7694161379556293`*^9, 3.769416138416831*^9}, {3.7694161826886263`*^9, 
   3.769416192145475*^9}, {3.769416241287668*^9, 3.769416242139756*^9}, {
   3.769421884524377*^9, 3.769421889789727*^9}},
- CellLabel->"In[1]:=",ExpressionUUID->"aa6e76d2-ec10-49c0-b6e0-1dd4d91b1a18"],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["\<\"\\!\\(\\*TemplateBox[List[\\\"\\\\\\\"Package-X v2.1.1, by \
-Hiren H. Patel\\\\\\\\nFor more information, see the \\\\\\\"\\\", \
-TemplateBox[List[\\\"\\\\\\\"guide\\\\\\\"\\\", \\\"paclet:X/guide/PackageX\\\
-\"], \\\"HyperlinkPaclet\\\"]], \\\"RowDefault\\\"]\\)\"\>"], "Print",
- CellChangeTimes->{
-  3.769416150674975*^9, 3.769416194267857*^9, {3.769416231919112*^9, 
-   3.7694162425484037`*^9}, {3.769420646545596*^9, 3.7694206583152533`*^9}, 
-   3.769425025413766*^9, 3.769945290179131*^9, 3.7699517202962923`*^9, 
-   3.7699519650062838`*^9, 3.770010676869535*^9, {3.770096629754195*^9, 
-   3.7700966433220797`*^9}, 3.772884479178385*^9, 3.7728856240450077`*^9, 
-   3.77288581666254*^9, 3.7728886845903807`*^9, 3.772964841769395*^9, 
-   3.773141652951313*^9, 3.773740327500822*^9, 3.774370903034319*^9, 
-   3.774370966666355*^9, 3.7752319005419207`*^9, 3.7752337152035227`*^9, 
-   3.775489088564049*^9, 3.775489245308648*^9, 3.7754897453429413`*^9, 
-   3.7754904657230673`*^9, 3.775821105497553*^9, {3.775823186450994*^9, 
-   3.775823195188353*^9}, 3.775826214916897*^9, 3.775827858966928*^9, 
-   3.7758411073958178`*^9, 3.775926802671126*^9, 3.775927750035071*^9, 
-   3.775932731190497*^9, 3.7759341459918737`*^9, 3.77593515116796*^9, 
-   3.775936044112349*^9, 3.7760066135848923`*^9, 3.7760084074827023`*^9, 
-   3.776163794536191*^9, 3.776164765694577*^9, 3.776165477011409*^9, 
-   3.7761725151431007`*^9, 3.776439045651415*^9, 3.776442806151732*^9, 
-   3.776704970731813*^9, 3.7767651458445473`*^9, 3.776769048440855*^9, 
-   3.7767696718636227`*^9, 3.776769782959084*^9, 3.77677107630024*^9, 
-   3.7767848686859093`*^9, 3.7770392950048313`*^9, 3.778239119647573*^9, 
-   3.77851079981749*^9, {3.7791271979663363`*^9, 3.779127217668456*^9}},
- CellLabel->
-  "During evaluation of \
-In[1]:=",ExpressionUUID->"0faa258c-cb99-4ffa-abdc-8a866ea3d423"],
+ CellLabel->"In[54]:=",ExpressionUUID->"aa6e76d2-ec10-49c0-b6e0-1dd4d91b1a18"],
 
 Cell[BoxData["\<\"FA2X by Kirtimaan Mohan \\n email: kamohan@msu.edu \\n \
 version 1.1 \\n 10/03/2019 \\n Not optimized! Possibly lots of bugs!!!\"\>"], \
@@ -116,11 +85,11 @@ version 1.1 \\n 10/03/2019 \\n Not optimized! Possibly lots of bugs!!!\"\>"], \
    3.776704970731813*^9, 3.7767651458445473`*^9, 3.776769048440855*^9, 
    3.7767696718636227`*^9, 3.776769782959084*^9, 3.77677107630024*^9, 
    3.7767848686859093`*^9, 3.7770392950048313`*^9, 3.778239119647573*^9, 
-   3.77851079981749*^9, {3.7791271979663363`*^9, 3.7791272176839657`*^9}},
+   3.77851079981749*^9, {3.7791271979663363`*^9, 3.779127217668456*^9}, 
+   3.779202257603175*^9},
  CellLabel->
   "During evaluation of \
-In[1]:=",ExpressionUUID->"68a135c8-1ea0-4213-881d-6b4d19bc89ac"]
-}, Open  ]]
+In[54]:=",ExpressionUUID->"40532633-1757-46aa-ba73-df4718ca675e"]
 }, Open  ]],
 
 Cell[BoxData[
@@ -154,7 +123,7 @@ Cell[BoxData[
      RowBox[{"kT3", ">", "0"}], ",", 
      RowBox[{"\[Beta]", ">", "0"}]}], "}"}]}], ";"}]], "Input",
  CellChangeTimes->{3.7767696725954723`*^9},
- CellLabel->"In[5]:=",ExpressionUUID->"1c12ba0e-fd6c-4b7e-8de6-2b784fa72d92"],
+ CellLabel->"In[58]:=",ExpressionUUID->"1c12ba0e-fd6c-4b7e-8de6-2b784fa72d92"],
 
 Cell[BoxData[{
  RowBox[{
@@ -413,7 +382,7 @@ Cell[BoxData[{
    3.7758233050860357`*^9, {3.775824239182519*^9, 3.775824245114826*^9}, {
    3.775825392549559*^9, 3.7758254194463997`*^9}, {3.7758254536359*^9, 
    3.775825506891447*^9}, {3.776769783675538*^9, 3.7767697849573727`*^9}},
- CellLabel->"In[6]:=",ExpressionUUID->"a5c5e12e-157e-4719-b09d-930d037e0d1b"],
+ CellLabel->"In[59]:=",ExpressionUUID->"a5c5e12e-157e-4719-b09d-930d037e0d1b"],
 
 Cell[BoxData[""], "Input",
  CellChangeTimes->{{3.7723616669772577`*^9, 3.77236173423746*^9}, {
@@ -468,8 +437,10 @@ Cell[BoxData[
      RowBox[{"\"\<ggH_PV.m\>\"", ",", "jets0PV"}], "]"}], ";"}]}]}]], "Input",\
 
  CellChangeTimes->{{3.779127552592814*^9, 3.779127572850503*^9}, 
-   3.779127606378036*^9},
- CellLabel->"In[24]:=",ExpressionUUID->"9fe10d31-521c-4fe7-844e-895b7b5e190a"],
+   3.779127606378036*^9, {3.779202406625123*^9, 3.779202415086174*^9}, {
+   3.779202524187031*^9, 3.779202524936178*^9}},
+ CellLabel->
+  "In[107]:=",ExpressionUUID->"9fe10d31-521c-4fe7-844e-895b7b5e190a"],
 
 Cell[BoxData[
  RowBox[{
@@ -523,8 +494,11 @@ Cell[BoxData[
    3.775823239864522*^9, 3.775823240880198*^9}, {3.775823320902609*^9, 
    3.7758233229064703`*^9}, {3.779127235327127*^9, 3.779127271388174*^9}, {
    3.779127318331149*^9, 3.7791273790830193`*^9}, {3.779127417182901*^9, 
-   3.7791274626923656`*^9}, {3.7791275054082212`*^9, 3.779127545503696*^9}},
- CellLabel->"In[30]:=",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
+   3.7791274626923656`*^9}, {3.7791275054082212`*^9, 3.779127545503696*^9}, {
+   3.7792023196798143`*^9, 3.779202420053752*^9}, {3.779202538888507*^9, 
+   3.779202539677414*^9}},
+ CellLabel->
+  "In[113]:=",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
 
 Cell[BoxData[
  RowBox[{"\[IndentingNewLine]", 
@@ -545,7 +519,8 @@ Cell[BoxData[
         RowBox[{
          RowBox[{
           RowBox[{"sort", " ", "-", "u"}], " ", ">"}], " ", ".."}], "/", 
-        "pvcoefficients"}], "/", 
+        "pvcoefficients"}], "/", "0"}], 
+      RowBox[{"jets", "/", 
        RowBox[{"ggH_coeff", ".", "txt"}]}], "\n", "       ", "python", " ", 
       RowBox[{"pv", ".", "py"}], " ", "\"\<../feynamps/ggHg_PV.m\>\""}], " ", 
      "|", " ", 
@@ -553,15 +528,17 @@ Cell[BoxData[
       RowBox[{
        RowBox[{
         RowBox[{
-         RowBox[{"sort", " ", "-", "u"}], " ", ">"}], " ", ".."}], "/", 
-       "pvcoefficients"}], "/", 
-      RowBox[{"ggHg_coeff", ".", "txt"}]}]}]}], "\[IndentingNewLine]", 
+         RowBox[{
+          RowBox[{"sort", " ", "-", "u"}], " ", ">"}], " ", ".."}], "/", 
+        "pvcoefficients"}], "/", "1"}], 
+      RowBox[{"jets", "/", 
+       RowBox[{"ggHg_coeff", ".", "txt"}]}]}]}]}], "\[IndentingNewLine]", 
    "*)"}]}]], "Input",
  CellChangeTimes->{{3.769951408543744*^9, 3.769951516031106*^9}, {
   3.770009459536234*^9, 3.770009522564651*^9}, {3.775826780721582*^9, 
   3.775826781197331*^9}, {3.778510819803602*^9, 3.778510820329376*^9}, {
-  3.7791280023926783`*^9, 
-  3.779128054274996*^9}},ExpressionUUID->"476a37c6-482c-4f61-9ced-\
+  3.7791280023926783`*^9, 3.779128054274996*^9}, {3.779202869762745*^9, 
+  3.779202874883494*^9}},ExpressionUUID->"476a37c6-482c-4f61-9ced-\
 5d80a625711e"],
 
 Cell[BoxData[""], "Input",
@@ -569,8 +546,6 @@ Cell[BoxData[""], "Input",
    3.7791276308023233`*^9},ExpressionUUID->"705b77c9-9d55-4c91-a174-\
 596c11435d8d"],
 
-Cell[CellGroupData[{
-
 Cell[BoxData[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
@@ -580,913 +555,99 @@ Cell[BoxData[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{"StringJoin", "[", 
     RowBox[{
-     RowBox[{"ParentDirectory", "[", "]"}], ",", "\"\</pvcoefficients\>\""}], 
-    "]"}], "]"}], ";"}], "\[IndentingNewLine]", 
+     RowBox[{"ParentDirectory", "[", "]"}], ",", 
+     "\"\</pvcoefficients/0jets\>\""}], "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"ggHListPV", "=", 
    RowBox[{"ToExpression", "[", 
     RowBox[{"Import", "[", 
      RowBox[{"\"\<ggH_coeff.txt\>\"", ",", "\"\<Lines\>\""}], "]"}], "]"}]}], 
   ";"}], "\[IndentingNewLine]", 
- RowBox[{"Length", "[", "ggHListPV", "]"}], "\[IndentingNewLine]", 
  RowBox[{
-  RowBox[{"ggHgListPV", "=", 
-   RowBox[{"ToExpression", "[", 
-    RowBox[{"Import", "[", 
-     RowBox[{"\"\<ggHg_coeff.txt\>\"", ",", "\"\<Lines\>\""}], "]"}], "]"}]}],
-   ";"}], "\[IndentingNewLine]", 
- RowBox[{"Length", "[", "ggHgListPV", "]"}]}], "Input",
- CellChangeTimes->{{3.769946457030057*^9, 3.769946510878006*^9}, {
-   3.7699501822216883`*^9, 3.769950241652359*^9}, {3.769950448721727*^9, 
-   3.769950557949745*^9}, {3.769950617170197*^9, 3.769950624920703*^9}, {
-   3.769950677394843*^9, 3.769950679542734*^9}, {3.769950710781026*^9, 
-   3.769950747626449*^9}, {3.769951294077387*^9, 3.769951300057988*^9}, {
-   3.7699513329326878`*^9, 3.769951349592226*^9}, {3.770009442006164*^9, 
-   3.770009456522052*^9}, 3.770009533388871*^9, {3.770010860120204*^9, 
-   3.770010860297134*^9}, {3.779128063000547*^9, 3.779128199066687*^9}},
- CellLabel->"In[48]:=",ExpressionUUID->"fd0c50cb-5e3d-46b2-a09e-275f25c954a6"],
-
-Cell[BoxData["4"], "Output",
- CellChangeTimes->{{3.779128180092963*^9, 3.779128200605661*^9}},
- CellLabel->"Out[51]=",ExpressionUUID->"323cb7f2-c40f-4754-9540-9426135ece5f"],
-
-Cell[BoxData["18"], "Output",
- CellChangeTimes->{{3.779128180092963*^9, 3.779128200620792*^9}},
- CellLabel->"Out[53]=",ExpressionUUID->"2a34b402-4c25-4558-979d-a670f2211d0a"]
-}, Open  ]],
-
-Cell[BoxData[
- RowBox[{"\[IndentingNewLine]", 
-  RowBox[{"(*", 
-   RowBox[{"1", "-", "73"}], "*)"}]}]], "Input",
- CellChangeTimes->{{3.772360684428249*^9, 3.772360688933934*^9}, 
-   3.772886598217041*^9},ExpressionUUID->"f1052ac6-e6f7-4371-afd6-\
-ad461c58d053"],
-
-Cell[BoxData[
+  RowBox[{"nj0", "=", 
+   RowBox[{"Length", "[", "ggHListPV", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggH_coeff.m\>\"", ",", "ggHListPV"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"nj0List", "=", 
+   RowBox[{"Range", "[", "nj0", "]"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{"Do", "[", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
-     RowBox[{"LRlist", "[", 
+     RowBox[{"nj0List", "[", 
       RowBox[{"[", "n", "]"}], "]"}], "=", 
      RowBox[{"LoopRefine", "[", 
-      RowBox[{"listPV", "[", 
+      RowBox[{"ggHListPV", "[", 
        RowBox[{"[", "n", "]"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
    ",", 
    RowBox[{"{", 
-    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
- CellChangeTimes->{{3.7700095396277313`*^9, 3.770009546050956*^9}, {
-   3.770010902307991*^9, 3.770010922003213*^9}, {3.770011069988926*^9, 
-   3.7700110795936203`*^9}, {3.770011149326112*^9, 3.770011156613451*^9}, {
-   3.7700112291788197`*^9, 3.77001124342817*^9}, 3.770092556097802*^9, {
-   3.770096509105474*^9, 3.7700965202949467`*^9}},
- CellLabel->"In[11]:=",ExpressionUUID->"47c35d70-ef0a-4ee5-9de6-a89da37d395a"],
-
-Cell[BoxData[
- RowBox[{"\[IndentingNewLine]", 
-  RowBox[{"(*", 
-   RowBox[{"74", "-", "146"}], "*)"}]}]], "Input",
- CellChangeTimes->{{3.77236069586174*^9, 3.7723607148337317`*^9}, 
-   3.77288659631328*^9},ExpressionUUID->"e49bfcd0-2790-4662-b260-\
-1251fbf55656"],
-
-Cell[BoxData[
- RowBox[{"Do", "[", "\[IndentingNewLine]", 
-  RowBox[{
-   RowBox[{
-    RowBox[{
-     RowBox[{"LRlist", "[", 
-      RowBox[{"[", 
-       RowBox[{"n", "+", "73"}], "]"}], "]"}], "=", 
-     RowBox[{"LoopRefine", "[", 
-      RowBox[{"listPV", "[", 
-       RowBox[{"[", 
-        RowBox[{"n", "+", "73"}], "]"}], "]"}], "]"}]}], ";"}], 
-   "\[IndentingNewLine]", ",", 
-   RowBox[{"{", 
-    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
- CellChangeTimes->{{3.770092567087772*^9, 3.770092567563299*^9}, {
-  3.770092655295905*^9, 3.770092663038951*^9}, {3.7700951188676767`*^9, 
-  3.770095120205538*^9}, {3.770096692911742*^9, 3.770096696498418*^9}},
- CellLabel->"In[13]:=",ExpressionUUID->"7c31e5a1-c9d7-4139-bcbf-d567355f68ac"],
-
-Cell[BoxData[
- RowBox[{"\[IndentingNewLine]", 
-  RowBox[{"(*", 
-   RowBox[{"147", "-", "219"}], "*)"}]}]], "Input",
- CellChangeTimes->{{3.772360719354867*^9, 3.772360730955079*^9}, 
-   3.77288661329921*^9},ExpressionUUID->"df0e2446-e8a9-4c0f-ade0-\
-6243ed23f014"],
-
-Cell[BoxData[
- RowBox[{"Do", "[", "\[IndentingNewLine]", 
-  RowBox[{
-   RowBox[{
-    RowBox[{
-     RowBox[{"LRlist", "[", 
-      RowBox[{"[", 
-       RowBox[{"n", "+", 
-        RowBox[{"2", "*", "73"}]}], "]"}], "]"}], "=", 
-     RowBox[{"LoopRefine", "[", 
-      RowBox[{"listPV", "[", 
-       RowBox[{"[", 
-        RowBox[{"n", "+", 
-         RowBox[{"2", "*", "73"}]}], "]"}], "]"}], "]"}]}], ";"}], 
-   "\[IndentingNewLine]", ",", 
-   RowBox[{"{", 
-    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
- CellChangeTimes->{{3.770096924865595*^9, 3.770096925250608*^9}, {
-  3.770097051583521*^9, 3.7700970520991364`*^9}},
- CellLabel->"In[19]:=",ExpressionUUID->"b7439b12-cb51-47a1-a158-9fa93f157c7d"],
-
-Cell[BoxData[
- RowBox[{"\[IndentingNewLine]", 
-  RowBox[{"(*", 
-   RowBox[{"220", "-", "292"}], "*)"}]}]], "Input",
- CellChangeTimes->{{3.772360753433093*^9, 3.7723607635811663`*^9}, 
-   3.772886615105321*^9},ExpressionUUID->"ba9ecf49-d2ba-4baa-bc4a-\
-47072a88303d"],
-
-Cell[BoxData[
- RowBox[{"Do", "[", "\[IndentingNewLine]", 
-  RowBox[{
-   RowBox[{
-    RowBox[{
-     RowBox[{"LRlist", "[", 
-      RowBox[{"[", 
-       RowBox[{"n", "+", 
-        RowBox[{"3", "*", "73"}]}], "]"}], "]"}], "=", 
-     RowBox[{"LoopRefine", "[", 
-      RowBox[{"listPV", "[", 
-       RowBox[{"[", 
-        RowBox[{"n", "+", 
-         RowBox[{"3", "*", "73"}]}], "]"}], "]"}], "]"}]}], ";"}], 
-   "\[IndentingNewLine]", ",", 
-   RowBox[{"{", 
-    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
- CellChangeTimes->{{3.770098878330305*^9, 3.770098880489415*^9}, 
-   3.771411006149096*^9, 
-   3.771739280516284*^9},ExpressionUUID->"c1cc9921-c84f-4990-9a13-\
-a36935fe08f6"],
-
-Cell[BoxData[
- RowBox[{
-  RowBox[{"LRlist", " ", "=", " ", 
-   RowBox[{"Import", "[", "\"\<analyticPV.m\>\"", "]"}]}], ";"}]], "Input",
- CellChangeTimes->{3.772885455389707*^9},
- CellLabel->"In[12]:=",ExpressionUUID->"b325e442-757f-4122-a460-9727e5485960"],
-
-Cell[BoxData[
+    RowBox[{"n", ",", "nj0"}], "}"}]}], "]"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"Export", "[", 
-    RowBox[{"\"\<analyticPV.m\>\"", ",", "LRlist"}], "]"}], ";"}], " ", 
-  RowBox[{"(*", " ", 
-   RowBox[{"Run", " ", "this", " ", "after", " ", "reading", " ", 
-    RowBox[{"analyticPV", ".", "m"}]}], " ", "*)"}]}]], "Input",
- CellChangeTimes->{{3.772884594249895*^9, 3.7728846089750853`*^9}},
- CellLabel->"In[64]:=",ExpressionUUID->"64072172-75c1-400c-b4be-a5a76fc27e9f"],
-
-Cell[BoxData[
+    RowBox[{"\"\<ggH_coeff_LR.m\>\"", ",", "nj0List"}], "]"}], ";"}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
  RowBox[{
-  RowBox[{"(*", " ", 
-   RowBox[{
-   "Copy", " ", "the", " ", "PVs", " ", "to", " ", "a", " ", "new", " ", 
-    "list", " ", "LRlist", " ", "what", " ", "will", " ", "be", " ", "the", 
-    " ", "\"\<LoopRefined\>\"", " ", 
-    RowBox[{"terms", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
-  RowBox[{"(*", 
-   RowBox[{"293", "-", "365"}], "*)"}]}]], "Input",
- CellChangeTimes->{{3.7728868675215187`*^9, 3.772886877363283*^9}, {
-  3.7728873184298553`*^9, 3.772887337415292*^9}, {3.775929495403804*^9, 
-  3.775929497245184*^9}},ExpressionUUID->"75ac93f2-7474-4481-b70f-\
-8b3ab1fc4f2c"],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Do", "[", "\[IndentingNewLine]", 
-  RowBox[{
-   RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"StringJoin", "[", 
     RowBox[{
-     RowBox[{"LRlist", "[", 
-      RowBox[{"[", 
-       RowBox[{"n", "+", 
-        RowBox[{"4", "*", "73"}]}], "]"}], "]"}], "=", 
-     RowBox[{
-      RowBox[{"LRlist", "[", 
-       RowBox[{"[", 
-        RowBox[{"n", "+", 
-         RowBox[{"4", "*", "73"}]}], "]"}], "]"}], "//.", "LoopRef"}]}], ";", 
-    "\[IndentingNewLine]", 
-    RowBox[{"Print", "[", 
-     RowBox[{"n", "+", 
-      RowBox[{"4", "*", "73"}]}], "]"}], ";", "\[IndentingNewLine]", 
-    RowBox[{"Export", "[", 
-     RowBox[{"\"\<analyticPV.m\>\"", ",", "LRlist"}], "]"}], ";"}], 
-   "\[IndentingNewLine]", ",", " ", 
-   RowBox[{"{", 
-    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
- CellChangeTimes->{{3.77288694186665*^9, 3.772887010616581*^9}, {
-  3.772887072326515*^9, 3.7728871220446568`*^9}, {3.772887221297553*^9, 
-  3.772887227658811*^9}, {3.772887452365738*^9, 3.772887453395618*^9}, {
-  3.7728885491822968`*^9, 3.772888550011717*^9}},
- CellLabel->"In[12]:=",ExpressionUUID->"df43f43c-f3df-4d31-8f47-e316129e404e"],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["293"], "Print",
- CellChangeTimes->{{3.772887221777728*^9, 3.7728872374316874`*^9}, 
-   3.772887315250904*^9, 3.772887359406661*^9, 3.77288745403798*^9, 
-   3.772888041610999*^9, 3.772888092854567*^9, 3.772888665630286*^9, 
-   3.77288870682581*^9, 3.772888739575129*^9, 3.772964867508161*^9},
- CellLabel->
-  "During evaluation of \
-In[12]:=",ExpressionUUID->"13bb3e84-1aad-451c-9470-217fab9f697f"],
-
-Cell[BoxData["294"], "Print",
- CellChangeTimes->{{3.772887221777728*^9, 3.7728872374316874`*^9}, 
-   3.772887315250904*^9, 3.772887359406661*^9, 3.77288745403798*^9, 
-   3.772888041610999*^9, 3.772888092854567*^9, 3.772888665630286*^9, 
-   3.77288870682581*^9, 3.772888739575129*^9, 3.7729648755876827`*^9},
- CellLabel->
-  "During evaluation of \
-In[12]:=",ExpressionUUID->"c6fece5c-a585-4c90-ab33-806fa3705b71"]
-}, Open  ]],
-
-Cell[BoxData["$Aborted"], "Output",
- CellChangeTimes->{3.772964876523367*^9},
- CellLabel->"Out[12]=",ExpressionUUID->"829f296d-4387-479f-92bc-7a626dfe607c"]
-}, Open  ]],
-
-Cell[BoxData[
+     RowBox[{"ParentDirectory", "[", "]"}], ",", 
+     "\"\</pvcoefficients/1jets/\>\""}], "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
  RowBox[{
-  RowBox[{"(*", " ", 
-   RowBox[{"PV", " ", "300", " ", "was", " ", 
-    RowBox[{"stubborn", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
-  RowBox[{"LRlist", "[", 
-   RowBox[{"[", "300", "]"}], "]"}]}]], "Input",
- CellChangeTimes->{{3.772887637509116*^9, 3.77288767378751*^9}, {
-  3.77288804979731*^9, 3.7728880669445*^9}},
- CellLabel->"In[13]:=",ExpressionUUID->"0d3ce3b6-3c94-4932-a9ed-194cea17f2b9"],
-
-Cell[BoxData[
+  RowBox[{"ggHgListPV", "=", 
+   RowBox[{"ToExpression", "[", 
+    RowBox[{"Import", "[", 
+     RowBox[{"\"\<ggHg_coeff.txt\>\"", ",", "\"\<Lines\>\""}], "]"}], "]"}]}],
+   ";"}], "\[IndentingNewLine]", 
  RowBox[{
-  RowBox[{"PV300", "=", 
-   RowBox[{
-    RowBox[{
-     RowBox[{"PVD", "[", 
-      RowBox[{"0", ",", "1", ",", "2", ",", "0", ",", "0", ",", "a", ",", 
-       SuperscriptBox["MH", "2"], ",", "b", ",", "0", ",", "T14", ",", "g", 
-       ",", "g", ",", "g", ",", "g"}], "]"}], "//.", "LoopRef"}], "//.", 
-    RowBox[{"{", 
-     RowBox[{
-      RowBox[{"a", "\[Rule]", 
-       RowBox[{
-        SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]}], ",", 
-      RowBox[{"b", "->", 
-       RowBox[{
-        RowBox[{"2", " ", 
-         SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}]}], ",", 
-      RowBox[{"g", "\[Rule]", 
-       RowBox[{"Sqrt", "[", 
-        RowBox[{"MT", "^", "2"}], "]"}]}]}], "}"}]}]}], ";"}]], "Input",
- CellChangeTimes->{{3.772887687307757*^9, 3.7728877045087748`*^9}, {
-  3.772887768481736*^9, 3.772887790741548*^9}, {3.772887834208604*^9, 
-  3.7728878601223297`*^9}, {3.7728879075747433`*^9, 3.772887957264495*^9}},
- CellLabel->"In[59]:=",ExpressionUUID->"5a89f228-5332-4b40-9dd2-0e3e845f3970"],
-
-Cell[BoxData[
+  RowBox[{"nj1", "=", 
+   RowBox[{"Length", "[", "ggHgListPV", "]"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{
-  RowBox[{
-   RowBox[{"LRlist", "[", 
-    RowBox[{"[", "300", "]"}], "]"}], " ", "=", " ", "PV300"}], 
-  ";"}]], "Input",
- CellChangeTimes->{{3.772888005864108*^9, 3.772888014449572*^9}},
- CellLabel->"In[60]:=",ExpressionUUID->"3a874326-a732-49f9-bf3f-018de4fbf690"],
-
-Cell[BoxData[
- RowBox[{"\[IndentingNewLine]", 
-  RowBox[{"(*", 
-   RowBox[{"366", "-", "438"}], "*)"}]}]], "Input",
- CellChangeTimes->{{3.772886684987542*^9, 
-  3.7728867268924503`*^9}},ExpressionUUID->"37adef6f-081e-487c-bd44-\
-ab449560d571"],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggHg_coeff.m\>\"", ",", "ggHgListPV"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"nj1List", "=", 
+   RowBox[{"Range", "[", "nj1", "]"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{"Do", "[", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
-     RowBox[{"LRlist", "[", 
-      RowBox[{"[", 
-       RowBox[{"n", "+", 
-        RowBox[{"5", "*", "73"}]}], "]"}], "]"}], "=", 
-     RowBox[{
-      RowBox[{"LRlist", "[", 
-       RowBox[{"[", 
-        RowBox[{"n", "+", 
-         RowBox[{"5", "*", "73"}]}], "]"}], "]"}], "//.", " ", "LoopRef"}]}], 
-    ";", "\[IndentingNewLine]", 
-    RowBox[{"Print", "[", 
-     RowBox[{"n", "+", 
-      RowBox[{"5", "*", "73"}]}], "]"}], ";", "\[IndentingNewLine]", 
-    RowBox[{"Export", "[", 
-     RowBox[{"\"\<analyticPV.m\>\"", ",", "LRlist"}], "]"}], ";"}], 
-   "\[IndentingNewLine]", ",", 
+     RowBox[{"nj1List", "[", 
+      RowBox[{"[", "n", "]"}], "]"}], "=", 
+     RowBox[{"LoopRefine", "[", 
+      RowBox[{"ggHgListPV", "[", 
+       RowBox[{"[", "n", "]"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+   ",", 
    RowBox[{"{", 
-    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
- CellChangeTimes->{{3.772886718627595*^9, 3.772886720721589*^9}, {
-  3.772887584696403*^9, 3.772887615370928*^9}, {3.7728902380144987`*^9, 
-  3.7728902382758827`*^9}},
- CellLabel->"In[14]:=",ExpressionUUID->"f3c0843b-be94-4b77-89a7-a517bd2df868"],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["366"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772964891668998*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"e2ec887b-8f74-4c58-b508-8180d0a5ab39"],
-
-Cell[BoxData["367"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772964898888381*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"37e2fbaf-ebf4-468b-9e07-64d66403941b"],
-
-Cell[BoxData["368"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729649060929813`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"2e78dfd3-252a-4510-977f-b4f27ff8aa4b"],
-
-Cell[BoxData["369"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772964913212573*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"a0e44cf6-a61f-449f-8a34-2c8ce9d266f3"],
-
-Cell[BoxData["370"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772964920354567*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"a931e414-5259-4e72-acd7-dcee07599a82"],
-
-Cell[BoxData["371"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772964927557357*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"5594c2a5-c197-4faf-9ffb-e7ba76cbc538"],
-
-Cell[BoxData["372"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772964934685068*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"8ecef3ea-5555-4307-bcb5-45617481fea4"],
-
-Cell[BoxData["373"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729649417991037`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"84060125-ad1a-4df3-8ce7-b2dbb52a255e"],
-
-Cell[BoxData["374"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772964949054049*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"ba89847a-a4aa-4bc8-bbdf-fc4fe94626a9"],
-
-Cell[BoxData["375"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772964956219346*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"4ad9a298-9033-4f95-ba31-e459488b2078"],
-
-Cell[BoxData["376"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729649633964767`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"0f51e120-6ffe-40ed-90a9-16ffc4b8cd7b"],
-
-Cell[BoxData["377"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729649705714684`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"55f10a7d-2dd2-42de-9c51-a8b42913981b"],
-
-Cell[BoxData["378"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772964977704796*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"4f770da7-96cd-4cb8-a4d4-ac8321d712cd"],
-
-Cell[BoxData["379"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772964984930636*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"649189dd-7c36-4840-a8f2-e90ccecbefc1"],
-
-Cell[BoxData["380"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772964992039103*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"69c8ff97-a48c-433d-a1af-293c970ff456"],
-
-Cell[BoxData["381"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772964999150893*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"e5097cc9-3fd7-4356-82cc-935a8fd99f37"],
-
-Cell[BoxData["382"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729650063531103`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"2a4fa068-31d2-42b2-8e27-9cd47a215300"],
-
-Cell[BoxData["383"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965013586713*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"d4490842-541b-4159-b08b-37254e2f02ee"],
-
-Cell[BoxData["384"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965020837448*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"0ae6d1ae-d897-40b7-83ac-03676d9405d7"],
-
-Cell[BoxData["385"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965027975287*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"dd1f2688-2c0e-4ed6-aa9d-d7b634519be6"],
-
-Cell[BoxData["386"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.77296503511196*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"28b3e938-3807-4e3b-9426-e708dcec15b0"],
-
-Cell[BoxData["387"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965042224675*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"b68ca497-f2d7-495a-b577-5f5f7cc0b776"],
-
-Cell[BoxData["388"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965049469451*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"d67f7e5b-0500-4072-a004-7f5c73342e3a"],
-
-Cell[BoxData["389"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965056584694*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"ce08a793-ce51-4874-b4c7-0d99e3e47784"],
-
-Cell[BoxData["390"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965063705216*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"fbbc2328-d686-4169-8a45-f2f916e0d9d2"],
-
-Cell[BoxData["391"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729650707852077`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"1cb44eb4-a5e3-4f09-a2dc-7ed04f4bcf1f"],
-
-Cell[BoxData["392"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965078094244*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"622b5b19-decc-4b43-aecb-2a18b830f72c"],
-
-Cell[BoxData["393"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729650851741037`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"f6dc26ef-5813-4857-bfe4-c26b87bc1f7b"],
-
-Cell[BoxData["394"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965092240261*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"2d3735df-91e7-4795-8dfd-6ed011d79107"],
-
-Cell[BoxData["395"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729651000320807`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"50fe601d-1b2b-4d2e-807b-1d249afe001e"],
-
-Cell[BoxData["396"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729651072457933`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"2fdfacbd-80ef-4c9a-b71f-e2cc0d9afe5e"],
-
-Cell[BoxData["397"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965114382185*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"da85be8b-7972-4185-b906-d61dc785a9fd"],
-
-Cell[BoxData["398"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729651214583406`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"1c79d656-868a-4326-8d0a-2659691bbe1c"],
-
-Cell[BoxData["399"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965128592004*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"efa41b92-f275-451a-ac92-19e0f0f8ac9d"],
-
-Cell[BoxData["400"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729651357337923`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"37e28f01-8fd3-4b48-b1b2-21df0a6ba950"],
-
-Cell[BoxData["401"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965142812318*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"e844650c-6ee0-4b56-bc47-625127c32e2b"],
-
-Cell[BoxData["402"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729651498997393`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"29f611a5-3fe6-49ea-ba52-f894c5b962a5"],
-
-Cell[BoxData["403"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965156982112*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"0d1b53d7-40d6-416f-87a6-b7b7a755e497"],
-
-Cell[BoxData["404"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729651641069736`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"dcd3c150-23ea-4f93-8005-bdd7678c1c03"],
-
-Cell[BoxData["405"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965171237117*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"fe002903-a338-4ec6-ab39-693bb8f32eff"],
-
-Cell[BoxData["406"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729651784048862`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"34a03c80-9c4e-4fcb-b5ff-f3ff0cb1f223"],
-
-Cell[BoxData["407"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965185467684*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"6cb0347b-630c-40c9-be5c-e11d214769dc"],
-
-Cell[BoxData["408"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729651925712223`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"0815e5f7-0b7c-4ceb-83e7-8cfc79826245"],
-
-Cell[BoxData["409"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965199745579*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"92f96f11-b3a8-42e5-98e6-6fee3c21c719"],
-
-Cell[BoxData["410"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965206835451*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"f5dc0de3-7380-4b70-b0d3-54def93aedd4"],
-
-Cell[BoxData["411"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729652139667263`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"a1701a3b-5ef3-47a9-95a2-d8e512233777"],
-
-Cell[BoxData["412"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965221097117*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"4097feba-7377-4752-bb38-a0921cc43c71"],
-
-Cell[BoxData["413"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965228246559*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"dd3dbaf1-61f0-453b-9b9a-36874206af99"],
-
-Cell[BoxData["414"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729652353241167`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"40b1ffb0-1c9e-42ee-9160-2930f36cdfaa"],
-
-Cell[BoxData["415"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729652423967*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"191f384d-858c-4d19-92a6-40c39817d766"],
-
-Cell[BoxData["416"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.77296524948139*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"0ad5044a-36b0-4d57-a03e-5b3764fa61c2"],
-
-Cell[BoxData["417"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965256898061*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"777e0a58-0441-45aa-bb77-379de521b4ea"],
-
-Cell[BoxData["418"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965264013151*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"26958225-f0de-4b0d-8418-1d0e741744db"],
-
-Cell[BoxData["419"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965271160746*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"aa153189-1719-4ec3-a6c4-faeae6eb825e"],
-
-Cell[BoxData["420"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965278275385*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"ad84b383-b8b6-4501-8354-e87c74b4fe47"],
-
-Cell[BoxData["421"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965285455348*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"fb83c3a6-a8b1-4afc-8465-6456a8260a4f"],
-
-Cell[BoxData["422"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.77296529252765*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"cd5fc969-87ec-41e9-8094-20cb832c0cf2"],
-
-Cell[BoxData["423"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965299605927*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"8f96c2e7-a606-44fd-9bd3-787dbc3507ca"],
-
-Cell[BoxData["424"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965306700017*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"1cb89dfe-425a-4c52-9b55-b4a6014c9852"],
-
-Cell[BoxData["425"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965313880247*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"ef7f8635-cadc-4f02-9e3b-547e00252d2e"],
-
-Cell[BoxData["426"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965321075293*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"4f79ee0d-259f-4d53-809b-53a89f702a3d"],
-
-Cell[BoxData["427"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965328169883*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"886f8afa-5606-4059-8b26-d7d6af479013"],
-
-Cell[BoxData["428"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.77296533642483*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"cd7e7c7e-efdb-40bf-ae88-e79e89aee24f"],
-
-Cell[BoxData["429"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965344088553*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"f3dba259-3e90-4a75-828b-055cb49c87c8"],
-
-Cell[BoxData["430"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729653522431707`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"37b1dcf0-6b49-4eb5-b721-89fc56a828df"],
-
-Cell[BoxData["431"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965360769515*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"5f7c8d38-0599-40f0-9972-0a6d5997ecbf"],
-
-Cell[BoxData["432"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965369070016*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"69c00823-96b0-4daa-9990-36f08fb6ce56"],
-
-Cell[BoxData["433"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965377127087*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"fb97acd4-1d96-4a85-8bc6-3305a839a3da"],
-
-Cell[BoxData["434"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965387417776*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"43bad5b4-c421-419d-9915-1b67c66f1036"],
-
-Cell[BoxData["435"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965394992403*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"f5846949-e47a-4e77-914f-0a8f50e06332"],
-
-Cell[BoxData["436"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965402651409*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"6a5ef075-fa3d-4ad6-b501-a5cb532fd6f5"],
-
-Cell[BoxData["437"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.772965410672473*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"ee5772c0-100c-4ff4-83b0-096fcfc8e2a6"],
-
-Cell[BoxData["438"], "Print",
- CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
-  3.772963497325268*^9, 3.7729654227478647`*^9},
- CellLabel->
-  "During evaluation of \
-In[14]:=",ExpressionUUID->"fec2f95e-20ad-473c-80c7-bfbc2b46c85f"]
-}, Closed]]
-}, Open  ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
+    RowBox[{"n", ",", "nj1"}], "}"}]}], "]"}], "\[IndentingNewLine]", 
  RowBox[{
-  RowBox[{"(*", " ", 
-   RowBox[{"PV", " ", "406", " ", "was", " ", 
-    RowBox[{"stubborn", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
-  RowBox[{"LRlist", "[", 
-   RowBox[{"[", "406", "]"}], "]"}]}]], "Input",
- CellChangeTimes->{{3.772963340774973*^9, 3.772963345560577*^9}, {
-  3.772963519403051*^9, 
-  3.7729635244305058`*^9}},ExpressionUUID->"083fb79c-daba-4277-b94e-\
-78bed80412be"],
-
-Cell[BoxData[
- RowBox[{"PVD", "[", 
-  RowBox[{"1", ",", "0", ",", "1", ",", "0", ",", "0", ",", 
-   RowBox[{
-    SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], ",", 
-   SuperscriptBox["MH", "2"], ",", 
-   RowBox[{
-    RowBox[{"2", " ", 
-     SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}], ",", "0", 
-   ",", "T14", ",", 
-   SqrtBox[
-    SuperscriptBox["MT", "2"]], ",", 
-   SqrtBox[
-    SuperscriptBox["MT", "2"]], ",", 
-   SqrtBox[
-    SuperscriptBox["MT", "2"]], ",", 
-   SqrtBox[
-    SuperscriptBox["MT", "2"]]}], "]"}]], "Output",
- CellChangeTimes->{{3.772963343468006*^9, 3.772963372862679*^9}},
- CellLabel->"Out[29]=",ExpressionUUID->"21437e94-a2d0-4030-9577-1fb730a2c01b"]
-}, Open  ]],
-
-Cell[BoxData[
- RowBox[{
-  RowBox[{"PV406", "=", 
-   RowBox[{
-    RowBox[{
-     RowBox[{"PVD", "[", 
-      RowBox[{"1", ",", "0", ",", "1", ",", "0", ",", "0", ",", "a", ",", 
-       SuperscriptBox["MH", "2"], ",", "b", ",", "0", ",", "T14", ",", "g", 
-       ",", "g", ",", "g", ",", "g"}], "]"}], "//.", "LoopRef"}], "//.", 
-    RowBox[{"{", 
-     RowBox[{
-      RowBox[{"a", "\[Rule]", 
-       RowBox[{
-        SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]}], ",", 
-      RowBox[{"b", "->", 
-       RowBox[{
-        RowBox[{"2", " ", 
-         SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}]}], ",", 
-      RowBox[{"g", "\[Rule]", 
-       RowBox[{"Sqrt", "[", 
-        RowBox[{"MT", "^", "2"}], "]"}]}]}], "}"}]}]}], ";"}]], "Input",
- CellChangeTimes->{{3.7729633514518003`*^9, 3.772963361873694*^9}},
- CellLabel->"In[30]:=",ExpressionUUID->"c9749ffe-5ab8-4c9a-aef7-8af3843d725b"],
-
-Cell[BoxData[
- RowBox[{
-  RowBox[{
-   RowBox[{"LRlist", "[", 
-    RowBox[{"[", "406", "]"}], "]"}], " ", "=", " ", "PV406"}], 
-  ";"}]], "Input",
- CellChangeTimes->{{3.772963424367772*^9, 3.772963429904943*^9}},
- CellLabel->"In[32]:=",ExpressionUUID->"2d6ff57e-8bdd-4f5e-9772-e77bcbd1d8d0"],
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggHg_coeff_LR.m\>\"", ",", "nj1List"}], "]"}], 
+  ";"}]}], "Input",
+ CellChangeTimes->{{3.769946457030057*^9, 3.769946510878006*^9}, {
+   3.7699501822216883`*^9, 3.769950241652359*^9}, {3.769950448721727*^9, 
+   3.769950557949745*^9}, {3.769950617170197*^9, 3.769950624920703*^9}, {
+   3.769950677394843*^9, 3.769950679542734*^9}, {3.769950710781026*^9, 
+   3.769950747626449*^9}, {3.769951294077387*^9, 3.769951300057988*^9}, {
+   3.7699513329326878`*^9, 3.769951349592226*^9}, {3.770009442006164*^9, 
+   3.770009456522052*^9}, 3.770009533388871*^9, {3.770010860120204*^9, 
+   3.770010860297134*^9}, {3.779128063000547*^9, 3.779128199066687*^9}, {
+   3.779202197884747*^9, 3.7792022540020113`*^9}, {3.779202532350211*^9, 
+   3.779202597984223*^9}, {3.77920291035328*^9, 3.779202919433154*^9}, {
+   3.779203257319865*^9, 3.779203284428808*^9}},
+ CellLabel->
+  "In[151]:=",ExpressionUUID->"fd0c50cb-5e3d-46b2-a09e-275f25c954a6"],
 
 Cell[BoxData["\[IndentingNewLine]"], "Input",
  CellChangeTimes->{
@@ -1509,344 +670,65 @@ Cell[BoxData[{
  RowBox[{
   RowBox[{"f", "[", 
    RowBox[{"a_", ",", "b_"}], "]"}], ":=", 
-  RowBox[{"a", "\[Rule]", "b"}]}]}], "Input",
- CellChangeTimes->{{3.773141715006895*^9, 3.7731417742477217`*^9}},
- CellLabel->"In[15]:=",ExpressionUUID->"007158c3-a206-4cab-88ec-886b70f30fed"],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"replacement", "=", 
-  RowBox[{"f", "[", 
-   RowBox[{"listPV", ",", "LRlist"}], "]"}]}]], "Input",
- CellChangeTimes->{{3.7731417783694973`*^9, 3.773141825995413*^9}},
- CellLabel->"In[18]:=",ExpressionUUID->"743fd8ff-17f3-49f2-85d6-506c6d73e5ad"],
+  RowBox[{"a", "\[Rule]", "b"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"rep0jets", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"ggHListPV", ",", "nj0List"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"rep1jets", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"ggHgListPV", ",", " ", "nj1List"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"StringJoin", "[", 
+    RowBox[{
+     RowBox[{"ParentDirectory", "[", "]"}], ",", 
+     "\"\</pvcoefficients/0jets/\>\""}], "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<rep_rule_0jets.m\>\"", ",", "rep0jets"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"StringJoin", "[", 
+    RowBox[{
+     RowBox[{"ParentDirectory", "[", "]"}], ",", 
+     "\"\</pvcoefficients/1jets/\>\""}], "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<rep_rule_1jets.m\>\"", ",", "rep1jets"}], "]"}], 
+  ";"}]}], "Input",
+ CellChangeTimes->{{3.773141715006895*^9, 3.7731417742477217`*^9}, {
+  3.77920349196461*^9, 3.779203492213757*^9}},
+ CellLabel->
+  "In[167]:=",ExpressionUUID->"007158c3-a206-4cab-88ec-886b70f30fed"],
 
-Cell[BoxData[
- InterpretationBox[
-  TagBox[
-   FrameBox[GridBox[{
-      {
-       ItemBox[
-        TagBox[
-         RowBox[{"{", 
-          RowBox[{
-           RowBox[{
-            RowBox[{"PVC", "[", 
-             RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", 
-              RowBox[{
-               SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], 
-              ",", "T", ",", 
-              SqrtBox[
-               SuperscriptBox["MT", "2"]], ",", 
-              SqrtBox[
-               SuperscriptBox["MT", "2"]], ",", 
-              SqrtBox[
-               SuperscriptBox["MT", "2"]]}], "]"}], "\[Rule]", 
-            RowBox[{
-             RowBox[{"-", 
-              FractionBox[
-               SuperscriptBox[
-                RowBox[{"Log", "[", 
-                 FractionBox[
-                  RowBox[{
-                   RowBox[{"2", " ", 
-                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
-                   SqrtBox[
-                    TemplateBox[{"1"},
-                    "OutputSizeLimit`Skeleton"]]}], 
-                  RowBox[{"2", " ", 
-                   SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
-               RowBox[{"2", " ", 
-                RowBox[{"(", 
-                 RowBox[{
-                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", 
-                  "-", "U"}], ")"}]}]]}], "+", 
-             FractionBox[
-              SuperscriptBox[
-               RowBox[{"Log", "[", 
-                FractionBox[
-                 RowBox[{
-                  RowBox[{"-", 
-                   SuperscriptBox["MH", "2"]}], "+", 
-                  TemplateBox[{"4"},
-                   "OutputSizeLimit`Skeleton"], "+", 
-                  SqrtBox[
-                   TemplateBox[{"1"},
-                    "OutputSizeLimit`Skeleton"]]}], 
-                 RowBox[{"2", " ", 
-                  SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
-              RowBox[{"2", " ", 
-               RowBox[{"(", 
-                RowBox[{
-                 SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", 
-                 "-", "U"}], ")"}]}]]}]}], ",", 
-           TemplateBox[{"436"},
-            "OutputSizeLimit`Skeleton"], ",", 
-           RowBox[{
-            RowBox[{"PVD", "[", 
-             RowBox[{"1", ",", "1", ",", "0", ",", "0", ",", 
-              SuperscriptBox["MH", "2"], ",", "T24", ",", "0", ",", "0", ",", 
-              
-              RowBox[{
-               SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}], 
-              ",", "T", ",", 
-              SqrtBox[
-               SuperscriptBox["MT", "2"]], ",", 
-              SqrtBox[
-               SuperscriptBox["MT", "2"]], ",", 
-              SqrtBox[
-               SuperscriptBox["MT", "2"]], ",", 
-              SqrtBox[
-               SuperscriptBox["MT", "2"]]}], "]"}], "\[Rule]", 
-            RowBox[{
-             RowBox[{"-", 
-              FractionBox[
-               RowBox[{"T", " ", 
-                RowBox[{"(", 
-                 RowBox[{
-                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}],
-                  ")"}], " ", 
-                RowBox[{"DiscB", "[", 
-                 RowBox[{"T", ",", 
-                  SqrtBox[
-                   SuperscriptBox["MT", "2"]], ",", 
-                  SqrtBox[
-                   SuperscriptBox["MT", "2"]]}], "]"}]}], 
-               RowBox[{"4", " ", 
-                RowBox[{"Kibble\[Phi]", "[", 
-                 RowBox[{
-                  SuperscriptBox["MH", "2"], ",", "T24", ",", "0", ",", "0", 
-                  ",", 
-                  RowBox[{
-                   SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
-                   "T14"}], ",", "T"}], "]"}]}]]}], "-", 
-             FractionBox[
-              TemplateBox[{"1"},
-               "OutputSizeLimit`Skeleton"], 
-              TemplateBox[{"1"},
-               "OutputSizeLimit`Skeleton"]], "+", 
-             TemplateBox[{"6"},
-              "OutputSizeLimit`Skeleton"], "+", 
-             TemplateBox[{"1"},
-              "OutputSizeLimit`Skeleton"], "-", 
-             FractionBox[
-              RowBox[{"T", " ", 
-               TemplateBox[{"2"},
-                "OutputSizeLimit`Skeleton"], " ", 
-               RowBox[{"ScalarD0", "[", 
-                RowBox[{"0", ",", 
-                 TemplateBox[{"8"},
-                  "OutputSizeLimit`Skeleton"], ",", 
-                 SqrtBox[
-                  SuperscriptBox["MT", "2"]]}], "]"}]}], 
-              RowBox[{"8", " ", 
-               SuperscriptBox[
-                TemplateBox[{"1"},
-                 "OutputSizeLimit`Skeleton"], "2"]}]]}]}]}], "}"}],
-         Short[#, 5]& ],
-        BaseStyle->{Deployed -> False},
-        StripOnInput->False]},
-      {GridBox[{
-         {
-          TagBox[
-           TooltipBox[
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource[
-                "FEStrings", "sizeBriefExplanation"], StandardForm],
-               ImageSizeCache->{58., {2., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLText",
-             StripOnInput->False],
-            StyleBox[
-             DynamicBox[
-              ToBoxes[
-               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
-               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
-             False]],
-           Annotation[#, 
-            Style[
-             Dynamic[
-              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
-             DynamicUpdating -> True], "Tooltip"]& ], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
-                StandardForm],
-               ImageSizeCache->{50., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
-                StandardForm],
-               ImageSizeCache->{50., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-            OutputSizeLimit`Defer, 18, 17463603852504468309, 5/2],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
-                StandardForm],
-               ImageSizeCache->{56., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
-                StandardForm],
-               ImageSizeCache->{56., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-            OutputSizeLimit`Defer, 18, 17463603852504468309, 5 2],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
-                StandardForm],
-               ImageSizeCache->{42., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
-                StandardForm],
-               ImageSizeCache->{42., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-            OutputSizeLimit`Defer, 18, 17463603852504468309, Infinity],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
-                StandardForm],
-               ImageSizeCache->{74., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
-                StandardForm],
-               ImageSizeCache->{74., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>FrontEndExecute[{
-              FrontEnd`SetOptions[
-              FrontEnd`$FrontEnd, 
-               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
-              FrontEnd`FrontEndToken["PreferencesDialog"]}],
-           Evaluator->None,
-           Method->"Preemptive"]}
-        },
-        AutoDelete->False,
-        FrameStyle->GrayLevel[0.85],
-        GridBoxDividers->{"Columns" -> {False, {True}}},
-        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
-        GridBoxSpacings->{"Columns" -> {{2}}}]}
-     },
-     DefaultBaseStyle->"Column",
-     GridBoxAlignment->{
-      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-       "RowsIndexed" -> {}},
-     GridBoxDividers->{
-      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
-       "RowsIndexed" -> {}},
-     GridBoxItemSize->{
-      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
-       "RowsIndexed" -> {}},
-     GridBoxSpacings->{"Columns" -> {
-         Offset[0.27999999999999997`], {
-          Offset[0.5599999999999999]}, 
-         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
-         Offset[0.2], 
-         Offset[1.2], {
-          Offset[0.4]}, 
-         Offset[0.2]}, "RowsIndexed" -> {}}],
-    BaseStyle->"OutputSizeLimit",
-    FrameMargins->{{12, 12}, {0, 15}},
-    FrameStyle->GrayLevel[0.85],
-    RoundingRadius->5,
-    StripOnInput->False],
-   Deploy,
-   DefaultBaseStyle->"Deploy"],
-  If[17463603852504468309 === $SessionID, 
-   Out[18], Message[
-     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
-   Null]]], "Output",
- CellChangeTimes->{{3.7731418073007402`*^9, 3.773141832563183*^9}},
- CellLabel->"Out[18]=",ExpressionUUID->"0fce6bb0-45fe-4e6c-a361-d7b5261cb38e"]
-}, Open  ]],
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.7731417783694973`*^9, 3.773141825995413*^9}, {
+  3.779203354196967*^9, 3.779203400369611*^9}, {3.779203486701988*^9, 
+  3.779203490595933*^9}},ExpressionUUID->"743fd8ff-17f3-49f2-85d6-\
+506c6d73e5ad"],
 
 Cell[CellGroupData[{
 
-Cell[BoxData[
- RowBox[{"Export", "[", 
-  RowBox[{"\"\<replacementRule.m\>\"", ",", "replacement"}], "]"}]], "Input",
- CellChangeTimes->{{3.773141845931491*^9, 3.77314186938391*^9}},
- CellLabel->"In[19]:=",ExpressionUUID->"f774e49f-9f49-4e9e-8986-5d0680aa1203"],
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.773141845931491*^9, 3.77314186938391*^9}, {
+  3.779203407651013*^9, 
+  3.779203485153195*^9}},ExpressionUUID->"f774e49f-9f49-4e9e-8986-\
+5d0680aa1203"],
 
 Cell[BoxData["\<\"replacementRule.m\"\>"], "Output",
  CellChangeTimes->{3.773141878024766*^9},
@@ -102410,538 +101292,421 @@ CellTagsIndex->{}
 Notebook[{
 Cell[558, 20, 1181, 26, 94, "Input",ExpressionUUID->"a9eb43f9-c437-4ff0-ae8b-eb31f4d06b38"],
 Cell[CellGroupData[{
-Cell[1764, 50, 636, 12, 94, "Input",ExpressionUUID->"aa6e76d2-ec10-49c0-b6e0-1dd4d91b1a18"],
-Cell[CellGroupData[{
-Cell[2425, 66, 1868, 27, 46, "Print",ExpressionUUID->"0faa258c-cb99-4ffa-abdc-8a866ea3d423"],
-Cell[4296, 95, 1736, 26, 101, "Print",ExpressionUUID->"68a135c8-1ea0-4213-881d-6b4d19bc89ac"]
-}, Open  ]]
-}, Open  ]],
-Cell[6059, 125, 1328, 31, 94, "Input",ExpressionUUID->"1c12ba0e-fd6c-4b7e-8de6-2b784fa72d92"],
-Cell[7390, 158, 10660, 257, 1165, "Input",ExpressionUUID->"a5c5e12e-157e-4719-b09d-930d037e0d1b"],
-Cell[18053, 417, 371, 6, 30, "Input",ExpressionUUID->"7741718d-edbc-49e5-a241-fb84c7107f7d"],
-Cell[18427, 425, 1621, 46, 157, "Input",ExpressionUUID->"9fe10d31-521c-4fe7-844e-895b7b5e190a"],
-Cell[20051, 473, 2246, 53, 178, "Input",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
-Cell[22300, 528, 1479, 36, 136, "Input",ExpressionUUID->"476a37c6-482c-4f61-9ced-5d80a625711e"],
-Cell[23782, 566, 177, 3, 30, "Input",ExpressionUUID->"705b77c9-9d55-4c91-a174-596c11435d8d"],
-Cell[CellGroupData[{
-Cell[23984, 573, 1564, 33, 136, "Input",ExpressionUUID->"fd0c50cb-5e3d-46b2-a09e-275f25c954a6"],
-Cell[25551, 608, 173, 2, 34, "Output",ExpressionUUID->"323cb7f2-c40f-4754-9540-9426135ece5f"],
-Cell[25727, 612, 174, 2, 34, "Output",ExpressionUUID->"2a34b402-4c25-4558-979d-a670f2211d0a"]
-}, Open  ]],
-Cell[25916, 617, 261, 6, 52, "Input",ExpressionUUID->"f1052ac6-e6f7-4371-afd6-ad461c58d053"],
-Cell[26180, 625, 810, 18, 73, "Input",ExpressionUUID->"47c35d70-ef0a-4ee5-9de6-a89da37d395a"],
-Cell[26993, 645, 263, 6, 52, "Input",ExpressionUUID->"e49bfcd0-2790-4662-b260-1251fbf55656"],
-Cell[27259, 653, 740, 18, 73, "Input",ExpressionUUID->"7c31e5a1-c9d7-4139-bcbf-d567355f68ac"],
-Cell[28002, 673, 263, 6, 52, "Input",ExpressionUUID->"df0e2446-e8a9-4c0f-ade0-6243ed23f014"],
-Cell[28268, 681, 704, 19, 73, "Input",ExpressionUUID->"b7439b12-cb51-47a1-a158-9fa93f157c7d"],
-Cell[28975, 702, 266, 6, 52, "Input",ExpressionUUID->"ba9ecf49-d2ba-4baa-bc4a-47072a88303d"],
-Cell[29244, 710, 683, 20, 73, "Input",ExpressionUUID->"c1cc9921-c84f-4990-9a13-a36935fe08f6"],
-Cell[29930, 732, 256, 5, 30, "Input",ExpressionUUID->"b325e442-757f-4122-a460-9727e5485960"],
-Cell[30189, 739, 435, 9, 30, "Input",ExpressionUUID->"64072172-75c1-400c-b4be-a5a76fc27e9f"],
-Cell[30627, 750, 607, 13, 52, "Input",ExpressionUUID->"75ac93f2-7474-4481-b70f-8b3ab1fc4f2c"],
-Cell[CellGroupData[{
-Cell[31259, 767, 1092, 27, 115, "Input",ExpressionUUID->"df43f43c-f3df-4d31-8f47-e316129e404e"],
-Cell[CellGroupData[{
-Cell[32376, 798, 410, 7, 24, "Print",ExpressionUUID->"13bb3e84-1aad-451c-9470-217fab9f697f"],
-Cell[32789, 807, 412, 7, 24, "Print",ExpressionUUID->"c6fece5c-a585-4c90-ab33-806fa3705b71"]
-}, Open  ]],
-Cell[33216, 817, 156, 2, 34, "Output",ExpressionUUID->"829f296d-4387-479f-92bc-7a626dfe607c"]
-}, Open  ]],
-Cell[33387, 822, 427, 9, 52, "Input",ExpressionUUID->"0d3ce3b6-3c94-4932-a9ed-194cea17f2b9"],
-Cell[33817, 833, 1058, 24, 56, "Input",ExpressionUUID->"5a89f228-5332-4b40-9dd2-0e3e845f3970"],
-Cell[34878, 859, 290, 7, 30, "Input",ExpressionUUID->"3a874326-a732-49f9-bf3f-018de4fbf690"],
-Cell[35171, 868, 243, 6, 52, "Input",ExpressionUUID->"37adef6f-081e-487c-bd44-ab449560d571"],
-Cell[CellGroupData[{
-Cell[35439, 878, 998, 26, 115, "Input",ExpressionUUID->"f3c0843b-be94-4b77-89a7-a517bd2df868"],
-Cell[CellGroupData[{
-Cell[36462, 908, 247, 5, 24, "Print",ExpressionUUID->"e2ec887b-8f74-4c58-b508-8180d0a5ab39"],
-Cell[36712, 915, 247, 5, 24, "Print",ExpressionUUID->"37e2fbaf-ebf4-468b-9e07-64d66403941b"],
-Cell[36962, 922, 249, 5, 24, "Print",ExpressionUUID->"2e78dfd3-252a-4510-977f-b4f27ff8aa4b"],
-Cell[37214, 929, 247, 5, 24, "Print",ExpressionUUID->"a0e44cf6-a61f-449f-8a34-2c8ce9d266f3"],
-Cell[37464, 936, 247, 5, 24, "Print",ExpressionUUID->"a931e414-5259-4e72-acd7-dcee07599a82"],
-Cell[37714, 943, 247, 5, 24, "Print",ExpressionUUID->"5594c2a5-c197-4faf-9ffb-e7ba76cbc538"],
-Cell[37964, 950, 247, 5, 24, "Print",ExpressionUUID->"8ecef3ea-5555-4307-bcb5-45617481fea4"],
-Cell[38214, 957, 249, 5, 24, "Print",ExpressionUUID->"84060125-ad1a-4df3-8ce7-b2dbb52a255e"],
-Cell[38466, 964, 247, 5, 24, "Print",ExpressionUUID->"ba89847a-a4aa-4bc8-bbdf-fc4fe94626a9"],
-Cell[38716, 971, 247, 5, 24, "Print",ExpressionUUID->"4ad9a298-9033-4f95-ba31-e459488b2078"],
-Cell[38966, 978, 249, 5, 24, "Print",ExpressionUUID->"0f51e120-6ffe-40ed-90a9-16ffc4b8cd7b"],
-Cell[39218, 985, 249, 5, 24, "Print",ExpressionUUID->"55f10a7d-2dd2-42de-9c51-a8b42913981b"],
-Cell[39470, 992, 247, 5, 24, "Print",ExpressionUUID->"4f770da7-96cd-4cb8-a4d4-ac8321d712cd"],
-Cell[39720, 999, 247, 5, 24, "Print",ExpressionUUID->"649189dd-7c36-4840-a8f2-e90ccecbefc1"],
-Cell[39970, 1006, 247, 5, 24, "Print",ExpressionUUID->"69c8ff97-a48c-433d-a1af-293c970ff456"],
-Cell[40220, 1013, 247, 5, 24, "Print",ExpressionUUID->"e5097cc9-3fd7-4356-82cc-935a8fd99f37"],
-Cell[40470, 1020, 249, 5, 24, "Print",ExpressionUUID->"2a4fa068-31d2-42b2-8e27-9cd47a215300"],
-Cell[40722, 1027, 247, 5, 24, "Print",ExpressionUUID->"d4490842-541b-4159-b08b-37254e2f02ee"],
-Cell[40972, 1034, 247, 5, 24, "Print",ExpressionUUID->"0ae6d1ae-d897-40b7-83ac-03676d9405d7"],
-Cell[41222, 1041, 247, 5, 24, "Print",ExpressionUUID->"dd1f2688-2c0e-4ed6-aa9d-d7b634519be6"],
-Cell[41472, 1048, 246, 5, 24, "Print",ExpressionUUID->"28b3e938-3807-4e3b-9426-e708dcec15b0"],
-Cell[41721, 1055, 247, 5, 24, "Print",ExpressionUUID->"b68ca497-f2d7-495a-b577-5f5f7cc0b776"],
-Cell[41971, 1062, 247, 5, 24, "Print",ExpressionUUID->"d67f7e5b-0500-4072-a004-7f5c73342e3a"],
-Cell[42221, 1069, 247, 5, 24, "Print",ExpressionUUID->"ce08a793-ce51-4874-b4c7-0d99e3e47784"],
-Cell[42471, 1076, 247, 5, 24, "Print",ExpressionUUID->"fbbc2328-d686-4169-8a45-f2f916e0d9d2"],
-Cell[42721, 1083, 249, 5, 24, "Print",ExpressionUUID->"1cb44eb4-a5e3-4f09-a2dc-7ed04f4bcf1f"],
-Cell[42973, 1090, 247, 5, 24, "Print",ExpressionUUID->"622b5b19-decc-4b43-aecb-2a18b830f72c"],
-Cell[43223, 1097, 249, 5, 24, "Print",ExpressionUUID->"f6dc26ef-5813-4857-bfe4-c26b87bc1f7b"],
-Cell[43475, 1104, 247, 5, 24, "Print",ExpressionUUID->"2d3735df-91e7-4795-8dfd-6ed011d79107"],
-Cell[43725, 1111, 249, 5, 24, "Print",ExpressionUUID->"50fe601d-1b2b-4d2e-807b-1d249afe001e"],
-Cell[43977, 1118, 249, 5, 24, "Print",ExpressionUUID->"2fdfacbd-80ef-4c9a-b71f-e2cc0d9afe5e"],
-Cell[44229, 1125, 247, 5, 24, "Print",ExpressionUUID->"da85be8b-7972-4185-b906-d61dc785a9fd"],
-Cell[44479, 1132, 249, 5, 24, "Print",ExpressionUUID->"1c79d656-868a-4326-8d0a-2659691bbe1c"],
-Cell[44731, 1139, 247, 5, 24, "Print",ExpressionUUID->"efa41b92-f275-451a-ac92-19e0f0f8ac9d"],
-Cell[44981, 1146, 249, 5, 24, "Print",ExpressionUUID->"37e28f01-8fd3-4b48-b1b2-21df0a6ba950"],
-Cell[45233, 1153, 247, 5, 24, "Print",ExpressionUUID->"e844650c-6ee0-4b56-bc47-625127c32e2b"],
-Cell[45483, 1160, 249, 5, 24, "Print",ExpressionUUID->"29f611a5-3fe6-49ea-ba52-f894c5b962a5"],
-Cell[45735, 1167, 247, 5, 24, "Print",ExpressionUUID->"0d1b53d7-40d6-416f-87a6-b7b7a755e497"],
-Cell[45985, 1174, 249, 5, 24, "Print",ExpressionUUID->"dcd3c150-23ea-4f93-8005-bdd7678c1c03"],
-Cell[46237, 1181, 247, 5, 24, "Print",ExpressionUUID->"fe002903-a338-4ec6-ab39-693bb8f32eff"],
-Cell[46487, 1188, 249, 5, 24, "Print",ExpressionUUID->"34a03c80-9c4e-4fcb-b5ff-f3ff0cb1f223"],
-Cell[46739, 1195, 247, 5, 24, "Print",ExpressionUUID->"6cb0347b-630c-40c9-be5c-e11d214769dc"],
-Cell[46989, 1202, 249, 5, 24, "Print",ExpressionUUID->"0815e5f7-0b7c-4ceb-83e7-8cfc79826245"],
-Cell[47241, 1209, 247, 5, 24, "Print",ExpressionUUID->"92f96f11-b3a8-42e5-98e6-6fee3c21c719"],
-Cell[47491, 1216, 247, 5, 24, "Print",ExpressionUUID->"f5dc0de3-7380-4b70-b0d3-54def93aedd4"],
-Cell[47741, 1223, 249, 5, 24, "Print",ExpressionUUID->"a1701a3b-5ef3-47a9-95a2-d8e512233777"],
-Cell[47993, 1230, 247, 5, 24, "Print",ExpressionUUID->"4097feba-7377-4752-bb38-a0921cc43c71"],
-Cell[48243, 1237, 247, 5, 24, "Print",ExpressionUUID->"dd3dbaf1-61f0-453b-9b9a-36874206af99"],
-Cell[48493, 1244, 249, 5, 24, "Print",ExpressionUUID->"40b1ffb0-1c9e-42ee-9160-2930f36cdfaa"],
-Cell[48745, 1251, 245, 5, 24, "Print",ExpressionUUID->"191f384d-858c-4d19-92a6-40c39817d766"],
-Cell[48993, 1258, 246, 5, 24, "Print",ExpressionUUID->"0ad5044a-36b0-4d57-a03e-5b3764fa61c2"],
-Cell[49242, 1265, 247, 5, 24, "Print",ExpressionUUID->"777e0a58-0441-45aa-bb77-379de521b4ea"],
-Cell[49492, 1272, 247, 5, 24, "Print",ExpressionUUID->"26958225-f0de-4b0d-8418-1d0e741744db"],
-Cell[49742, 1279, 247, 5, 24, "Print",ExpressionUUID->"aa153189-1719-4ec3-a6c4-faeae6eb825e"],
-Cell[49992, 1286, 247, 5, 24, "Print",ExpressionUUID->"ad84b383-b8b6-4501-8354-e87c74b4fe47"],
-Cell[50242, 1293, 247, 5, 24, "Print",ExpressionUUID->"fb83c3a6-a8b1-4afc-8465-6456a8260a4f"],
-Cell[50492, 1300, 246, 5, 24, "Print",ExpressionUUID->"cd5fc969-87ec-41e9-8094-20cb832c0cf2"],
-Cell[50741, 1307, 247, 5, 24, "Print",ExpressionUUID->"8f96c2e7-a606-44fd-9bd3-787dbc3507ca"],
-Cell[50991, 1314, 247, 5, 24, "Print",ExpressionUUID->"1cb89dfe-425a-4c52-9b55-b4a6014c9852"],
-Cell[51241, 1321, 247, 5, 24, "Print",ExpressionUUID->"ef7f8635-cadc-4f02-9e3b-547e00252d2e"],
-Cell[51491, 1328, 247, 5, 24, "Print",ExpressionUUID->"4f79ee0d-259f-4d53-809b-53a89f702a3d"],
-Cell[51741, 1335, 247, 5, 24, "Print",ExpressionUUID->"886f8afa-5606-4059-8b26-d7d6af479013"],
-Cell[51991, 1342, 246, 5, 24, "Print",ExpressionUUID->"cd7e7c7e-efdb-40bf-ae88-e79e89aee24f"],
-Cell[52240, 1349, 247, 5, 24, "Print",ExpressionUUID->"f3dba259-3e90-4a75-828b-055cb49c87c8"],
-Cell[52490, 1356, 249, 5, 24, "Print",ExpressionUUID->"37b1dcf0-6b49-4eb5-b721-89fc56a828df"],
-Cell[52742, 1363, 247, 5, 24, "Print",ExpressionUUID->"5f7c8d38-0599-40f0-9972-0a6d5997ecbf"],
-Cell[52992, 1370, 247, 5, 24, "Print",ExpressionUUID->"69c00823-96b0-4daa-9990-36f08fb6ce56"],
-Cell[53242, 1377, 247, 5, 24, "Print",ExpressionUUID->"fb97acd4-1d96-4a85-8bc6-3305a839a3da"],
-Cell[53492, 1384, 247, 5, 24, "Print",ExpressionUUID->"43bad5b4-c421-419d-9915-1b67c66f1036"],
-Cell[53742, 1391, 247, 5, 24, "Print",ExpressionUUID->"f5846949-e47a-4e77-914f-0a8f50e06332"],
-Cell[53992, 1398, 247, 5, 24, "Print",ExpressionUUID->"6a5ef075-fa3d-4ad6-b501-a5cb532fd6f5"],
-Cell[54242, 1405, 247, 5, 24, "Print",ExpressionUUID->"ee5772c0-100c-4ff4-83b0-096fcfc8e2a6"],
-Cell[54492, 1412, 249, 5, 24, "Print",ExpressionUUID->"fec2f95e-20ad-473c-80c7-bfbc2b46c85f"]
-}, Closed]]
-}, Open  ]],
-Cell[CellGroupData[{
-Cell[54790, 1423, 414, 10, 52, "Input",ExpressionUUID->"083fb79c-daba-4277-b94e-78bed80412be"],
-Cell[55207, 1435, 709, 19, 46, "Output",ExpressionUUID->"21437e94-a2d0-4030-9577-1fb730a2c01b"]
-}, Open  ]],
-Cell[55931, 1457, 910, 22, 56, "Input",ExpressionUUID->"c9749ffe-5ab8-4c9a-aef7-8af3843d725b"],
-Cell[56844, 1481, 290, 7, 30, "Input",ExpressionUUID->"2d6ff57e-8bdd-4f5e-9772-e77bcbd1d8d0"],
-Cell[57137, 1490, 147, 3, 52, "Input",ExpressionUUID->"2239b8d8-532e-4c08-ac3b-e377a166b460"],
-Cell[57287, 1495, 379, 8, 30, "Input",ExpressionUUID->"e40759ab-7c04-4bf0-a25e-f80786106946"],
-Cell[57669, 1505, 379, 8, 52, "Input",ExpressionUUID->"007158c3-a206-4cab-88ec-886b70f30fed"],
-Cell[CellGroupData[{
-Cell[58073, 1517, 268, 5, 30, "Input",ExpressionUUID->"743fd8ff-17f3-49f2-85d6-506c6d73e5ad"],
-Cell[58344, 1524, 12097, 315, 213, "Output",ExpressionUUID->"0fce6bb0-45fe-4e6c-a361-d7b5261cb38e"]
+Cell[1764, 50, 637, 12, 94, "Input",ExpressionUUID->"aa6e76d2-ec10-49c0-b6e0-1dd4d91b1a18"],
+Cell[2404, 64, 1761, 27, 101, "Print",ExpressionUUID->"40532633-1757-46aa-ba73-df4718ca675e"]
 }, Open  ]],
+Cell[4180, 94, 1329, 31, 94, "Input",ExpressionUUID->"1c12ba0e-fd6c-4b7e-8de6-2b784fa72d92"],
+Cell[5512, 127, 10661, 257, 1165, "Input",ExpressionUUID->"a5c5e12e-157e-4719-b09d-930d037e0d1b"],
+Cell[16176, 386, 371, 6, 30, "Input",ExpressionUUID->"7741718d-edbc-49e5-a241-fb84c7107f7d"],
+Cell[16550, 394, 1721, 48, 157, "Input",ExpressionUUID->"9fe10d31-521c-4fe7-844e-895b7b5e190a"],
+Cell[18274, 444, 2352, 56, 178, "Input",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
+Cell[20629, 502, 1618, 39, 136, "Input",ExpressionUUID->"476a37c6-482c-4f61-9ced-5d80a625711e"],
+Cell[22250, 543, 177, 3, 30, "Input",ExpressionUUID->"705b77c9-9d55-4c91-a174-596c11435d8d"],
+Cell[22430, 548, 3796, 101, 451, "Input",ExpressionUUID->"fd0c50cb-5e3d-46b2-a09e-275f25c954a6"],
+Cell[26229, 651, 147, 3, 52, "Input",ExpressionUUID->"2239b8d8-532e-4c08-ac3b-e377a166b460"],
+Cell[26379, 656, 379, 8, 30, "Input",ExpressionUUID->"e40759ab-7c04-4bf0-a25e-f80786106946"],
+Cell[26761, 666, 1703, 50, 220, "Input",ExpressionUUID->"007158c3-a206-4cab-88ec-886b70f30fed"],
+Cell[28467, 718, 249, 4, 30, "Input",ExpressionUUID->"743fd8ff-17f3-49f2-85d6-506c6d73e5ad"],
 Cell[CellGroupData[{
-Cell[70478, 1844, 260, 4, 30, "Input",ExpressionUUID->"f774e49f-9f49-4e9e-8986-5d0680aa1203"],
-Cell[70741, 1850, 173, 2, 34, "Output",ExpressionUUID->"1a69893c-2615-4d54-91e8-335f2abb5de6"]
+Cell[28741, 726, 200, 4, 30, "Input",ExpressionUUID->"f774e49f-9f49-4e9e-8986-5d0680aa1203"],
+Cell[28944, 732, 173, 2, 34, "Output",ExpressionUUID->"1a69893c-2615-4d54-91e8-335f2abb5de6"]
 }, Open  ]],
-Cell[70929, 1855, 278, 5, 136, "Input",ExpressionUUID->"9a42fe37-6411-44bf-809a-1046a3483503"],
-Cell[71210, 1862, 294, 6, 30, "Input",ExpressionUUID->"9e2a44fe-0bb9-4f67-9e8b-da5c10ecf6b1"],
+Cell[29132, 737, 278, 5, 136, "Input",ExpressionUUID->"9a42fe37-6411-44bf-809a-1046a3483503"],
+Cell[29413, 744, 294, 6, 30, "Input",ExpressionUUID->"9e2a44fe-0bb9-4f67-9e8b-da5c10ecf6b1"],
 Cell[CellGroupData[{
-Cell[71529, 1872, 182, 2, 30, "Input",ExpressionUUID->"f396c3bc-ea1b-44d3-a6cc-f7fecc0fffe5"],
-Cell[71714, 1876, 12116, 317, 213, "Output",ExpressionUUID->"1d1b26d3-3d5a-4f24-a113-21f43e2027cf"]
+Cell[29732, 754, 182, 2, 30, "Input",ExpressionUUID->"f396c3bc-ea1b-44d3-a6cc-f7fecc0fffe5"],
+Cell[29917, 758, 12116, 317, 213, "Output",ExpressionUUID->"1d1b26d3-3d5a-4f24-a113-21f43e2027cf"]
 }, Open  ]],
-Cell[83845, 2196, 812, 19, 94, "Input",ExpressionUUID->"0484a78b-7482-4457-ac3e-5762b8c80c69"],
+Cell[42048, 1078, 812, 19, 94, "Input",ExpressionUUID->"0484a78b-7482-4457-ac3e-5762b8c80c69"],
 Cell[CellGroupData[{
-Cell[84682, 2219, 247, 4, 30, "Input",ExpressionUUID->"6f58dd70-ec76-4b2e-8d7d-ae9f5adae4ca"],
-Cell[84932, 2225, 11414, 300, 191, "Output",ExpressionUUID->"b4f39a2e-5da3-4756-9d30-b57a024860f7"]
+Cell[42885, 1101, 247, 4, 30, "Input",ExpressionUUID->"6f58dd70-ec76-4b2e-8d7d-ae9f5adae4ca"],
+Cell[43135, 1107, 11414, 300, 191, "Output",ExpressionUUID->"b4f39a2e-5da3-4756-9d30-b57a024860f7"]
 }, Open  ]],
-Cell[96361, 2528, 414, 9, 30, "Input",ExpressionUUID->"6dc8539a-b6fb-45ed-bf01-82aab57aef98"],
+Cell[54564, 1410, 414, 9, 30, "Input",ExpressionUUID->"6dc8539a-b6fb-45ed-bf01-82aab57aef98"],
 Cell[CellGroupData[{
-Cell[96800, 2541, 236, 4, 30, "Input",ExpressionUUID->"cb0ca33d-b1f5-4703-8d8e-8c263a31064a"],
-Cell[97039, 2547, 11410, 300, 196, "Output",ExpressionUUID->"1d5fa8ad-833f-46d5-a1dc-a4179db033a8"]
+Cell[55003, 1423, 236, 4, 30, "Input",ExpressionUUID->"cb0ca33d-b1f5-4703-8d8e-8c263a31064a"],
+Cell[55242, 1429, 11410, 300, 196, "Output",ExpressionUUID->"1d5fa8ad-833f-46d5-a1dc-a4179db033a8"]
 }, Open  ]],
-Cell[108464, 2850, 417, 9, 30, "Input",ExpressionUUID->"5eff98d5-542a-4fb2-8a57-8b5bb386d93b"],
+Cell[66667, 1732, 417, 9, 30, "Input",ExpressionUUID->"5eff98d5-542a-4fb2-8a57-8b5bb386d93b"],
 Cell[CellGroupData[{
-Cell[108906, 2863, 230, 4, 30, "Input",ExpressionUUID->"6b8a882a-c4d7-48c9-bd9a-89d690e1775f"],
-Cell[109139, 2869, 11431, 302, 194, "Output",ExpressionUUID->"0dd69f7f-556b-4cf0-903b-9a63338f9b78"]
+Cell[67109, 1745, 230, 4, 30, "Input",ExpressionUUID->"6b8a882a-c4d7-48c9-bd9a-89d690e1775f"],
+Cell[67342, 1751, 11431, 302, 194, "Output",ExpressionUUID->"0dd69f7f-556b-4cf0-903b-9a63338f9b78"]
 }, Open  ]],
-Cell[120585, 3174, 413, 9, 30, "Input",ExpressionUUID->"786a397e-8276-4b59-936c-1058b86fa2b4"],
+Cell[78788, 2056, 413, 9, 30, "Input",ExpressionUUID->"786a397e-8276-4b59-936c-1058b86fa2b4"],
 Cell[CellGroupData[{
-Cell[121023, 3187, 232, 4, 30, "Input",ExpressionUUID->"cac28fd3-e795-47f1-a77e-e5a2fe196f33"],
-Cell[121258, 3193, 11631, 306, 199, "Output",ExpressionUUID->"fdf26c39-191c-4b8f-8ed6-4f24a3f9beeb"]
+Cell[79226, 2069, 232, 4, 30, "Input",ExpressionUUID->"cac28fd3-e795-47f1-a77e-e5a2fe196f33"],
+Cell[79461, 2075, 11631, 306, 199, "Output",ExpressionUUID->"fdf26c39-191c-4b8f-8ed6-4f24a3f9beeb"]
 }, Open  ]],
-Cell[132904, 3502, 462, 11, 52, "Input",ExpressionUUID->"c7feecf3-f47a-423b-924d-e06efe08d9d2"],
-Cell[133369, 3515, 419, 9, 157, "Input",ExpressionUUID->"7e7b9f75-0ed1-4382-a7dd-99907c1473ac"],
+Cell[91107, 2384, 462, 11, 52, "Input",ExpressionUUID->"c7feecf3-f47a-423b-924d-e06efe08d9d2"],
+Cell[91572, 2397, 419, 9, 157, "Input",ExpressionUUID->"7e7b9f75-0ed1-4382-a7dd-99907c1473ac"],
 Cell[CellGroupData[{
-Cell[133813, 3528, 248, 4, 30, "Input",ExpressionUUID->"ae98646f-6aec-43fc-bc4c-76b34b9d8371"],
-Cell[134064, 3534, 2181, 62, 146, "Output",ExpressionUUID->"b03d30ad-4939-46cf-b5fe-8b765a9784a2"]
+Cell[92016, 2410, 248, 4, 30, "Input",ExpressionUUID->"ae98646f-6aec-43fc-bc4c-76b34b9d8371"],
+Cell[92267, 2416, 2181, 62, 146, "Output",ExpressionUUID->"b03d30ad-4939-46cf-b5fe-8b765a9784a2"]
 }, Open  ]],
-Cell[136260, 3599, 1054, 29, 115, "Input",ExpressionUUID->"24b1d6d5-8138-410c-bad0-4688d4069032"],
-Cell[137317, 3630, 396, 9, 136, "Input",ExpressionUUID->"1f278cce-b737-471d-abb8-571bd986d464"],
-Cell[137716, 3641, 265, 5, 30, "Input",ExpressionUUID->"9a2e8cfd-31b0-4513-b860-e5717141a96f"],
-Cell[137984, 3648, 851, 23, 73, "Input",ExpressionUUID->"f2581317-15ac-431d-858d-1506de0ee6ea"],
-Cell[138838, 3673, 239, 5, 30, "Input",ExpressionUUID->"935c66bf-fd6a-4022-88ef-839267449906"],
-Cell[139080, 3680, 255, 5, 115, "Input",ExpressionUUID->"e4eda86f-c0c1-4ed1-b09c-a197bbc299c9"],
-Cell[139338, 3687, 1202, 32, 136, "Input",ExpressionUUID->"e7549059-0b03-41c9-afd1-97986dde3359"],
-Cell[140543, 3721, 154, 3, 30, "Input",ExpressionUUID->"75c75df4-ee72-49af-9630-1cf0eef74f43"],
-Cell[140700, 3726, 128, 3, 30, "Input",ExpressionUUID->"a4013e44-a682-4c70-a84f-f4695f7dd230"],
-Cell[140831, 3731, 238, 5, 30, "Input",ExpressionUUID->"73dfc6d7-5c31-463e-8864-6b5bef17b11d"],
+Cell[94463, 2481, 1054, 29, 115, "Input",ExpressionUUID->"24b1d6d5-8138-410c-bad0-4688d4069032"],
+Cell[95520, 2512, 396, 9, 136, "Input",ExpressionUUID->"1f278cce-b737-471d-abb8-571bd986d464"],
+Cell[95919, 2523, 265, 5, 30, "Input",ExpressionUUID->"9a2e8cfd-31b0-4513-b860-e5717141a96f"],
+Cell[96187, 2530, 851, 23, 73, "Input",ExpressionUUID->"f2581317-15ac-431d-858d-1506de0ee6ea"],
+Cell[97041, 2555, 239, 5, 30, "Input",ExpressionUUID->"935c66bf-fd6a-4022-88ef-839267449906"],
+Cell[97283, 2562, 255, 5, 115, "Input",ExpressionUUID->"e4eda86f-c0c1-4ed1-b09c-a197bbc299c9"],
+Cell[97541, 2569, 1202, 32, 136, "Input",ExpressionUUID->"e7549059-0b03-41c9-afd1-97986dde3359"],
+Cell[98746, 2603, 154, 3, 30, "Input",ExpressionUUID->"75c75df4-ee72-49af-9630-1cf0eef74f43"],
+Cell[98903, 2608, 128, 3, 30, "Input",ExpressionUUID->"a4013e44-a682-4c70-a84f-f4695f7dd230"],
+Cell[99034, 2613, 238, 5, 30, "Input",ExpressionUUID->"73dfc6d7-5c31-463e-8864-6b5bef17b11d"],
 Cell[CellGroupData[{
-Cell[141094, 3740, 524, 14, 30, "Input",ExpressionUUID->"b4100299-10f3-4c3c-90b5-db96319fb7d9"],
-Cell[141621, 3756, 3541, 105, 133, "Output",ExpressionUUID->"227ac9fd-122f-4bdd-8ce6-0421fc3101b9"]
+Cell[99297, 2622, 524, 14, 30, "Input",ExpressionUUID->"b4100299-10f3-4c3c-90b5-db96319fb7d9"],
+Cell[99824, 2638, 3541, 105, 133, "Output",ExpressionUUID->"227ac9fd-122f-4bdd-8ce6-0421fc3101b9"]
 }, Open  ]],
-Cell[145177, 3864, 636, 18, 52, "Input",ExpressionUUID->"d027658a-37f9-489d-a307-4d535ae073b9"],
+Cell[103380, 2746, 636, 18, 52, "Input",ExpressionUUID->"d027658a-37f9-489d-a307-4d535ae073b9"],
 Cell[CellGroupData[{
-Cell[145838, 3886, 203, 3, 30, "Input",ExpressionUUID->"55e4d6af-838f-45bf-ab25-da03c1c1d848"],
-Cell[146044, 3891, 3741, 113, 161, "Output",ExpressionUUID->"f7adf7fb-3d44-404a-b9d8-8367ef825cc7"]
+Cell[104041, 2768, 203, 3, 30, "Input",ExpressionUUID->"55e4d6af-838f-45bf-ab25-da03c1c1d848"],
+Cell[104247, 2773, 3741, 113, 161, "Output",ExpressionUUID->"f7adf7fb-3d44-404a-b9d8-8367ef825cc7"]
 }, Open  ]],
-Cell[149800, 4007, 328, 6, 115, "Input",ExpressionUUID->"a9b9ca57-f825-4517-8b39-8ebebaffad8a"],
-Cell[150131, 4015, 1735, 50, 136, "Input",ExpressionUUID->"f261cfc3-9a94-4830-9195-aa48c3328d0f"],
-Cell[151869, 4067, 1023, 26, 178, "Input",ExpressionUUID->"5fb9542c-66c2-4b59-b6c0-3d1e3db1842f"],
-Cell[152895, 4095, 195, 4, 30, "Input",ExpressionUUID->"ce77b5bd-ebce-4c42-9263-53392240007e"],
-Cell[153093, 4101, 1358, 37, 115, "Input",ExpressionUUID->"9997d1a8-9d83-430a-8554-6cfc2a974c27"],
-Cell[154454, 4140, 1818, 48, 178, "Input",ExpressionUUID->"3e8bf30c-17cd-43d9-b2c2-32aaac3fabf4"],
-Cell[156275, 4190, 906, 22, 115, "Input",ExpressionUUID->"0faeac76-b8a2-41ff-a322-8a7cc20f5cdc"],
+Cell[108003, 2889, 328, 6, 115, "Input",ExpressionUUID->"a9b9ca57-f825-4517-8b39-8ebebaffad8a"],
+Cell[108334, 2897, 1735, 50, 136, "Input",ExpressionUUID->"f261cfc3-9a94-4830-9195-aa48c3328d0f"],
+Cell[110072, 2949, 1023, 26, 178, "Input",ExpressionUUID->"5fb9542c-66c2-4b59-b6c0-3d1e3db1842f"],
+Cell[111098, 2977, 195, 4, 30, "Input",ExpressionUUID->"ce77b5bd-ebce-4c42-9263-53392240007e"],
+Cell[111296, 2983, 1358, 37, 115, "Input",ExpressionUUID->"9997d1a8-9d83-430a-8554-6cfc2a974c27"],
+Cell[112657, 3022, 1818, 48, 178, "Input",ExpressionUUID->"3e8bf30c-17cd-43d9-b2c2-32aaac3fabf4"],
+Cell[114478, 3072, 906, 22, 115, "Input",ExpressionUUID->"0faeac76-b8a2-41ff-a322-8a7cc20f5cdc"],
 Cell[CellGroupData[{
-Cell[157206, 4216, 547, 11, 52, "Input",ExpressionUUID->"0aeaadd3-5332-4530-a274-2d257367f236"],
+Cell[115409, 3098, 547, 11, 52, "Input",ExpressionUUID->"0aeaadd3-5332-4530-a274-2d257367f236"],
 Cell[CellGroupData[{
-Cell[157778, 4231, 196, 4, 24, "Print",ExpressionUUID->"941d2971-0756-46af-bbfa-35b438dd0e63"],
-Cell[157977, 4237, 198, 4, 24, "Print",ExpressionUUID->"7f9fc3c9-6ddc-47d5-af72-107027ebb276"],
-Cell[158178, 4243, 196, 4, 24, "Print",ExpressionUUID->"da3f0120-fdef-4857-aa25-2ee29cd3ae1a"],
-Cell[158377, 4249, 198, 4, 24, "Print",ExpressionUUID->"b6c871c9-430f-4950-8ffa-bdb5d1f09ffe"],
-Cell[158578, 4255, 196, 4, 24, "Print",ExpressionUUID->"08b8650b-700a-4a81-98cd-762915822ac6"],
-Cell[158777, 4261, 196, 4, 24, "Print",ExpressionUUID->"dc323011-3d7c-4c71-98f9-fc651ab59bcd"],
-Cell[158976, 4267, 196, 4, 24, "Print",ExpressionUUID->"dcbc9173-996e-4615-8934-be1437da9dbc"],
-Cell[159175, 4273, 196, 4, 24, "Print",ExpressionUUID->"5235f72f-1e09-460f-a972-86c8776de7bf"],
-Cell[159374, 4279, 196, 4, 24, "Print",ExpressionUUID->"51d0dc87-3144-4105-a8ae-a650d049a319"],
-Cell[159573, 4285, 197, 4, 24, "Print",ExpressionUUID->"61f11d61-f008-44dc-96d0-db1dad10327b"],
-Cell[159773, 4291, 199, 4, 24, "Print",ExpressionUUID->"f3db9187-5fb7-4179-9d5d-fee11f151b8a"],
-Cell[159975, 4297, 197, 4, 24, "Print",ExpressionUUID->"55143390-2218-4242-8577-41b5b68bf26f"],
-Cell[160175, 4303, 197, 4, 24, "Print",ExpressionUUID->"de5e700a-5013-445e-b472-25d383ca5cf3"],
-Cell[160375, 4309, 197, 4, 24, "Print",ExpressionUUID->"04316d54-f297-424b-9b49-acfd45d21630"],
-Cell[160575, 4315, 199, 4, 24, "Print",ExpressionUUID->"017b3ad1-2b25-45a4-8b9d-111686161236"],
-Cell[160777, 4321, 199, 4, 24, "Print",ExpressionUUID->"cf381b0c-ac88-40ab-b951-874fcfdfa6c6"],
-Cell[160979, 4327, 197, 4, 24, "Print",ExpressionUUID->"67e161ed-8390-46fa-a181-f56c98936077"],
-Cell[161179, 4333, 197, 4, 24, "Print",ExpressionUUID->"12eddb76-c821-45d5-9119-d5d357f2d4eb"],
-Cell[161379, 4339, 197, 4, 24, "Print",ExpressionUUID->"f42cca31-6f52-49bc-b356-94d57c78fd27"],
-Cell[161579, 4345, 197, 4, 24, "Print",ExpressionUUID->"812113fc-a308-46fd-b058-9e34214fc722"],
-Cell[161779, 4351, 197, 4, 24, "Print",ExpressionUUID->"5f1deb06-8268-41a5-84bd-e5a8ada699a5"],
-Cell[161979, 4357, 199, 4, 24, "Print",ExpressionUUID->"28c127e4-f366-4435-9db7-8b114a82b320"],
-Cell[162181, 4363, 199, 4, 24, "Print",ExpressionUUID->"db1f8f22-c844-4e1e-892c-73ca3a41eaee"],
-Cell[162383, 4369, 197, 4, 24, "Print",ExpressionUUID->"ae692077-c31d-43f0-a099-c52e179f8dea"],
-Cell[162583, 4375, 196, 4, 24, "Print",ExpressionUUID->"8f0af9a8-1bc7-4b92-a518-3b7fb75be3ae"],
-Cell[162782, 4381, 197, 4, 24, "Print",ExpressionUUID->"60b61b67-6c61-4599-a20d-463c308eb270"],
-Cell[162982, 4387, 197, 4, 24, "Print",ExpressionUUID->"60c27d5d-d770-45b4-8b6e-611a3c03ef79"],
-Cell[163182, 4393, 197, 4, 24, "Print",ExpressionUUID->"e5c01ae9-55fc-47f8-9c3d-6f54b4b00756"],
-Cell[163382, 4399, 196, 4, 24, "Print",ExpressionUUID->"7f11c8de-f7aa-4313-ab85-f0bc8404662d"],
-Cell[163581, 4405, 199, 4, 24, "Print",ExpressionUUID->"9e154613-6e9c-4d11-8ddd-6170705528ab"],
-Cell[163783, 4411, 197, 4, 24, "Print",ExpressionUUID->"2f8e02d9-a5b4-4bd9-b9d9-aec02153dd7c"],
-Cell[163983, 4417, 199, 4, 24, "Print",ExpressionUUID->"650def7c-a65f-44fb-811b-1fa0b5a45d15"],
-Cell[164185, 4423, 199, 4, 24, "Print",ExpressionUUID->"6474532b-9599-4489-88db-58d38314ab6f"],
-Cell[164387, 4429, 197, 4, 24, "Print",ExpressionUUID->"226a40c4-f169-42d2-8ab6-1f67a2f873ea"],
-Cell[164587, 4435, 196, 4, 24, "Print",ExpressionUUID->"a1944f0f-52a8-49d8-b9c3-20fec2f3235a"],
-Cell[164786, 4441, 197, 4, 24, "Print",ExpressionUUID->"3b4b9b10-ab7e-4de6-ab0f-e0018abf925b"],
-Cell[164986, 4447, 196, 4, 24, "Print",ExpressionUUID->"6c480e69-9121-408a-8dec-f908c61e8d42"],
-Cell[165185, 4453, 199, 4, 24, "Print",ExpressionUUID->"cba40a3e-274e-4ca6-acca-4f9780f8640b"],
-Cell[165387, 4459, 197, 4, 24, "Print",ExpressionUUID->"e62616bb-5c74-4eeb-afa2-bb439d81b80e"],
-Cell[165587, 4465, 197, 4, 24, "Print",ExpressionUUID->"52e54f32-ac58-4414-93fa-68fcf6f14698"],
-Cell[165787, 4471, 197, 4, 24, "Print",ExpressionUUID->"50d0b363-2b99-4f39-bfc0-29a59ae13c83"],
-Cell[165987, 4477, 197, 4, 24, "Print",ExpressionUUID->"5dca03fa-6242-4056-b5c8-360525f873d4"],
-Cell[166187, 4483, 197, 4, 24, "Print",ExpressionUUID->"91a05c83-f424-4d73-8df9-fd9365c15c65"],
-Cell[166387, 4489, 197, 4, 24, "Print",ExpressionUUID->"e35ff97f-1b31-4eec-84d3-b936608c353c"],
-Cell[166587, 4495, 197, 4, 24, "Print",ExpressionUUID->"45f0eca5-0ad3-474d-8922-cc6c393a259f"]
+Cell[115981, 3113, 196, 4, 24, "Print",ExpressionUUID->"941d2971-0756-46af-bbfa-35b438dd0e63"],
+Cell[116180, 3119, 198, 4, 24, "Print",ExpressionUUID->"7f9fc3c9-6ddc-47d5-af72-107027ebb276"],
+Cell[116381, 3125, 196, 4, 24, "Print",ExpressionUUID->"da3f0120-fdef-4857-aa25-2ee29cd3ae1a"],
+Cell[116580, 3131, 198, 4, 24, "Print",ExpressionUUID->"b6c871c9-430f-4950-8ffa-bdb5d1f09ffe"],
+Cell[116781, 3137, 196, 4, 24, "Print",ExpressionUUID->"08b8650b-700a-4a81-98cd-762915822ac6"],
+Cell[116980, 3143, 196, 4, 24, "Print",ExpressionUUID->"dc323011-3d7c-4c71-98f9-fc651ab59bcd"],
+Cell[117179, 3149, 196, 4, 24, "Print",ExpressionUUID->"dcbc9173-996e-4615-8934-be1437da9dbc"],
+Cell[117378, 3155, 196, 4, 24, "Print",ExpressionUUID->"5235f72f-1e09-460f-a972-86c8776de7bf"],
+Cell[117577, 3161, 196, 4, 24, "Print",ExpressionUUID->"51d0dc87-3144-4105-a8ae-a650d049a319"],
+Cell[117776, 3167, 197, 4, 24, "Print",ExpressionUUID->"61f11d61-f008-44dc-96d0-db1dad10327b"],
+Cell[117976, 3173, 199, 4, 24, "Print",ExpressionUUID->"f3db9187-5fb7-4179-9d5d-fee11f151b8a"],
+Cell[118178, 3179, 197, 4, 24, "Print",ExpressionUUID->"55143390-2218-4242-8577-41b5b68bf26f"],
+Cell[118378, 3185, 197, 4, 24, "Print",ExpressionUUID->"de5e700a-5013-445e-b472-25d383ca5cf3"],
+Cell[118578, 3191, 197, 4, 24, "Print",ExpressionUUID->"04316d54-f297-424b-9b49-acfd45d21630"],
+Cell[118778, 3197, 199, 4, 24, "Print",ExpressionUUID->"017b3ad1-2b25-45a4-8b9d-111686161236"],
+Cell[118980, 3203, 199, 4, 24, "Print",ExpressionUUID->"cf381b0c-ac88-40ab-b951-874fcfdfa6c6"],
+Cell[119182, 3209, 197, 4, 24, "Print",ExpressionUUID->"67e161ed-8390-46fa-a181-f56c98936077"],
+Cell[119382, 3215, 197, 4, 24, "Print",ExpressionUUID->"12eddb76-c821-45d5-9119-d5d357f2d4eb"],
+Cell[119582, 3221, 197, 4, 24, "Print",ExpressionUUID->"f42cca31-6f52-49bc-b356-94d57c78fd27"],
+Cell[119782, 3227, 197, 4, 24, "Print",ExpressionUUID->"812113fc-a308-46fd-b058-9e34214fc722"],
+Cell[119982, 3233, 197, 4, 24, "Print",ExpressionUUID->"5f1deb06-8268-41a5-84bd-e5a8ada699a5"],
+Cell[120182, 3239, 199, 4, 24, "Print",ExpressionUUID->"28c127e4-f366-4435-9db7-8b114a82b320"],
+Cell[120384, 3245, 199, 4, 24, "Print",ExpressionUUID->"db1f8f22-c844-4e1e-892c-73ca3a41eaee"],
+Cell[120586, 3251, 197, 4, 24, "Print",ExpressionUUID->"ae692077-c31d-43f0-a099-c52e179f8dea"],
+Cell[120786, 3257, 196, 4, 24, "Print",ExpressionUUID->"8f0af9a8-1bc7-4b92-a518-3b7fb75be3ae"],
+Cell[120985, 3263, 197, 4, 24, "Print",ExpressionUUID->"60b61b67-6c61-4599-a20d-463c308eb270"],
+Cell[121185, 3269, 197, 4, 24, "Print",ExpressionUUID->"60c27d5d-d770-45b4-8b6e-611a3c03ef79"],
+Cell[121385, 3275, 197, 4, 24, "Print",ExpressionUUID->"e5c01ae9-55fc-47f8-9c3d-6f54b4b00756"],
+Cell[121585, 3281, 196, 4, 24, "Print",ExpressionUUID->"7f11c8de-f7aa-4313-ab85-f0bc8404662d"],
+Cell[121784, 3287, 199, 4, 24, "Print",ExpressionUUID->"9e154613-6e9c-4d11-8ddd-6170705528ab"],
+Cell[121986, 3293, 197, 4, 24, "Print",ExpressionUUID->"2f8e02d9-a5b4-4bd9-b9d9-aec02153dd7c"],
+Cell[122186, 3299, 199, 4, 24, "Print",ExpressionUUID->"650def7c-a65f-44fb-811b-1fa0b5a45d15"],
+Cell[122388, 3305, 199, 4, 24, "Print",ExpressionUUID->"6474532b-9599-4489-88db-58d38314ab6f"],
+Cell[122590, 3311, 197, 4, 24, "Print",ExpressionUUID->"226a40c4-f169-42d2-8ab6-1f67a2f873ea"],
+Cell[122790, 3317, 196, 4, 24, "Print",ExpressionUUID->"a1944f0f-52a8-49d8-b9c3-20fec2f3235a"],
+Cell[122989, 3323, 197, 4, 24, "Print",ExpressionUUID->"3b4b9b10-ab7e-4de6-ab0f-e0018abf925b"],
+Cell[123189, 3329, 196, 4, 24, "Print",ExpressionUUID->"6c480e69-9121-408a-8dec-f908c61e8d42"],
+Cell[123388, 3335, 199, 4, 24, "Print",ExpressionUUID->"cba40a3e-274e-4ca6-acca-4f9780f8640b"],
+Cell[123590, 3341, 197, 4, 24, "Print",ExpressionUUID->"e62616bb-5c74-4eeb-afa2-bb439d81b80e"],
+Cell[123790, 3347, 197, 4, 24, "Print",ExpressionUUID->"52e54f32-ac58-4414-93fa-68fcf6f14698"],
+Cell[123990, 3353, 197, 4, 24, "Print",ExpressionUUID->"50d0b363-2b99-4f39-bfc0-29a59ae13c83"],
+Cell[124190, 3359, 197, 4, 24, "Print",ExpressionUUID->"5dca03fa-6242-4056-b5c8-360525f873d4"],
+Cell[124390, 3365, 197, 4, 24, "Print",ExpressionUUID->"91a05c83-f424-4d73-8df9-fd9365c15c65"],
+Cell[124590, 3371, 197, 4, 24, "Print",ExpressionUUID->"e35ff97f-1b31-4eec-84d3-b936608c353c"],
+Cell[124790, 3377, 197, 4, 24, "Print",ExpressionUUID->"45f0eca5-0ad3-474d-8922-cc6c393a259f"]
 }, Open  ]],
-Cell[166799, 4502, 196, 3, 34, "Output",ExpressionUUID->"cfcdfb24-b305-466a-a1bb-a332ab352a9e"]
+Cell[125002, 3384, 196, 3, 34, "Output",ExpressionUUID->"cfcdfb24-b305-466a-a1bb-a332ab352a9e"]
 }, Closed]],
-Cell[167010, 4508, 371, 8, 26, "Input",ExpressionUUID->"09576c11-deed-4e65-b168-19d328941f7e"],
-Cell[167384, 4518, 1052, 28, 115, "Input",ExpressionUUID->"e9cb917d-6bce-4b94-a047-15b919e9e4cc"],
-Cell[168439, 4548, 883, 22, 115, "Input",ExpressionUUID->"58da36ab-d8d7-464f-a677-c4ffb3b43015"],
+Cell[125213, 3390, 371, 8, 26, "Input",ExpressionUUID->"09576c11-deed-4e65-b168-19d328941f7e"],
+Cell[125587, 3400, 1052, 28, 115, "Input",ExpressionUUID->"e9cb917d-6bce-4b94-a047-15b919e9e4cc"],
+Cell[126642, 3430, 883, 22, 115, "Input",ExpressionUUID->"58da36ab-d8d7-464f-a677-c4ffb3b43015"],
 Cell[CellGroupData[{
-Cell[169347, 4574, 441, 10, 30, "Input",ExpressionUUID->"93d22a91-7738-43f2-ae38-e21755ca22f1"],
-Cell[169791, 4586, 515, 11, 42, "Message",ExpressionUUID->"dc04a919-7e52-45e2-bb44-a344b5d1d308"],
-Cell[170309, 4599, 513, 11, 42, "Message",ExpressionUUID->"99a74ed9-9abc-451d-8242-fd4078fd5891"],
-Cell[170825, 4612, 515, 11, 42, "Message",ExpressionUUID->"1070ad89-c66d-4906-aa54-fd4ac95964d8"],
-Cell[171343, 4625, 461, 10, 24, "Message",ExpressionUUID->"9dbf4032-8c2f-4bba-9001-aa2649499b6f"]
+Cell[127550, 3456, 441, 10, 30, "Input",ExpressionUUID->"93d22a91-7738-43f2-ae38-e21755ca22f1"],
+Cell[127994, 3468, 515, 11, 42, "Message",ExpressionUUID->"dc04a919-7e52-45e2-bb44-a344b5d1d308"],
+Cell[128512, 3481, 513, 11, 42, "Message",ExpressionUUID->"99a74ed9-9abc-451d-8242-fd4078fd5891"],
+Cell[129028, 3494, 515, 11, 42, "Message",ExpressionUUID->"1070ad89-c66d-4906-aa54-fd4ac95964d8"],
+Cell[129546, 3507, 461, 10, 24, "Message",ExpressionUUID->"9dbf4032-8c2f-4bba-9001-aa2649499b6f"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[171841, 4640, 154, 3, 30, "Input",ExpressionUUID->"6e5f5a2d-f8d8-41cc-b7f7-193907c772e2"],
-Cell[171998, 4645, 4419372, 95030, 90964, "Output",ExpressionUUID->"6849d88e-ad0f-49c4-99da-875ddf3df840"]
+Cell[130044, 3522, 154, 3, 30, "Input",ExpressionUUID->"6e5f5a2d-f8d8-41cc-b7f7-193907c772e2"],
+Cell[130201, 3527, 4419372, 95030, 90964, "Output",ExpressionUUID->"6849d88e-ad0f-49c4-99da-875ddf3df840"]
 }, Closed]],
-Cell[4591385, 99678, 152, 3, 26, "Input",ExpressionUUID->"3bccd808-2d0d-4aed-ad5c-f98dce1bb2fa"],
-Cell[4591540, 99683, 151, 3, 30, "Input",ExpressionUUID->"9214d531-c1c4-4f0b-8067-62d509d3780e"],
-Cell[4591694, 99688, 152, 3, 30, "Input",ExpressionUUID->"5d134bbf-d270-4d46-9aad-c35a20b3af10"],
-Cell[4591849, 99693, 1248, 34, 115, "Input",ExpressionUUID->"c9706e32-aa64-4bea-be5e-fca139f74b78"],
-Cell[4593100, 99729, 1047, 24, 94, "Input",ExpressionUUID->"2098a55c-4e04-413e-b48c-2e3e1420aeba"],
-Cell[4594150, 99755, 716, 17, 73, "Input",ExpressionUUID->"f11165e8-30f4-4621-91cb-e78cc1116c62"],
-Cell[4594869, 99774, 302, 5, 30, "Input",ExpressionUUID->"881beb7c-e557-4703-a5ed-8b7345c6403b"],
+Cell[4549588, 98560, 152, 3, 26, "Input",ExpressionUUID->"3bccd808-2d0d-4aed-ad5c-f98dce1bb2fa"],
+Cell[4549743, 98565, 151, 3, 30, "Input",ExpressionUUID->"9214d531-c1c4-4f0b-8067-62d509d3780e"],
+Cell[4549897, 98570, 152, 3, 30, "Input",ExpressionUUID->"5d134bbf-d270-4d46-9aad-c35a20b3af10"],
+Cell[4550052, 98575, 1248, 34, 115, "Input",ExpressionUUID->"c9706e32-aa64-4bea-be5e-fca139f74b78"],
+Cell[4551303, 98611, 1047, 24, 94, "Input",ExpressionUUID->"2098a55c-4e04-413e-b48c-2e3e1420aeba"],
+Cell[4552353, 98637, 716, 17, 73, "Input",ExpressionUUID->"f11165e8-30f4-4621-91cb-e78cc1116c62"],
+Cell[4553072, 98656, 302, 5, 30, "Input",ExpressionUUID->"881beb7c-e557-4703-a5ed-8b7345c6403b"],
 Cell[CellGroupData[{
-Cell[4595196, 99783, 240, 4, 30, "Input",ExpressionUUID->"86953094-992b-4ece-81d3-0f54f8c99910"],
+Cell[4553399, 98665, 240, 4, 30, "Input",ExpressionUUID->"86953094-992b-4ece-81d3-0f54f8c99910"],
 Cell[CellGroupData[{
-Cell[4595461, 99791, 197, 4, 24, "Print",ExpressionUUID->"8b88be0a-a13e-4a7b-8295-c1008ad658d6"],
-Cell[4595661, 99797, 198, 4, 24, "Print",ExpressionUUID->"f854acc1-f24a-43ce-9107-892da3741105"],
-Cell[4595862, 99803, 198, 4, 24, "Print",ExpressionUUID->"0ebf2041-29ad-490d-ae2c-fb00ea60e896"],
-Cell[4596063, 99809, 198, 4, 24, "Print",ExpressionUUID->"ce7c7420-29bb-4bc7-9fe1-c52d92b3c17c"],
-Cell[4596264, 99815, 198, 4, 24, "Print",ExpressionUUID->"bdb7f0f5-ae0e-47e3-bde4-add2b2e9172d"],
-Cell[4596465, 99821, 198, 4, 24, "Print",ExpressionUUID->"6ccc5234-8d31-4f80-b860-fb9bc1ead01e"],
-Cell[4596666, 99827, 198, 4, 24, "Print",ExpressionUUID->"9f6f5a15-4625-4559-aeb6-4e62d60ea660"],
-Cell[4596867, 99833, 200, 4, 24, "Print",ExpressionUUID->"cc753901-6a7d-4228-ac53-35d451b86d77"],
-Cell[4597070, 99839, 198, 4, 24, "Print",ExpressionUUID->"8fe1d30b-85ec-47bd-8e46-174bcc6be6cf"],
-Cell[4597271, 99845, 199, 4, 24, "Print",ExpressionUUID->"cd6b11e5-086b-4a28-ba23-c88ce09cbddb"]
+Cell[4553664, 98673, 197, 4, 24, "Print",ExpressionUUID->"8b88be0a-a13e-4a7b-8295-c1008ad658d6"],
+Cell[4553864, 98679, 198, 4, 24, "Print",ExpressionUUID->"f854acc1-f24a-43ce-9107-892da3741105"],
+Cell[4554065, 98685, 198, 4, 24, "Print",ExpressionUUID->"0ebf2041-29ad-490d-ae2c-fb00ea60e896"],
+Cell[4554266, 98691, 198, 4, 24, "Print",ExpressionUUID->"ce7c7420-29bb-4bc7-9fe1-c52d92b3c17c"],
+Cell[4554467, 98697, 198, 4, 24, "Print",ExpressionUUID->"bdb7f0f5-ae0e-47e3-bde4-add2b2e9172d"],
+Cell[4554668, 98703, 198, 4, 24, "Print",ExpressionUUID->"6ccc5234-8d31-4f80-b860-fb9bc1ead01e"],
+Cell[4554869, 98709, 198, 4, 24, "Print",ExpressionUUID->"9f6f5a15-4625-4559-aeb6-4e62d60ea660"],
+Cell[4555070, 98715, 200, 4, 24, "Print",ExpressionUUID->"cc753901-6a7d-4228-ac53-35d451b86d77"],
+Cell[4555273, 98721, 198, 4, 24, "Print",ExpressionUUID->"8fe1d30b-85ec-47bd-8e46-174bcc6be6cf"],
+Cell[4555474, 98727, 199, 4, 24, "Print",ExpressionUUID->"cd6b11e5-086b-4a28-ba23-c88ce09cbddb"]
 }, Open  ]],
-Cell[4597485, 99852, 196, 3, 34, "Output",ExpressionUUID->"f9eb79c9-79ab-4972-ac5d-9bf4d7c5706c"]
+Cell[4555688, 98734, 196, 3, 34, "Output",ExpressionUUID->"f9eb79c9-79ab-4972-ac5d-9bf4d7c5706c"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4597718, 99860, 241, 4, 26, "Input",ExpressionUUID->"f96bfd50-3c93-487b-b72c-0efa966db052"],
+Cell[4555921, 98742, 241, 4, 26, "Input",ExpressionUUID->"f96bfd50-3c93-487b-b72c-0efa966db052"],
 Cell[CellGroupData[{
-Cell[4597984, 99868, 197, 4, 24, "Print",ExpressionUUID->"0df55f20-b51c-4417-8687-560b75680ad9"],
-Cell[4598184, 99874, 199, 4, 24, "Print",ExpressionUUID->"65afac5f-ac1b-405d-95ca-d88dcc034907"],
-Cell[4598386, 99880, 199, 4, 24, "Print",ExpressionUUID->"155d77b5-d5ca-47b5-bba8-036aff1d2443"],
-Cell[4598588, 99886, 199, 4, 24, "Print",ExpressionUUID->"6402840f-e54b-49d2-8ce8-0175340b2083"],
-Cell[4598790, 99892, 199, 4, 24, "Print",ExpressionUUID->"736736de-4f33-4375-9ad5-d9f98f5dba87"],
-Cell[4598992, 99898, 197, 4, 24, "Print",ExpressionUUID->"5d2d9825-5632-4457-8211-7dd6cee750a8"],
-Cell[4599192, 99904, 197, 4, 24, "Print",ExpressionUUID->"23906453-43f1-4403-92b6-e9fb94c0ae50"],
-Cell[4599392, 99910, 197, 4, 24, "Print",ExpressionUUID->"2ba2eb99-fc54-459f-85c0-ed99d7ad07c9"],
-Cell[4599592, 99916, 197, 4, 24, "Print",ExpressionUUID->"94070629-691b-4d0a-9eb7-69b91078a11e"],
-Cell[4599792, 99922, 197, 4, 24, "Print",ExpressionUUID->"3812bf93-11c7-45dc-bd0e-7ed9238191ce"]
+Cell[4556187, 98750, 197, 4, 24, "Print",ExpressionUUID->"0df55f20-b51c-4417-8687-560b75680ad9"],
+Cell[4556387, 98756, 199, 4, 24, "Print",ExpressionUUID->"65afac5f-ac1b-405d-95ca-d88dcc034907"],
+Cell[4556589, 98762, 199, 4, 24, "Print",ExpressionUUID->"155d77b5-d5ca-47b5-bba8-036aff1d2443"],
+Cell[4556791, 98768, 199, 4, 24, "Print",ExpressionUUID->"6402840f-e54b-49d2-8ce8-0175340b2083"],
+Cell[4556993, 98774, 199, 4, 24, "Print",ExpressionUUID->"736736de-4f33-4375-9ad5-d9f98f5dba87"],
+Cell[4557195, 98780, 197, 4, 24, "Print",ExpressionUUID->"5d2d9825-5632-4457-8211-7dd6cee750a8"],
+Cell[4557395, 98786, 197, 4, 24, "Print",ExpressionUUID->"23906453-43f1-4403-92b6-e9fb94c0ae50"],
+Cell[4557595, 98792, 197, 4, 24, "Print",ExpressionUUID->"2ba2eb99-fc54-459f-85c0-ed99d7ad07c9"],
+Cell[4557795, 98798, 197, 4, 24, "Print",ExpressionUUID->"94070629-691b-4d0a-9eb7-69b91078a11e"],
+Cell[4557995, 98804, 197, 4, 24, "Print",ExpressionUUID->"3812bf93-11c7-45dc-bd0e-7ed9238191ce"]
 }, Open  ]],
-Cell[4600004, 99929, 196, 3, 34, "Output",ExpressionUUID->"3f41a929-7beb-4259-8ecb-4fc1d8a69374"]
+Cell[4558207, 98811, 196, 3, 34, "Output",ExpressionUUID->"3f41a929-7beb-4259-8ecb-4fc1d8a69374"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4600237, 99937, 243, 4, 26, "Input",ExpressionUUID->"fe1a97a8-532e-4e7a-8a88-f565caae5f97"],
+Cell[4558440, 98819, 243, 4, 26, "Input",ExpressionUUID->"fe1a97a8-532e-4e7a-8a88-f565caae5f97"],
 Cell[CellGroupData[{
-Cell[4600505, 99945, 201, 4, 24, "Print",ExpressionUUID->"203826e8-d100-4a48-aa61-b8cae880ddf2"],
-Cell[4600709, 99951, 199, 4, 24, "Print",ExpressionUUID->"9a8a2d64-a921-4ebe-b6c4-e90419eee1c2"],
-Cell[4600911, 99957, 199, 4, 24, "Print",ExpressionUUID->"ceff1cb8-2c39-4c0f-a43a-efcbdbef0fe2"],
-Cell[4601113, 99963, 201, 4, 24, "Print",ExpressionUUID->"89a661a3-5c0c-4326-a393-6e4972db4a6b"],
-Cell[4601317, 99969, 201, 4, 24, "Print",ExpressionUUID->"6aa6f90c-6c91-4f86-8968-1103cba7975b"],
-Cell[4601521, 99975, 199, 4, 24, "Print",ExpressionUUID->"0dcb36c1-0668-4b8a-bc01-4945a598c78a"],
-Cell[4601723, 99981, 199, 4, 24, "Print",ExpressionUUID->"0fcfcd70-8d7b-435d-a163-acb028e6e16e"],
-Cell[4601925, 99987, 199, 4, 24, "Print",ExpressionUUID->"3b7724cb-54a4-4dde-8ea0-50e5610b792e"],
-Cell[4602127, 99993, 199, 4, 24, "Print",ExpressionUUID->"b613c9c7-96f4-4a6c-8f08-8e6df52762df"],
-Cell[4602329, 99999, 199, 4, 24, "Print",ExpressionUUID->"a6fd0189-8e91-469a-9897-389a4893d7b0"]
+Cell[4558708, 98827, 201, 4, 24, "Print",ExpressionUUID->"203826e8-d100-4a48-aa61-b8cae880ddf2"],
+Cell[4558912, 98833, 199, 4, 24, "Print",ExpressionUUID->"9a8a2d64-a921-4ebe-b6c4-e90419eee1c2"],
+Cell[4559114, 98839, 199, 4, 24, "Print",ExpressionUUID->"ceff1cb8-2c39-4c0f-a43a-efcbdbef0fe2"],
+Cell[4559316, 98845, 201, 4, 24, "Print",ExpressionUUID->"89a661a3-5c0c-4326-a393-6e4972db4a6b"],
+Cell[4559520, 98851, 201, 4, 24, "Print",ExpressionUUID->"6aa6f90c-6c91-4f86-8968-1103cba7975b"],
+Cell[4559724, 98857, 199, 4, 24, "Print",ExpressionUUID->"0dcb36c1-0668-4b8a-bc01-4945a598c78a"],
+Cell[4559926, 98863, 199, 4, 24, "Print",ExpressionUUID->"0fcfcd70-8d7b-435d-a163-acb028e6e16e"],
+Cell[4560128, 98869, 199, 4, 24, "Print",ExpressionUUID->"3b7724cb-54a4-4dde-8ea0-50e5610b792e"],
+Cell[4560330, 98875, 199, 4, 24, "Print",ExpressionUUID->"b613c9c7-96f4-4a6c-8f08-8e6df52762df"],
+Cell[4560532, 98881, 199, 4, 24, "Print",ExpressionUUID->"a6fd0189-8e91-469a-9897-389a4893d7b0"]
 }, Open  ]],
-Cell[4602543, 100006, 196, 3, 34, "Output",ExpressionUUID->"4a8fef41-31e5-42c1-8bdc-68e9f7afbd6a"]
+Cell[4560746, 98888, 196, 3, 34, "Output",ExpressionUUID->"4a8fef41-31e5-42c1-8bdc-68e9f7afbd6a"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4602776, 100014, 242, 4, 26, "Input",ExpressionUUID->"2aecbe65-4b44-4dfa-93ef-65fd39540c9b"],
+Cell[4560979, 98896, 242, 4, 26, "Input",ExpressionUUID->"2aecbe65-4b44-4dfa-93ef-65fd39540c9b"],
 Cell[CellGroupData[{
-Cell[4603043, 100022, 197, 4, 24, "Print",ExpressionUUID->"2fca990b-8284-4e3f-8a3b-7f56db89acc5"],
-Cell[4603243, 100028, 197, 4, 24, "Print",ExpressionUUID->"3177b850-296d-49fe-8867-d3473a1b0c35"],
-Cell[4603443, 100034, 197, 4, 24, "Print",ExpressionUUID->"c0b4e928-89e9-4d85-8e51-5cbdf9ce41aa"],
-Cell[4603643, 100040, 197, 4, 24, "Print",ExpressionUUID->"a373700f-9836-44d5-8a5f-930119678171"],
-Cell[4603843, 100046, 197, 4, 24, "Print",ExpressionUUID->"ca822f7e-70c9-46a4-a25f-582acb77abcb"],
-Cell[4604043, 100052, 197, 4, 24, "Print",ExpressionUUID->"96e22b30-8c73-4518-8d23-873121d8fc48"],
-Cell[4604243, 100058, 197, 4, 24, "Print",ExpressionUUID->"83708b79-d67b-4c05-93e9-38073aa7fe05"],
-Cell[4604443, 100064, 197, 4, 24, "Print",ExpressionUUID->"78e88359-b700-4328-bea6-a2b0d14a7cac"],
-Cell[4604643, 100070, 197, 4, 24, "Print",ExpressionUUID->"704157f3-bfb2-4f43-b5f0-c5bfbc560aab"],
-Cell[4604843, 100076, 197, 4, 24, "Print",ExpressionUUID->"7565254f-9a77-48dc-9444-33b886723862"]
+Cell[4561246, 98904, 197, 4, 24, "Print",ExpressionUUID->"2fca990b-8284-4e3f-8a3b-7f56db89acc5"],
+Cell[4561446, 98910, 197, 4, 24, "Print",ExpressionUUID->"3177b850-296d-49fe-8867-d3473a1b0c35"],
+Cell[4561646, 98916, 197, 4, 24, "Print",ExpressionUUID->"c0b4e928-89e9-4d85-8e51-5cbdf9ce41aa"],
+Cell[4561846, 98922, 197, 4, 24, "Print",ExpressionUUID->"a373700f-9836-44d5-8a5f-930119678171"],
+Cell[4562046, 98928, 197, 4, 24, "Print",ExpressionUUID->"ca822f7e-70c9-46a4-a25f-582acb77abcb"],
+Cell[4562246, 98934, 197, 4, 24, "Print",ExpressionUUID->"96e22b30-8c73-4518-8d23-873121d8fc48"],
+Cell[4562446, 98940, 197, 4, 24, "Print",ExpressionUUID->"83708b79-d67b-4c05-93e9-38073aa7fe05"],
+Cell[4562646, 98946, 197, 4, 24, "Print",ExpressionUUID->"78e88359-b700-4328-bea6-a2b0d14a7cac"],
+Cell[4562846, 98952, 197, 4, 24, "Print",ExpressionUUID->"704157f3-bfb2-4f43-b5f0-c5bfbc560aab"],
+Cell[4563046, 98958, 197, 4, 24, "Print",ExpressionUUID->"7565254f-9a77-48dc-9444-33b886723862"]
 }, Open  ]],
-Cell[4605055, 100083, 200, 3, 34, "Output",ExpressionUUID->"2e1c38af-7450-4ecc-a05c-257dcdba5451"]
+Cell[4563258, 98965, 200, 3, 34, "Output",ExpressionUUID->"2e1c38af-7450-4ecc-a05c-257dcdba5451"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4605292, 100091, 241, 4, 26, "Input",ExpressionUUID->"8ee863b5-d147-4e8a-bd18-9c421dd23787"],
+Cell[4563495, 98973, 241, 4, 26, "Input",ExpressionUUID->"8ee863b5-d147-4e8a-bd18-9c421dd23787"],
 Cell[CellGroupData[{
-Cell[4605558, 100099, 197, 4, 24, "Print",ExpressionUUID->"2009a193-ceea-46ef-bd80-037d926017cf"],
-Cell[4605758, 100105, 199, 4, 24, "Print",ExpressionUUID->"0a74d1db-0a55-41c7-a355-eca543eb70e7"],
-Cell[4605960, 100111, 197, 4, 24, "Print",ExpressionUUID->"e55077bb-d892-44dc-b006-f69eb07618f5"],
-Cell[4606160, 100117, 197, 4, 24, "Print",ExpressionUUID->"55c1e9be-56a5-4944-b983-985ca4b80876"],
-Cell[4606360, 100123, 197, 4, 24, "Print",ExpressionUUID->"17abba4e-1848-488c-bde6-35cdf05998d4"],
-Cell[4606560, 100129, 199, 4, 24, "Print",ExpressionUUID->"8842af6b-8a1e-48e1-98ef-18ca8f39a91d"],
-Cell[4606762, 100135, 197, 4, 24, "Print",ExpressionUUID->"c65f5711-d87e-4702-85dc-948bb2237f08"],
-Cell[4606962, 100141, 197, 4, 24, "Print",ExpressionUUID->"c6fbe64a-ceca-439e-8b29-9c26adf965ef"],
-Cell[4607162, 100147, 199, 4, 24, "Print",ExpressionUUID->"9fcc8d20-19ef-45d4-bc4b-aefbb0a6e431"],
-Cell[4607364, 100153, 197, 4, 24, "Print",ExpressionUUID->"3f30f015-4bfc-47f5-99d8-e3f68011c8c2"]
+Cell[4563761, 98981, 197, 4, 24, "Print",ExpressionUUID->"2009a193-ceea-46ef-bd80-037d926017cf"],
+Cell[4563961, 98987, 199, 4, 24, "Print",ExpressionUUID->"0a74d1db-0a55-41c7-a355-eca543eb70e7"],
+Cell[4564163, 98993, 197, 4, 24, "Print",ExpressionUUID->"e55077bb-d892-44dc-b006-f69eb07618f5"],
+Cell[4564363, 98999, 197, 4, 24, "Print",ExpressionUUID->"55c1e9be-56a5-4944-b983-985ca4b80876"],
+Cell[4564563, 99005, 197, 4, 24, "Print",ExpressionUUID->"17abba4e-1848-488c-bde6-35cdf05998d4"],
+Cell[4564763, 99011, 199, 4, 24, "Print",ExpressionUUID->"8842af6b-8a1e-48e1-98ef-18ca8f39a91d"],
+Cell[4564965, 99017, 197, 4, 24, "Print",ExpressionUUID->"c65f5711-d87e-4702-85dc-948bb2237f08"],
+Cell[4565165, 99023, 197, 4, 24, "Print",ExpressionUUID->"c6fbe64a-ceca-439e-8b29-9c26adf965ef"],
+Cell[4565365, 99029, 199, 4, 24, "Print",ExpressionUUID->"9fcc8d20-19ef-45d4-bc4b-aefbb0a6e431"],
+Cell[4565567, 99035, 197, 4, 24, "Print",ExpressionUUID->"3f30f015-4bfc-47f5-99d8-e3f68011c8c2"]
 }, Open  ]],
-Cell[4607576, 100160, 196, 3, 34, "Output",ExpressionUUID->"6069c659-d902-4918-a553-fc39b0ec194b"]
+Cell[4565779, 99042, 196, 3, 34, "Output",ExpressionUUID->"6069c659-d902-4918-a553-fc39b0ec194b"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4607809, 100168, 241, 4, 26, "Input",ExpressionUUID->"71acea69-b2b3-491d-ae15-f4df099b9b39"],
+Cell[4566012, 99050, 241, 4, 26, "Input",ExpressionUUID->"71acea69-b2b3-491d-ae15-f4df099b9b39"],
 Cell[CellGroupData[{
-Cell[4608075, 100176, 199, 4, 24, "Print",ExpressionUUID->"4145e9a2-b86f-444d-9e6f-514e102a7a17"],
-Cell[4608277, 100182, 197, 4, 24, "Print",ExpressionUUID->"0f110600-9945-4ce8-ada0-239cd91d8e03"],
-Cell[4608477, 100188, 199, 4, 24, "Print",ExpressionUUID->"f8453fc4-a721-4441-9016-2af31abf7022"],
-Cell[4608679, 100194, 196, 4, 24, "Print",ExpressionUUID->"e7b4daf0-0724-4551-8ded-34ecced4ec32"],
-Cell[4608878, 100200, 197, 4, 24, "Print",ExpressionUUID->"654cff30-d67b-463f-9d66-f38a5cbd6e2c"],
-Cell[4609078, 100206, 197, 4, 24, "Print",ExpressionUUID->"0398c397-cea0-48c6-adee-2da2335e66cb"],
-Cell[4609278, 100212, 197, 4, 24, "Print",ExpressionUUID->"0f95316d-23be-46b1-8fb4-6dfdb7e99fe2"],
-Cell[4609478, 100218, 199, 4, 24, "Print",ExpressionUUID->"0996f87d-8f52-4872-8581-efb748040ff9"],
-Cell[4609680, 100224, 197, 4, 24, "Print",ExpressionUUID->"6098c8b1-ad3d-4b8a-850a-4b9fb5e363cf"],
-Cell[4609880, 100230, 197, 4, 24, "Print",ExpressionUUID->"57383c2a-c8e3-461c-bd50-359a76498569"]
+Cell[4566278, 99058, 199, 4, 24, "Print",ExpressionUUID->"4145e9a2-b86f-444d-9e6f-514e102a7a17"],
+Cell[4566480, 99064, 197, 4, 24, "Print",ExpressionUUID->"0f110600-9945-4ce8-ada0-239cd91d8e03"],
+Cell[4566680, 99070, 199, 4, 24, "Print",ExpressionUUID->"f8453fc4-a721-4441-9016-2af31abf7022"],
+Cell[4566882, 99076, 196, 4, 24, "Print",ExpressionUUID->"e7b4daf0-0724-4551-8ded-34ecced4ec32"],
+Cell[4567081, 99082, 197, 4, 24, "Print",ExpressionUUID->"654cff30-d67b-463f-9d66-f38a5cbd6e2c"],
+Cell[4567281, 99088, 197, 4, 24, "Print",ExpressionUUID->"0398c397-cea0-48c6-adee-2da2335e66cb"],
+Cell[4567481, 99094, 197, 4, 24, "Print",ExpressionUUID->"0f95316d-23be-46b1-8fb4-6dfdb7e99fe2"],
+Cell[4567681, 99100, 199, 4, 24, "Print",ExpressionUUID->"0996f87d-8f52-4872-8581-efb748040ff9"],
+Cell[4567883, 99106, 197, 4, 24, "Print",ExpressionUUID->"6098c8b1-ad3d-4b8a-850a-4b9fb5e363cf"],
+Cell[4568083, 99112, 197, 4, 24, "Print",ExpressionUUID->"57383c2a-c8e3-461c-bd50-359a76498569"]
 }, Open  ]],
-Cell[4610092, 100237, 196, 3, 34, "Output",ExpressionUUID->"abee5d57-ae1c-4b68-8896-520cd5335c43"]
+Cell[4568295, 99119, 196, 3, 34, "Output",ExpressionUUID->"abee5d57-ae1c-4b68-8896-520cd5335c43"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4610325, 100245, 243, 4, 26, "Input",ExpressionUUID->"75b90654-1ac3-4894-8e5d-81d701b5e39a"],
+Cell[4568528, 99127, 243, 4, 26, "Input",ExpressionUUID->"75b90654-1ac3-4894-8e5d-81d701b5e39a"],
 Cell[CellGroupData[{
-Cell[4610593, 100253, 197, 4, 24, "Print",ExpressionUUID->"eea3546e-d9ee-471e-845d-31f4851702d4"],
-Cell[4610793, 100259, 196, 4, 24, "Print",ExpressionUUID->"aedb175e-f30c-4a30-9760-18498d2f5ebb"],
-Cell[4610992, 100265, 197, 4, 24, "Print",ExpressionUUID->"9ef01fde-35d5-4cdb-8e20-06150be4917d"],
-Cell[4611192, 100271, 196, 4, 24, "Print",ExpressionUUID->"801f39b3-2897-4def-aace-35be798602f1"],
-Cell[4611391, 100277, 199, 4, 24, "Print",ExpressionUUID->"4524b0a4-c3cf-4eee-9bae-4a4411158765"],
-Cell[4611593, 100283, 199, 4, 24, "Print",ExpressionUUID->"9ad23010-af47-4eb5-80b1-72cc7a2f8eb2"],
-Cell[4611795, 100289, 196, 4, 24, "Print",ExpressionUUID->"9a39c0cc-b71d-4bfb-b47a-e3532770aa9b"],
-Cell[4611994, 100295, 199, 4, 24, "Print",ExpressionUUID->"e9a4811a-4dfc-4847-9ed8-9f5e7fb0a1bd"],
-Cell[4612196, 100301, 197, 4, 24, "Print",ExpressionUUID->"4a551457-b8aa-425f-b484-9ebe7095e485"],
-Cell[4612396, 100307, 196, 4, 24, "Print",ExpressionUUID->"ed43c117-5a2c-4198-9efb-7da7dd4d4034"]
+Cell[4568796, 99135, 197, 4, 24, "Print",ExpressionUUID->"eea3546e-d9ee-471e-845d-31f4851702d4"],
+Cell[4568996, 99141, 196, 4, 24, "Print",ExpressionUUID->"aedb175e-f30c-4a30-9760-18498d2f5ebb"],
+Cell[4569195, 99147, 197, 4, 24, "Print",ExpressionUUID->"9ef01fde-35d5-4cdb-8e20-06150be4917d"],
+Cell[4569395, 99153, 196, 4, 24, "Print",ExpressionUUID->"801f39b3-2897-4def-aace-35be798602f1"],
+Cell[4569594, 99159, 199, 4, 24, "Print",ExpressionUUID->"4524b0a4-c3cf-4eee-9bae-4a4411158765"],
+Cell[4569796, 99165, 199, 4, 24, "Print",ExpressionUUID->"9ad23010-af47-4eb5-80b1-72cc7a2f8eb2"],
+Cell[4569998, 99171, 196, 4, 24, "Print",ExpressionUUID->"9a39c0cc-b71d-4bfb-b47a-e3532770aa9b"],
+Cell[4570197, 99177, 199, 4, 24, "Print",ExpressionUUID->"e9a4811a-4dfc-4847-9ed8-9f5e7fb0a1bd"],
+Cell[4570399, 99183, 197, 4, 24, "Print",ExpressionUUID->"4a551457-b8aa-425f-b484-9ebe7095e485"],
+Cell[4570599, 99189, 196, 4, 24, "Print",ExpressionUUID->"ed43c117-5a2c-4198-9efb-7da7dd4d4034"]
 }, Open  ]],
-Cell[4612607, 100314, 196, 3, 34, "Output",ExpressionUUID->"1a9dd832-cded-404a-9e8e-55603b4d7433"]
+Cell[4570810, 99196, 196, 3, 34, "Output",ExpressionUUID->"1a9dd832-cded-404a-9e8e-55603b4d7433"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4612840, 100322, 292, 5, 26, "Input",ExpressionUUID->"f824d033-691a-4d1f-92f5-4ab01423a5ad"],
+Cell[4571043, 99204, 292, 5, 26, "Input",ExpressionUUID->"f824d033-691a-4d1f-92f5-4ab01423a5ad"],
 Cell[CellGroupData[{
-Cell[4613157, 100331, 177, 4, 24, "Print",ExpressionUUID->"92d7c1bd-c362-4205-9f66-6a01b447a4eb"],
-Cell[4613337, 100337, 175, 4, 24, "Print",ExpressionUUID->"54df0102-003b-4884-bb53-111b767a4c0f"],
-Cell[4613515, 100343, 174, 4, 24, "Print",ExpressionUUID->"42fe5d37-9e86-4d1b-b9a2-35370152be1a"],
-Cell[4613692, 100349, 177, 4, 24, "Print",ExpressionUUID->"e05f68ba-59c9-4014-82ba-94955347b056"]
+Cell[4571360, 99213, 177, 4, 24, "Print",ExpressionUUID->"92d7c1bd-c362-4205-9f66-6a01b447a4eb"],
+Cell[4571540, 99219, 175, 4, 24, "Print",ExpressionUUID->"54df0102-003b-4884-bb53-111b767a4c0f"],
+Cell[4571718, 99225, 174, 4, 24, "Print",ExpressionUUID->"42fe5d37-9e86-4d1b-b9a2-35370152be1a"],
+Cell[4571895, 99231, 177, 4, 24, "Print",ExpressionUUID->"e05f68ba-59c9-4014-82ba-94955347b056"]
 }, Open  ]],
-Cell[4613884, 100356, 174, 3, 34, "Output",ExpressionUUID->"52db8c9f-9b99-4b63-bfd9-226b29998173"]
+Cell[4572087, 99238, 174, 3, 34, "Output",ExpressionUUID->"52db8c9f-9b99-4b63-bfd9-226b29998173"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4614095, 100364, 228, 4, 26, "Input",ExpressionUUID->"e1619147-dbd8-4b95-92c0-a0a9e3d6e05f"],
-Cell[4614326, 100370, 729, 19, 46, "Output",ExpressionUUID->"6b31f62a-bb61-4325-bbb2-0f8b38f9d9b0"]
+Cell[4572298, 99246, 228, 4, 26, "Input",ExpressionUUID->"e1619147-dbd8-4b95-92c0-a0a9e3d6e05f"],
+Cell[4572529, 99252, 729, 19, 46, "Output",ExpressionUUID->"6b31f62a-bb61-4325-bbb2-0f8b38f9d9b0"]
 }, Open  ]],
-Cell[4615070, 100392, 200, 4, 32, "Item",ExpressionUUID->"b8f7dd32-654c-4d69-a388-00e73e20b2c5"],
+Cell[4573273, 99274, 200, 4, 32, "Item",ExpressionUUID->"b8f7dd32-654c-4d69-a388-00e73e20b2c5"],
 Cell[CellGroupData[{
-Cell[4615295, 100400, 639, 16, 52, "Input",ExpressionUUID->"6385e4e6-3aa6-4ca7-8de4-83d30633a5ae"],
-Cell[4615937, 100418, 158, 2, 34, "Output",ExpressionUUID->"20e798ff-b0ce-4e4d-8da1-a093ebf96720"]
+Cell[4573498, 99282, 639, 16, 52, "Input",ExpressionUUID->"6385e4e6-3aa6-4ca7-8de4-83d30633a5ae"],
+Cell[4574140, 99300, 158, 2, 34, "Output",ExpressionUUID->"20e798ff-b0ce-4e4d-8da1-a093ebf96720"]
 }, Open  ]],
-Cell[4616110, 100423, 184, 4, 30, "Input",ExpressionUUID->"35538101-3df6-4320-82c6-fb90398dcf8b"],
+Cell[4574313, 99305, 184, 4, 30, "Input",ExpressionUUID->"35538101-3df6-4320-82c6-fb90398dcf8b"],
 Cell[CellGroupData[{
-Cell[4616319, 100431, 241, 4, 30, "Input",ExpressionUUID->"c6f1e48f-f2b3-4633-a270-2d837481a3a1"],
-Cell[4616563, 100437, 396, 10, 24, "Message",ExpressionUUID->"da0ce5b5-a752-4f0c-81a9-b9f06d7ab115"],
-Cell[4616962, 100449, 394, 10, 24, "Message",ExpressionUUID->"be0f414f-c102-4bf4-9e35-0d311e65c76f"],
+Cell[4574522, 99313, 241, 4, 30, "Input",ExpressionUUID->"c6f1e48f-f2b3-4633-a270-2d837481a3a1"],
+Cell[4574766, 99319, 396, 10, 24, "Message",ExpressionUUID->"da0ce5b5-a752-4f0c-81a9-b9f06d7ab115"],
+Cell[4575165, 99331, 394, 10, 24, "Message",ExpressionUUID->"be0f414f-c102-4bf4-9e35-0d311e65c76f"],
 Cell[CellGroupData[{
-Cell[4617381, 100463, 177, 4, 24, "Print",ExpressionUUID->"3bba7d8f-9b06-484f-b4d3-632f231afc37"],
-Cell[4617561, 100469, 177, 4, 24, "Print",ExpressionUUID->"f659f692-01ec-4858-acaa-d60f4b4998e6"],
-Cell[4617741, 100475, 175, 4, 24, "Print",ExpressionUUID->"e9e35560-6a98-4d85-ba46-29424be208af"],
-Cell[4617919, 100481, 177, 4, 24, "Print",ExpressionUUID->"5d1876d0-f98c-4bb2-9711-124711ea1dab"],
-Cell[4618099, 100487, 175, 4, 24, "Print",ExpressionUUID->"ae667c6d-6a3b-4b8a-9bf8-9c76aa4faf28"]
+Cell[4575584, 99345, 177, 4, 24, "Print",ExpressionUUID->"3bba7d8f-9b06-484f-b4d3-632f231afc37"],
+Cell[4575764, 99351, 177, 4, 24, "Print",ExpressionUUID->"f659f692-01ec-4858-acaa-d60f4b4998e6"],
+Cell[4575944, 99357, 175, 4, 24, "Print",ExpressionUUID->"e9e35560-6a98-4d85-ba46-29424be208af"],
+Cell[4576122, 99363, 177, 4, 24, "Print",ExpressionUUID->"5d1876d0-f98c-4bb2-9711-124711ea1dab"],
+Cell[4576302, 99369, 175, 4, 24, "Print",ExpressionUUID->"ae667c6d-6a3b-4b8a-9bf8-9c76aa4faf28"]
 }, Open  ]],
-Cell[4618289, 100494, 247, 4, 34, "Output",ExpressionUUID->"88acd967-1c2c-4b4e-b73d-ecbd06540448"]
+Cell[4576492, 99376, 247, 4, 34, "Output",ExpressionUUID->"88acd967-1c2c-4b4e-b73d-ecbd06540448"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4618573, 100503, 241, 4, 26, "Input",ExpressionUUID->"8d487f69-3cc5-4b15-a17c-36b0f0a098da"],
+Cell[4576776, 99385, 241, 4, 26, "Input",ExpressionUUID->"8d487f69-3cc5-4b15-a17c-36b0f0a098da"],
 Cell[CellGroupData[{
-Cell[4618839, 100511, 175, 4, 24, "Print",ExpressionUUID->"2846bb9c-a0e3-4cc6-9863-49dc879372fb"],
-Cell[4619017, 100517, 175, 4, 24, "Print",ExpressionUUID->"8e8e94ae-2685-46cf-824c-9dccd6aaa7c9"],
-Cell[4619195, 100523, 175, 4, 24, "Print",ExpressionUUID->"ea5a6e57-459b-44f3-af8d-e27fd9f73504"],
-Cell[4619373, 100529, 175, 4, 24, "Print",ExpressionUUID->"236d0628-1541-4ee1-8294-d993f0d4fc6b"],
-Cell[4619551, 100535, 175, 4, 24, "Print",ExpressionUUID->"41931755-f8dd-4016-8ec3-12f189f6c48b"],
-Cell[4619729, 100541, 177, 4, 24, "Print",ExpressionUUID->"87cc3efa-15c5-4aac-9f59-fc77c411956d"],
-Cell[4619909, 100547, 175, 4, 24, "Print",ExpressionUUID->"c28fc9bb-8175-41ae-b5b8-a2af110aa01e"],
-Cell[4620087, 100553, 175, 4, 24, "Print",ExpressionUUID->"c804e0fc-13b8-404c-be08-a7e750465f41"],
-Cell[4620265, 100559, 175, 4, 24, "Print",ExpressionUUID->"017215f5-e5a5-412a-95b0-02e856ef17cf"],
-Cell[4620443, 100565, 175, 4, 24, "Print",ExpressionUUID->"27abe593-5557-4139-b432-a9d130c93652"]
+Cell[4577042, 99393, 175, 4, 24, "Print",ExpressionUUID->"2846bb9c-a0e3-4cc6-9863-49dc879372fb"],
+Cell[4577220, 99399, 175, 4, 24, "Print",ExpressionUUID->"8e8e94ae-2685-46cf-824c-9dccd6aaa7c9"],
+Cell[4577398, 99405, 175, 4, 24, "Print",ExpressionUUID->"ea5a6e57-459b-44f3-af8d-e27fd9f73504"],
+Cell[4577576, 99411, 175, 4, 24, "Print",ExpressionUUID->"236d0628-1541-4ee1-8294-d993f0d4fc6b"],
+Cell[4577754, 99417, 175, 4, 24, "Print",ExpressionUUID->"41931755-f8dd-4016-8ec3-12f189f6c48b"],
+Cell[4577932, 99423, 177, 4, 24, "Print",ExpressionUUID->"87cc3efa-15c5-4aac-9f59-fc77c411956d"],
+Cell[4578112, 99429, 175, 4, 24, "Print",ExpressionUUID->"c28fc9bb-8175-41ae-b5b8-a2af110aa01e"],
+Cell[4578290, 99435, 175, 4, 24, "Print",ExpressionUUID->"c804e0fc-13b8-404c-be08-a7e750465f41"],
+Cell[4578468, 99441, 175, 4, 24, "Print",ExpressionUUID->"017215f5-e5a5-412a-95b0-02e856ef17cf"],
+Cell[4578646, 99447, 175, 4, 24, "Print",ExpressionUUID->"27abe593-5557-4139-b432-a9d130c93652"]
 }, Open  ]],
-Cell[4620633, 100572, 174, 3, 34, "Output",ExpressionUUID->"27df6f47-5fa2-4e39-b7f2-afc3c720e098"]
+Cell[4578836, 99454, 174, 3, 34, "Output",ExpressionUUID->"27df6f47-5fa2-4e39-b7f2-afc3c720e098"]
 }, Closed]],
-Cell[4620822, 100578, 190, 5, 26, "Input",ExpressionUUID->"df98973f-1c7c-43bf-ada2-bc8f065d9ee0"],
+Cell[4579025, 99460, 190, 5, 26, "Input",ExpressionUUID->"df98973f-1c7c-43bf-ada2-bc8f065d9ee0"],
 Cell[CellGroupData[{
-Cell[4621037, 100587, 319, 6, 30, "Input",ExpressionUUID->"2649d505-baee-414f-ba61-a848c431375f"],
+Cell[4579240, 99469, 319, 6, 30, "Input",ExpressionUUID->"2649d505-baee-414f-ba61-a848c431375f"],
 Cell[CellGroupData[{
-Cell[4621381, 100597, 177, 4, 24, "Print",ExpressionUUID->"d990281d-da4e-44ce-bba0-3be9e51984c8"],
-Cell[4621561, 100603, 175, 4, 24, "Print",ExpressionUUID->"8e564ec2-2ba2-4af6-8839-241a48c4b011"]
+Cell[4579584, 99479, 177, 4, 24, "Print",ExpressionUUID->"d990281d-da4e-44ce-bba0-3be9e51984c8"],
+Cell[4579764, 99485, 175, 4, 24, "Print",ExpressionUUID->"8e564ec2-2ba2-4af6-8839-241a48c4b011"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4621785, 100613, 270, 6, 26, "Input",ExpressionUUID->"e440a8fa-6daf-4e52-952c-f2a2da027d58"],
+Cell[4579988, 99495, 270, 6, 26, "Input",ExpressionUUID->"e440a8fa-6daf-4e52-952c-f2a2da027d58"],
 Cell[CellGroupData[{
-Cell[4622080, 100623, 175, 4, 24, "Print",ExpressionUUID->"47e9eb29-eb3c-44eb-bde5-daa461e7965a"],
-Cell[4622258, 100629, 175, 4, 24, "Print",ExpressionUUID->"3c8d7c90-91f7-46fd-ac69-8701bacfe25a"],
-Cell[4622436, 100635, 175, 4, 24, "Print",ExpressionUUID->"44a1988b-44c7-4cc4-accc-daccc86bdfec"]
+Cell[4580283, 99505, 175, 4, 24, "Print",ExpressionUUID->"47e9eb29-eb3c-44eb-bde5-daa461e7965a"],
+Cell[4580461, 99511, 175, 4, 24, "Print",ExpressionUUID->"3c8d7c90-91f7-46fd-ac69-8701bacfe25a"],
+Cell[4580639, 99517, 175, 4, 24, "Print",ExpressionUUID->"44a1988b-44c7-4cc4-accc-daccc86bdfec"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4622660, 100645, 273, 6, 26, "Input",ExpressionUUID->"ccd5003b-7be8-4452-a781-58d0de738e3e"],
+Cell[4580863, 99527, 273, 6, 26, "Input",ExpressionUUID->"ccd5003b-7be8-4452-a781-58d0de738e3e"],
 Cell[CellGroupData[{
-Cell[4622958, 100655, 177, 4, 24, "Print",ExpressionUUID->"590c91e2-ef3c-4505-aa0b-95d55137b2bb"],
-Cell[4623138, 100661, 175, 4, 24, "Print",ExpressionUUID->"69d37e74-c56f-4a12-bc84-953b1ee45562"],
-Cell[4623316, 100667, 175, 4, 24, "Print",ExpressionUUID->"400a6676-c5b0-4df1-b6bb-83a59b331179"]
+Cell[4581161, 99537, 177, 4, 24, "Print",ExpressionUUID->"590c91e2-ef3c-4505-aa0b-95d55137b2bb"],
+Cell[4581341, 99543, 175, 4, 24, "Print",ExpressionUUID->"69d37e74-c56f-4a12-bc84-953b1ee45562"],
+Cell[4581519, 99549, 175, 4, 24, "Print",ExpressionUUID->"400a6676-c5b0-4df1-b6bb-83a59b331179"]
 }, Open  ]]
 }, Closed]],
-Cell[4623518, 100675, 190, 5, 26, "Input",ExpressionUUID->"07237824-5e81-41b0-bd1d-7d744858c3ed"],
-Cell[4623711, 100682, 245, 4, 30, "Input",ExpressionUUID->"4d28e53c-4af5-40ba-890a-a6a9f9544d99"],
-Cell[4623959, 100688, 245, 4, 30, "Input",ExpressionUUID->"712b80aa-b8c4-4294-a783-8d276a083f12"],
+Cell[4581721, 99557, 190, 5, 26, "Input",ExpressionUUID->"07237824-5e81-41b0-bd1d-7d744858c3ed"],
+Cell[4581914, 99564, 245, 4, 30, "Input",ExpressionUUID->"4d28e53c-4af5-40ba-890a-a6a9f9544d99"],
+Cell[4582162, 99570, 245, 4, 30, "Input",ExpressionUUID->"712b80aa-b8c4-4294-a783-8d276a083f12"],
 Cell[CellGroupData[{
-Cell[4624229, 100696, 245, 4, 30, "Input",ExpressionUUID->"0121b0f2-33a2-4f93-abd0-b7335f00f4ba"],
-Cell[4624477, 100702, 482, 11, 24, "Message",ExpressionUUID->"535114a6-b030-4308-8246-00c024410468"],
-Cell[4624962, 100715, 488, 11, 24, "Message",ExpressionUUID->"3fff711e-1dcc-463e-a740-414e01e7545b"],
-Cell[4625453, 100728, 200, 4, 24, "Print",ExpressionUUID->"02b1fe8c-97b1-4f62-af5e-560a0f061657"],
-Cell[4625656, 100734, 485, 11, 24, "Message",ExpressionUUID->"4d229124-7f85-4bce-9345-8223a1b56caa"],
-Cell[4626144, 100747, 488, 11, 24, "Message",ExpressionUUID->"9b026f9b-c1da-4642-96e1-ffec3e99e1ad"],
-Cell[4626635, 100760, 200, 4, 24, "Print",ExpressionUUID->"ee45a9cb-8f55-46b4-86d8-aa90b6d7b196"],
-Cell[4626838, 100766, 483, 11, 24, "Message",ExpressionUUID->"3f134fed-054a-4e7f-bf83-da4ec88b63a5"],
-Cell[4627324, 100779, 478, 10, 24, "Message",ExpressionUUID->"deb651cd-9750-4f33-8892-dc4873ea19f8"],
-Cell[4627805, 100791, 490, 11, 24, "Message",ExpressionUUID->"5597723e-0b2d-4d43-b93e-f96034ffcb06"],
-Cell[4628298, 100804, 476, 10, 24, "Message",ExpressionUUID->"8ef06157-c74b-48e8-9c7f-327d7302c28c"],
+Cell[4582432, 99578, 245, 4, 30, "Input",ExpressionUUID->"0121b0f2-33a2-4f93-abd0-b7335f00f4ba"],
+Cell[4582680, 99584, 482, 11, 24, "Message",ExpressionUUID->"535114a6-b030-4308-8246-00c024410468"],
+Cell[4583165, 99597, 488, 11, 24, "Message",ExpressionUUID->"3fff711e-1dcc-463e-a740-414e01e7545b"],
+Cell[4583656, 99610, 200, 4, 24, "Print",ExpressionUUID->"02b1fe8c-97b1-4f62-af5e-560a0f061657"],
+Cell[4583859, 99616, 485, 11, 24, "Message",ExpressionUUID->"4d229124-7f85-4bce-9345-8223a1b56caa"],
+Cell[4584347, 99629, 488, 11, 24, "Message",ExpressionUUID->"9b026f9b-c1da-4642-96e1-ffec3e99e1ad"],
+Cell[4584838, 99642, 200, 4, 24, "Print",ExpressionUUID->"ee45a9cb-8f55-46b4-86d8-aa90b6d7b196"],
+Cell[4585041, 99648, 483, 11, 24, "Message",ExpressionUUID->"3f134fed-054a-4e7f-bf83-da4ec88b63a5"],
+Cell[4585527, 99661, 478, 10, 24, "Message",ExpressionUUID->"deb651cd-9750-4f33-8892-dc4873ea19f8"],
+Cell[4586008, 99673, 490, 11, 24, "Message",ExpressionUUID->"5597723e-0b2d-4d43-b93e-f96034ffcb06"],
+Cell[4586501, 99686, 476, 10, 24, "Message",ExpressionUUID->"8ef06157-c74b-48e8-9c7f-327d7302c28c"],
 Cell[CellGroupData[{
-Cell[4628799, 100818, 200, 4, 24, "Print",ExpressionUUID->"6d010356-450e-479a-ba67-eeb3e26ec291"],
-Cell[4629002, 100824, 202, 4, 24, "Print",ExpressionUUID->"3f15cc52-1ff6-45cb-a9fd-644d776c5f89"],
-Cell[4629207, 100830, 200, 4, 24, "Print",ExpressionUUID->"4feea194-42f6-4ca1-9312-62f92ec665a5"],
-Cell[4629410, 100836, 202, 4, 24, "Print",ExpressionUUID->"6258c9d5-91a7-48d5-8231-34e495c40fa5"],
-Cell[4629615, 100842, 200, 4, 24, "Print",ExpressionUUID->"ffc76446-691d-4b15-befd-5803a78522c1"],
-Cell[4629818, 100848, 200, 4, 24, "Print",ExpressionUUID->"0837e534-d7bb-47f7-aed6-303356623331"],
-Cell[4630021, 100854, 202, 4, 24, "Print",ExpressionUUID->"f10d2730-aa78-4b6e-80cd-badb4c9a088b"],
-Cell[4630226, 100860, 200, 4, 24, "Print",ExpressionUUID->"38a8da08-2436-4aa2-9ed3-acd6b62059aa"]
+Cell[4587002, 99700, 200, 4, 24, "Print",ExpressionUUID->"6d010356-450e-479a-ba67-eeb3e26ec291"],
+Cell[4587205, 99706, 202, 4, 24, "Print",ExpressionUUID->"3f15cc52-1ff6-45cb-a9fd-644d776c5f89"],
+Cell[4587410, 99712, 200, 4, 24, "Print",ExpressionUUID->"4feea194-42f6-4ca1-9312-62f92ec665a5"],
+Cell[4587613, 99718, 202, 4, 24, "Print",ExpressionUUID->"6258c9d5-91a7-48d5-8231-34e495c40fa5"],
+Cell[4587818, 99724, 200, 4, 24, "Print",ExpressionUUID->"ffc76446-691d-4b15-befd-5803a78522c1"],
+Cell[4588021, 99730, 200, 4, 24, "Print",ExpressionUUID->"0837e534-d7bb-47f7-aed6-303356623331"],
+Cell[4588224, 99736, 202, 4, 24, "Print",ExpressionUUID->"f10d2730-aa78-4b6e-80cd-badb4c9a088b"],
+Cell[4588429, 99742, 200, 4, 24, "Print",ExpressionUUID->"38a8da08-2436-4aa2-9ed3-acd6b62059aa"]
 }, Open  ]],
-Cell[4630441, 100867, 198, 3, 34, "Output",ExpressionUUID->"3bacc01c-d443-45cd-8552-6920b7d54570"]
+Cell[4588644, 99749, 198, 3, 34, "Output",ExpressionUUID->"3bacc01c-d443-45cd-8552-6920b7d54570"]
 }, Closed]],
-Cell[4630654, 100873, 224, 5, 26, "Input",ExpressionUUID->"0a825a05-32b2-4319-8639-70ebb7dae721"],
-Cell[4630881, 100880, 226, 5, 30, "Input",ExpressionUUID->"e4a86cf3-8ee8-4a68-8635-217b0ba4a640"],
-Cell[4631110, 100887, 223, 5, 30, "Input",ExpressionUUID->"4e14b37b-639b-46ea-b50a-b14416358740"],
-Cell[4631336, 100894, 226, 5, 30, "Input",ExpressionUUID->"bf2275c2-8d1c-4d02-b7e4-41137641140c"],
-Cell[4631565, 100901, 224, 5, 30, "Input",ExpressionUUID->"6e0c2be4-ee3a-45fa-b831-83a1095ac1be"],
-Cell[4631792, 100908, 224, 5, 30, "Input",ExpressionUUID->"9186e914-9912-4033-a987-f84144195af6"],
-Cell[4632019, 100915, 224, 5, 30, "Input",ExpressionUUID->"f6a2e77b-0b25-4468-8b4c-79e5f414742d"],
-Cell[4632246, 100922, 222, 5, 30, "Input",ExpressionUUID->"a3b27975-8859-466d-a7c0-b105c7fe73d9"],
-Cell[4632471, 100929, 1318, 40, 94, "Input",ExpressionUUID->"25926e05-bb3c-422b-8e2b-9a57e964ba2b"],
+Cell[4588857, 99755, 224, 5, 26, "Input",ExpressionUUID->"0a825a05-32b2-4319-8639-70ebb7dae721"],
+Cell[4589084, 99762, 226, 5, 30, "Input",ExpressionUUID->"e4a86cf3-8ee8-4a68-8635-217b0ba4a640"],
+Cell[4589313, 99769, 223, 5, 30, "Input",ExpressionUUID->"4e14b37b-639b-46ea-b50a-b14416358740"],
+Cell[4589539, 99776, 226, 5, 30, "Input",ExpressionUUID->"bf2275c2-8d1c-4d02-b7e4-41137641140c"],
+Cell[4589768, 99783, 224, 5, 30, "Input",ExpressionUUID->"6e0c2be4-ee3a-45fa-b831-83a1095ac1be"],
+Cell[4589995, 99790, 224, 5, 30, "Input",ExpressionUUID->"9186e914-9912-4033-a987-f84144195af6"],
+Cell[4590222, 99797, 224, 5, 30, "Input",ExpressionUUID->"f6a2e77b-0b25-4468-8b4c-79e5f414742d"],
+Cell[4590449, 99804, 222, 5, 30, "Input",ExpressionUUID->"a3b27975-8859-466d-a7c0-b105c7fe73d9"],
+Cell[4590674, 99811, 1318, 40, 94, "Input",ExpressionUUID->"25926e05-bb3c-422b-8e2b-9a57e964ba2b"],
 Cell[CellGroupData[{
-Cell[4633814, 100973, 553, 12, 94, "Input",ExpressionUUID->"a36cae1e-df45-49d4-a412-416ac62654e5"],
-Cell[4634370, 100987, 498, 14, 46, "Output",ExpressionUUID->"a396975e-2717-4a82-90d1-7c091fb198e9"]
+Cell[4592017, 99855, 553, 12, 94, "Input",ExpressionUUID->"a36cae1e-df45-49d4-a412-416ac62654e5"],
+Cell[4592573, 99869, 498, 14, 46, "Output",ExpressionUUID->"a396975e-2717-4a82-90d1-7c091fb198e9"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[4634905, 101006, 258, 6, 30, "Input",ExpressionUUID->"9b7c4721-c242-428f-936b-c73b023c8d5b"],
-Cell[4635166, 101014, 632, 18, 56, "Output",ExpressionUUID->"234fb216-0308-486e-aa4f-ee9ceb3aa02b"]
+Cell[4593108, 99888, 258, 6, 30, "Input",ExpressionUUID->"9b7c4721-c242-428f-936b-c73b023c8d5b"],
+Cell[4593369, 99896, 632, 18, 56, "Output",ExpressionUUID->"234fb216-0308-486e-aa4f-ee9ceb3aa02b"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[4635835, 101037, 261, 6, 30, "Input",ExpressionUUID->"38f9a86e-2833-456d-aa7a-12baa82bf6d4"],
-Cell[4636099, 101045, 1757, 56, 85, "Output",ExpressionUUID->"1c05b19f-f3b9-494a-b37f-364f77e0b0b1"]
+Cell[4594038, 99919, 261, 6, 30, "Input",ExpressionUUID->"38f9a86e-2833-456d-aa7a-12baa82bf6d4"],
+Cell[4594302, 99927, 1757, 56, 85, "Output",ExpressionUUID->"1c05b19f-f3b9-494a-b37f-364f77e0b0b1"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[4637893, 101106, 1315, 34, 94, "Input",ExpressionUUID->"b2c199ef-3321-44d3-a08a-1b1de3e1b269"],
-Cell[4639211, 101142, 8708, 229, 381, "Output",ExpressionUUID->"f04f6eb6-3a6c-42bd-b978-23a251c30109"]
+Cell[4596096, 99988, 1315, 34, 94, "Input",ExpressionUUID->"b2c199ef-3321-44d3-a08a-1b1de3e1b269"],
+Cell[4597414, 100024, 8708, 229, 381, "Output",ExpressionUUID->"f04f6eb6-3a6c-42bd-b978-23a251c30109"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4647956, 101376, 1021, 29, 69, "Input",ExpressionUUID->"a7e9b28f-cd05-4629-a301-685337db32b1"],
-Cell[4648980, 101407, 8656, 228, 381, "Output",ExpressionUUID->"fb8aa450-fac0-43d2-94fb-164b894fd43e"]
+Cell[4606159, 100258, 1021, 29, 69, "Input",ExpressionUUID->"a7e9b28f-cd05-4629-a301-685337db32b1"],
+Cell[4607183, 100289, 8656, 228, 381, "Output",ExpressionUUID->"fb8aa450-fac0-43d2-94fb-164b894fd43e"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4657673, 101640, 558, 13, 48, "Input",ExpressionUUID->"1e5b2a80-6558-4a6a-a208-6ffd66be10ca"],
-Cell[4658234, 101655, 155, 3, 34, "Output",ExpressionUUID->"ba76a9bc-1692-4293-93e4-3b98a9ab7916"]
+Cell[4615876, 100522, 558, 13, 48, "Input",ExpressionUUID->"1e5b2a80-6558-4a6a-a208-6ffd66be10ca"],
+Cell[4616437, 100537, 155, 3, 34, "Output",ExpressionUUID->"ba76a9bc-1692-4293-93e4-3b98a9ab7916"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[4658426, 101663, 993, 28, 73, "Input",ExpressionUUID->"0c715131-89c6-40ef-8f9e-32d8bd8c07e3"],
-Cell[4659422, 101693, 6402, 173, 229, "Output",ExpressionUUID->"ee09fd16-2531-4ab1-be6d-4d7237f2c0f6"]
+Cell[4616629, 100545, 993, 28, 73, "Input",ExpressionUUID->"0c715131-89c6-40ef-8f9e-32d8bd8c07e3"],
+Cell[4617625, 100575, 6402, 173, 229, "Output",ExpressionUUID->"ee09fd16-2531-4ab1-be6d-4d7237f2c0f6"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4665861, 101871, 1136, 31, 69, "Input",ExpressionUUID->"192cc319-c4e4-49c2-9aae-8c5e3d52b6b5"],
-Cell[4667000, 101904, 8682, 228, 381, "Output",ExpressionUUID->"72f30e8f-2cdf-4cf1-b2ac-4bad814133c2"]
+Cell[4624064, 100753, 1136, 31, 69, "Input",ExpressionUUID->"192cc319-c4e4-49c2-9aae-8c5e3d52b6b5"],
+Cell[4625203, 100786, 8682, 228, 381, "Output",ExpressionUUID->"72f30e8f-2cdf-4cf1-b2ac-4bad814133c2"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4675719, 102137, 453, 12, 48, "Input",ExpressionUUID->"aa4bbc56-9042-4ac4-9da9-d8a6a099ffb0"],
-Cell[4676175, 102151, 3697, 95, 120, "Output",ExpressionUUID->"5dd7bd0b-df4b-42b4-afa6-169da77820b0"]
+Cell[4633922, 101019, 453, 12, 48, "Input",ExpressionUUID->"aa4bbc56-9042-4ac4-9da9-d8a6a099ffb0"],
+Cell[4634378, 101033, 3697, 95, 120, "Output",ExpressionUUID->"5dd7bd0b-df4b-42b4-afa6-169da77820b0"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[4679909, 102251, 493, 12, 52, "Input",ExpressionUUID->"acbb6382-4324-4bfb-aa84-71272d55c7d4"],
-Cell[4680405, 102265, 156, 3, 34, "Output",ExpressionUUID->"f4100da3-c681-47f2-ac13-8b324b099b4e"]
+Cell[4638112, 101133, 493, 12, 52, "Input",ExpressionUUID->"acbb6382-4324-4bfb-aa84-71272d55c7d4"],
+Cell[4638608, 101147, 156, 3, 34, "Output",ExpressionUUID->"f4100da3-c681-47f2-ac13-8b324b099b4e"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[4680598, 102273, 414, 10, 52, "Input",ExpressionUUID->"1be0f3b4-e047-4a26-9afa-df89d8bb25eb"],
-Cell[4681015, 102285, 3754, 97, 120, "Output",ExpressionUUID->"481fa417-77b8-4946-b4f9-04ed930e142d"]
+Cell[4638801, 101155, 414, 10, 52, "Input",ExpressionUUID->"1be0f3b4-e047-4a26-9afa-df89d8bb25eb"],
+Cell[4639218, 101167, 3754, 97, 120, "Output",ExpressionUUID->"481fa417-77b8-4946-b4f9-04ed930e142d"]
 }, Open  ]],
-Cell[4684784, 102385, 304, 6, 157, "Input",ExpressionUUID->"1e1abde8-f7ad-44b1-99b4-1370e978f66d"]
+Cell[4642987, 101267, 304, 6, 157, "Input",ExpressionUUID->"1e1abde8-f7ad-44b1-99b4-1370e978f66d"]
 }
 ]
 *)