9 lines
252 B
Text
9 lines
252 B
Text
new_frontend
|
||
|
||
infix:65 " +' " => HasAdd.add
|
||
infix:70 " *' " => HasMul.mul
|
||
infixr:30 " OR " => Or
|
||
prefix:40 "NOT " => Not
|
||
|
||
theorem ex (a b c d : Nat) (p : Prop) : (NOT p OR a = b*'c +' c*'a OR a = b *' c) = (¬ p ∨ a = b*c + c*a ∨ a = b * c) :=
|
||
rfl
|