6 lines
295 B
Text
6 lines
295 B
Text
a + of_num b = 10 : Prop
|
|
@eq.{1} nat
|
|
(@add.{1} nat nat_has_add ((λ (x : nat), x) a) (nat.of_num (@bit0.{1} num num_has_add (@one.{1} num num_has_one))))
|
|
(@bit0.{1} nat nat_has_add
|
|
(@bit1.{1} nat nat_has_one nat_has_add (@bit0.{1} nat nat_has_add (@one.{1} nat nat_has_one)))) :
|
|
Prop
|