private void workComplete(object sender, WorkFinishedEventArgs <Tree> args)
{
string status;
if (args.Completed)
{
tree = args.Result;
setEnabled(bShowTree, true);
setEnabled(bSaveTree, true);
if (tree.State == TreeState.Closed)
{
proof = new Subproof(premises);
Subproof sproof = (Subproof)proof;
proof.FirstLineNumber = 1;
List <WFF> assumptions = new List <WFF>();
assumptions.Add(conclusion.GetNegation());
Subproof sub = new Subproof(assumptions);
sub.parent = proof;
sub.AddTree(tree);
sproof.steps.Add(sub);
sproof.steps.Add(new ProofLine(conclusion, FOL.Proofs.Rule.NotIntro, sub));
proof.Clean();
setEnabled(bShowProof, true);
setEnabled(bSaveProof, true);
setText(lConclusion, "Valid");
}
else if (tree.State == TreeState.Open)
{
setText(lConclusion, "Invalid");
}
else
{
setText(lConclusion, "Unknown");
}
setTab(2);
status = "Done";
}
else if (args.Cancelled)
{
status = "Stopped";
}
else
{
status = "Error";
}
setStatus(status);
setText(lTime, args.Time.ToString());
setEnabled(bParse, true);
setEnabled(bSatisfy, false);
setEnabled(bStop, false);
}
internal static void AddTree(this Subproof p, Tree t)
{
if (t == null)
{
throw new ArgumentNullException();
}
if (t.State != TreeState.Closed)
{
throw new InvalidOperationException();
}
if (t.decomposed == null)
{
// Something got a contradiction here, find out what
List <WFF> all = t.getAllSentences();
WFF c1 = null;
WFF c2 = null;
for (int a = 0; a < all.Count; a++)
{
if (all[a] is Negation)
{
Negation n = (Negation)all[a];
if (n.inner is Identity)
{
Identity i = (Identity)n.inner;
if (i.left.Equals(i.right))
{
c1 = all[a];
break;
}
}
}
else if (all[a] is Contradiction)
{
c1 = all[a];
break;
}
bool found = false;
for (int b = a + 1; b < all.Count; b++)
{
if (all[a].Equals(all[b].GetNegation()) || all[b].Equals(all[a].GetNegation()))
{
c1 = all[a];
c2 = all[b];
found = true;
break;
}
}
if (found)
{
break;
}
}
Proof p1 = p.Find(c1);
if (p1 == null)
{
throw new InvalidOperationException("p1");
}
if (c2 == null)
{
p.steps.Add(new ProofLine(new Contradiction(), Rule.ContradictionIntro, p1));
}
else
{
Proof p2 = p.Find(c2);
if (p2 == null)
{
throw new InvalidOperationException("p2");
}
p.steps.Add(new ProofLine(new Contradiction(), Rule.ContradictionIntro, p1, p2));
}
return;
}
Proof d = p.Find(t.decomposed);
if (t.decomposed is Biconditional)
{
// Add the steps for Equiv
Biconditional b = (Biconditional)t.decomposed;
Disjunction equ = new Disjunction(
new Conjunction(b.left, b.right),
new Conjunction(b.left.GetNegation(), b.right.GetNegation()));
ProofLine equp = new ProofLine(equ, Rule.Equivalence, d);
p.steps.Add(equp);
ProofLine plleft = new ProofLine(equ.disjuncts[0], Rule.Assumption);
Subproof left = new Subproof();
left.parent = p;
left.assumptions.Add(plleft);
left.steps.Add(new ProofLine(b.left, Rule.AndElim, plleft));
left.steps.Add(new ProofLine(b.right, Rule.AndElim, plleft));
AddTree(left, t.children[0]);
p.steps.Add(left);
ProofLine plright = new ProofLine(equ.disjuncts[1], Rule.Assumption);
Subproof right = new Subproof();
right.parent = p;
right.assumptions.Add(plright);
right.steps.Add(new ProofLine(b.left.GetNegation(), Rule.AndElim, plright));
right.steps.Add(new ProofLine(b.right.GetNegation(), Rule.AndElim, plright));
AddTree(right, t.children[1]);
p.steps.Add(right);
p.steps.Add(new ProofLine(new Contradiction(), Rule.OrElim, equp, left, right));
}
else if (t.decomposed is Conditional)
{
// Add the steps for Impl
Conditional c = (Conditional)t.decomposed;
Disjunction imp = new Disjunction(c.antecedent.GetNegation(), c.consequent);
ProofLine impp = new ProofLine(imp, Rule.Implication, d);
p.steps.Add(impp);
Proof[] steps = new Proof[t.children.Length + 1];
steps[0] = impp;
for (int a = 0; a < t.children.Length; a++)
{
steps[a + 1] = new Subproof();
Subproof s = (Subproof)steps[a + 1];
s.parent = p;
s.assumptions.Add(new ProofLine(t.children[a].sentences[0], Rule.Assumption));
AddTree(s, t.children[a]);
p.steps.Add(s);
}
p.steps.Add(new ProofLine(new Contradiction(), Rule.OrElim, steps));
}
else if (t.decomposed is Conjunction)
{
foreach (WFF f in t.children[0].sentences)
{
p.steps.Add(new ProofLine(f, Rule.AndElim, d));
}
AddTree(p, t.children[0]);
}
else if (t.decomposed is Disjunction)
{
Proof[] steps = new Proof[t.children.Length + 1];
steps[0] = d;
for (int a = 0; a < t.children.Length; a++)
{
steps[a + 1] = new Subproof();
Subproof s = (Subproof)steps[a + 1];
s.parent = p;
s.assumptions.Add(new ProofLine(t.children[a].sentences[0], Rule.Assumption));
AddTree(s, t.children[a]);
p.steps.Add(s);
}
p.steps.Add(new ProofLine(new Contradiction(), Rule.OrElim, steps));
}
else if (t.decomposed is Existential)
{
Subproof sub = new Subproof();
sub.parent = p;
sub.assumptions.Add(new ProofLine(t.children[0].sentences[0], Rule.Assumption));
AddTree(sub, t.children[0]);
p.steps.Add(sub);
p.steps.Add(new ProofLine(new Contradiction(), Rule.ExistentialElim, d, sub));
}
else if (t.decomposed is Identity)
{
// Need to add some way to find the other source
foreach (WFF f in t.children[0].sentences)
{
p.steps.Add(new ProofLine(f, Rule.EqualsElim, d));
}
AddTree(p, t.children[0]);
}
else if (t.decomposed is Negation)
{
Negation n = (Negation)t.decomposed;
if (n.inner is Biconditional)
{
// I really hope there is a better way for this one
// Add the steps for DeM and Equiv
Biconditional b = (Biconditional)n.inner;
ProofLine equ = new ProofLine(new Negation(new Conjunction(new Disjunction(b.left.GetNegation(), b.right), new Disjunction(b.left, b.right.GetNegation()))), Rule.Equivalence, d);
p.steps.Add(equ);
ProofLine dem = new ProofLine(new Disjunction(new Negation(new Disjunction(b.left.GetNegation(), b.right)), new Negation(new Disjunction(b.left, b.right.GetNegation()))), Rule.DeMorgans, equ);
p.steps.Add(dem);
Subproof left = new Subproof();
left.parent = p;
ProofLine plleft = new ProofLine(new Negation(new Disjunction(b.left.GetNegation(), b.right)), Rule.Assumption);
left.assumptions.Add(plleft);
ProofLine demleft = new ProofLine(new Conjunction(b.left, b.right.GetNegation()), Rule.DeMorgans, plleft);
left.steps.Add(demleft);
left.steps.Add(new ProofLine(b.left, Rule.AndElim, demleft));
left.steps.Add(new ProofLine(b.right.GetNegation(), Rule.AndElim, demleft));
AddTree(left, t.children[1]);
p.steps.Add(left);
Subproof right = new Subproof();
right.parent = p;
ProofLine plright = new ProofLine(new Negation(new Disjunction(b.left, b.right.GetNegation())), Rule.Assumption);
right.assumptions.Add(plright);
ProofLine demright = new ProofLine(new Conjunction(b.left.GetNegation(), b.right), Rule.DeMorgans, plright);
right.steps.Add(demright);
right.steps.Add(new ProofLine(b.left.GetNegation(), Rule.AndElim, demright));
right.steps.Add(new ProofLine(b.right, Rule.AndElim, demright));
AddTree(right, t.children[0]);
p.steps.Add(right);
p.steps.Add(new ProofLine(new Contradiction(), Rule.OrElim, dem, left, right));
}
else if (n.inner is Conditional)
{
// Add the steps for DeM and Impl
Conditional c = (Conditional)n.inner;
ProofLine imp = new ProofLine(new Negation(new Disjunction(c.antecedent.GetNegation(), c.consequent)), Rule.Implication, d);
p.steps.Add(imp);
ProofLine dem = new ProofLine(new Conjunction(c.antecedent, c.consequent.GetNegation()), Rule.DeMorgans, imp);
p.steps.Add(dem);
p.steps.Add(new ProofLine(c.antecedent, Rule.AndElim, dem));
p.steps.Add(new ProofLine(c.consequent.GetNegation(), Rule.AndElim, dem));
AddTree(p, t.children[0]);
}
else if (n.inner is Conjunction)
{
// Add the steps for DeM
Conjunction i = (Conjunction)n.inner;
List <WFF> neg = new List <WFF>();
foreach (WFF f in i.conjuncts)
{
neg.Add(f.GetNegation());
}
Disjunction dem = new Disjunction(neg.ToArray());
ProofLine demp = new ProofLine(dem, Rule.DeMorgans, d);
p.steps.Add(demp);
Proof[] steps = new Proof[t.children.Length + 1];
steps[0] = demp;
for (int a = 0; a < t.children.Length; a++)
{
steps[a + 1] = new Subproof();
Subproof s = (Subproof)steps[a + 1];
s.parent = p;
s.assumptions.Add(new ProofLine(t.children[a].sentences[0], Rule.Assumption));
AddTree(s, t.children[a]);
p.steps.Add(s);
}
p.steps.Add(new ProofLine(new Contradiction(), Rule.OrElim, steps));
}
else if (n.inner is Disjunction)
{
// Add the steps for DeM
Disjunction i = (Disjunction)n.inner;
List <WFF> neg = new List <WFF>();
foreach (WFF f in i.disjuncts)
{
neg.Add(f.GetNegation());
}
Conjunction dem = new Conjunction(neg.ToArray());
ProofLine demp = new ProofLine(dem, Rule.DeMorgans, d);
p.steps.Add(demp);
foreach (WFF f in t.children[0].sentences)
{
p.steps.Add(new ProofLine(f, Rule.AndElim, demp));
}
AddTree(p, t.children[0]);
}
else if (n.inner is Existential)
{
// Add the steps for DeM
p.steps.Add(new ProofLine(t.children[0].sentences[0], Rule.DeMorgans, d));
AddTree(p, t.children[0]);
}
else if (n.inner is Negation)
{
p.steps.Add(new ProofLine(t.children[0].sentences[0], Rule.NotElim, d));
AddTree(p, t.children[0]);
}
else if (n.inner is Universal)
{
// Add the steps for DeM
p.steps.Add(new ProofLine(t.children[0].sentences[0], Rule.DeMorgans, d));
AddTree(p, t.children[0]);
}
}
else if (t.decomposed is Universal)
{
foreach (WFF f in t.children[0].sentences)
{
p.steps.Add(new ProofLine(f, Rule.UniversalElim, d));
}
AddTree(p, t.children[0]);
}
}