2013-12-06 22:42:49 +00:00
|
|
|
# Set: pp::colors
|
|
|
|
Set: pp::unicode
|
|
|
|
Proved: T1
|
2014-01-05 20:05:08 +00:00
|
|
|
theorem T1 (A B : Bool) (assumption : A ∧ B) : B ∧ A :=
|
2014-01-09 16:33:52 +00:00
|
|
|
let lemma1 : A := and_eliml assumption, lemma2 : B := and_elimr assumption in and_intro lemma2 lemma1
|
2013-12-06 23:01:54 +00:00
|
|
|
# Proof state:
|
2013-12-06 22:42:49 +00:00
|
|
|
A : Bool, B : Bool, assumption : A ∧ B ⊢ A
|
|
|
|
## Proof state:
|
|
|
|
no goals
|
|
|
|
## Proof state:
|
|
|
|
A : Bool, B : Bool, assumption : A ∧ B, lemma1 : A ⊢ B
|
|
|
|
## Proof state:
|
|
|
|
no goals
|
|
|
|
## Proof state:
|
|
|
|
A : Bool, B : Bool, assumption : A ∧ B, lemma1 : A, lemma2 : B ⊢ B ∧ A
|
|
|
|
## Proof state:
|
|
|
|
no goals
|
|
|
|
## Proved: T2
|
|
|
|
# Proof state:
|
|
|
|
A : Bool, B : Bool, assumption : A ∧ B ⊢ A
|
|
|
|
## Proof state:
|
|
|
|
A : Bool, B : Bool, assumption::1 : A, assumption::2 : B ⊢ A
|
|
|
|
## Proof state:
|
|
|
|
no goals
|
|
|
|
## Proof state:
|
|
|
|
A : Bool, B : Bool, assumption : A ∧ B, lemma1 : A ⊢ B
|
|
|
|
## Proof state:
|
|
|
|
A : Bool, B : Bool, assumption::1 : A, assumption::2 : B, lemma1 : A ⊢ B
|
|
|
|
## Proof state:
|
|
|
|
no goals
|
|
|
|
## Proof state:
|
|
|
|
A : Bool, B : Bool, assumption : A ∧ B, lemma1 : A, lemma2 : B ⊢ B ∧ A
|
|
|
|
## Proof state:
|
|
|
|
A : Bool, B : Bool, assumption : A ∧ B, lemma1 : A, lemma2 : B ⊢ B
|
|
|
|
A : Bool, B : Bool, assumption : A ∧ B, lemma1 : A, lemma2 : B ⊢ A
|
|
|
|
## Proof state:
|
|
|
|
no goals
|
|
|
|
## Proved: T3
|
|
|
|
# Proof state:
|
|
|
|
A : Bool, B : Bool, assumption : A ∧ B ⊢ A
|
|
|
|
## Proof state:
|
|
|
|
A : Bool, B : Bool, assumption::1 : A, assumption::2 : B ⊢ A
|
|
|
|
## Proof state:
|
|
|
|
no goals
|
|
|
|
## Proof state:
|
|
|
|
A : Bool, B : Bool, assumption : A ∧ B, lemma1 : A ⊢ B
|
|
|
|
## Proof state:
|
|
|
|
A : Bool, B : Bool, assumption::1 : A, assumption::2 : B, lemma1 : A ⊢ B
|
|
|
|
## Proof state:
|
|
|
|
no goals
|
|
|
|
## Proved: T4
|
|
|
|
#
|