12 lines
440 B
Text
12 lines
440 B
Text
Set: pp::colors
|
|
Set: pp::unicode
|
|
Assumed: p
|
|
Assumed: q
|
|
Assumed: r
|
|
Proved: T1
|
|
Proved: T2
|
|
theorem T2 (H : p) (H::1 : q) : p ∧ q ∧ p := and::intro H (and::intro H::1 H)
|
|
Proved: T3
|
|
theorem T3 (H : p) (H::1 : p ∧ q) (H::2 : r) : q ∧ r ∧ p := and::intro (and::elimr H::1) (and::intro H::2 H)
|
|
Proved: T4
|
|
theorem T4 (H : p) (H::1 : p ∧ q) (H::2 : r) : q ∧ r ∧ p := and::intro (and::elimr H::1) (and::intro H::2 H)
|