tnt 1.0.2

Simple runtime validated proofs in number theory
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87

use std::convert::TryFrom;

use tnt::{Deduction, Formula, LogicError, Term};

fn main() -> Result<(), LogicError> {
    let b = &Term::var("b");
    let c = &Term::var("c");
    let d = &Term::var("d");
    let sc = &Term::try_from("Sc")?;
    let sd = &Term::try_from("Sd")?;
    let zero = &Term::Zero;

    let t = &Formula::try_from("Ad:Ac:(c+d)=(d+c)")?;
    let mut e = Deduction::new("Prove That Addition Commutes");
    e.add_axiom(2)?; //0
    e.specification(0, "a", d)?; //1
    e.specification(1, "b", sc)?; //2
    e.specification(0, "a", sd)?; //3
    e.specification(3, "b", c)?; //4
    e.symmetry(4)?; //5

    e.supposition(Formula::try_from("Ad:(d+Sc)=(Sd+c)")?)?; //6
    e.specification(6, "d", d)?; //7
    e.successor(7)?; //8
    e.transitivity(2, 8)?; //9
    e.transitivity(9, 5)?;
    e.generalization(10, "d")?;
    e.implication()?;

    e.generalization(12, "c")?;
    e.specification(1, "b", zero)?;
    e.add_axiom(1)?;
    e.specification(15, "a", d)?;
    e.successor(16)?;
    e.transitivity(14, 17)?;
    e.specification(15, "a", sd)?;
    e.symmetry(19)?;
    e.transitivity(18, 20)?;
    e.generalization(21, "d")?;
    e.induction("c", 22, 13)?;
    e.specification(0, "a", c)?;
    e.specification(24, "b", d)?;
    e.specification(0, "a", d)?;
    e.specification(26, "b", c)?;
    e.symmetry(27)?;
    e.specification(23, "c", c)?;
    e.specification(29, "d", d)?;

    e.supposition(Formula::try_from("Ac:(c+d)=(d+c)")?)?;
    e.specification(31, "c", c)?;
    e.successor(32)?;
    e.transitivity(25, 33)?;
    e.transitivity(34, 28)?;
    e.transitivity(35, 30)?;
    e.generalization(36, "c")?;
    e.implication()?;

    e.generalization(38, "d")?;
    e.specification(15, "a", c)?;
    e.specification(0, "a", zero)?;
    e.specification(41, "b", b)?;

    e.supposition(Formula::try_from("(0+b)=b")?)?;
    e.successor(43)?;
    e.transitivity(42, 44)?;
    e.implication()?;

    e.generalization(46, "b")?;
    e.specification(15, "a", zero)?;
    e.induction("b", 48, 47)?;
    e.specification(49, "b", c)?;
    e.symmetry(50)?;
    e.transitivity(40, 51)?;
    e.generalization(52, "c")?;
    e.induction("d", 53, 39)?;

    assert_eq!(e.last_theorem().formula, *t);

    println!("{}", e.pretty_string());

    // match e.latex_file("commutativity") {
    //     Ok(_) => println!("\nSuccessfully created .tex file!"),
    //     Err(w) => println!("\nError: {}", w),
    // };

    Ok(())
}