18 lines
No EOL
457 B
Text
18 lines
No EOL
457 B
Text
# Set: pp::colors
|
||
Set: pp::unicode
|
||
Proof state:
|
||
a : Bool, b : Bool ⊢ b ⇒ a ∨ b
|
||
## Proof state:
|
||
H : b, a : Bool, b : Bool ⊢ a ∨ b
|
||
## Proof state:
|
||
H : b, a : Bool, b : Bool ⊢ a
|
||
## Proof state:
|
||
H : b, a : Bool, b : Bool ⊢ b
|
||
## Error (line: 10, pos: 0) failed to backtrack
|
||
Proof state:
|
||
H : b, a : Bool, b : Bool ⊢ b
|
||
## Proof state:
|
||
no goals
|
||
## Proved: T2
|
||
# theorem T2 (a b : Bool) : b ⇒ a ∨ b := discharge (λ H : b, or::intror a H)
|
||
# |