2014-09-15 17:25:07 +00:00
|
|
|
-- BEGINWAIT
|
|
|
|
|
-- ENDWAIT
|
|
|
|
|
-- BEGINSET
|
|
|
|
|
-- ENDSET
|
|
|
|
|
-- BEGINFINDP
|
|
|
|
|
pos_num.bit0|pos_num → pos_num
|
|
|
|
|
pos_num.is_inhabited|inhabited pos_num
|
|
|
|
|
pos_num.inc|pos_num → pos_num
|
2014-10-25 20:36:38 +00:00
|
|
|
pos_num.induction_on|Π (n : pos_num), ?C pos_num.one → (Π (a : pos_num), ?C a → ?C (pos_num.bit1 a)) → (Π (a : pos_num), ?C a → ?C (pos_num.bit0 a)) → ?C n
|
2014-09-15 17:25:07 +00:00
|
|
|
pos_num.bit1|pos_num → pos_num
|
|
|
|
|
pos_num.rec|?C pos_num.one → (Π (a : pos_num), ?C a → ?C (pos_num.bit1 a)) → (Π (a : pos_num), ?C a → ?C (pos_num.bit0 a)) → (Π (n : pos_num), ?C n)
|
|
|
|
|
pos_num.one|pos_num
|
|
|
|
|
pos_num.num_bits|pos_num → pos_num
|
2014-10-25 18:32:26 +00:00
|
|
|
pos_num.rec_on|Π (n : pos_num), ?C pos_num.one → (Π (a : pos_num), ?C a → ?C (pos_num.bit1 a)) → (Π (a : pos_num), ?C a → ?C (pos_num.bit0 a)) → ?C n
|
2014-09-15 17:25:07 +00:00
|
|
|
pos_num|Type
|
|
|
|
|
-- ENDFINDP
|
|
|
|
|
-- BEGINWAIT
|
|
|
|
|
-- ENDWAIT
|
|
|
|
|
-- BEGINWAIT
|
|
|
|
|
-- ENDWAIT
|
|
|
|
|
-- BEGINFINDP
|
|
|
|
|
pos_num.size|pos_num → pos_num
|
|
|
|
|
pos_num.bit0|pos_num → pos_num
|
|
|
|
|
pos_num.is_inhabited|inhabited pos_num
|
|
|
|
|
pos_num.inc|pos_num → pos_num
|
2014-10-25 20:36:38 +00:00
|
|
|
pos_num.induction_on|Π (n : pos_num), ?C pos_num.one → (Π (a : pos_num), ?C a → ?C (pos_num.bit1 a)) → (Π (a : pos_num), ?C a → ?C (pos_num.bit0 a)) → ?C n
|
2014-09-15 17:25:07 +00:00
|
|
|
pos_num.bit1|pos_num → pos_num
|
|
|
|
|
pos_num.rec|?C pos_num.one → (Π (a : pos_num), ?C a → ?C (pos_num.bit1 a)) → (Π (a : pos_num), ?C a → ?C (pos_num.bit0 a)) → (Π (n : pos_num), ?C n)
|
|
|
|
|
pos_num.one|pos_num
|
2014-10-25 18:32:26 +00:00
|
|
|
pos_num.rec_on|Π (n : pos_num), ?C pos_num.one → (Π (a : pos_num), ?C a → ?C (pos_num.bit1 a)) → (Π (a : pos_num), ?C a → ?C (pos_num.bit0 a)) → ?C n
|
2014-09-15 17:25:07 +00:00
|
|
|
pos_num|Type
|
|
|
|
|
-- ENDFINDP
|
|
|
|
|
-- BEGINFINDP
|
|
|
|
|
pos_num.size|pos_num → pos_num
|
|
|
|
|
pos_num.bit0|pos_num → pos_num
|
|
|
|
|
pos_num.is_inhabited|inhabited pos_num
|
|
|
|
|
pos_num.inc|pos_num → pos_num
|
2014-10-25 20:36:38 +00:00
|
|
|
pos_num.induction_on|Π (n : pos_num), ?C pos_num.one → (Π (a : pos_num), ?C a → ?C (pos_num.bit1 a)) → (Π (a : pos_num), ?C a → ?C (pos_num.bit0 a)) → ?C n
|
2014-09-15 17:25:07 +00:00
|
|
|
pos_num.bit1|pos_num → pos_num
|
|
|
|
|
pos_num.rec|?C pos_num.one → (Π (a : pos_num), ?C a → ?C (pos_num.bit1 a)) → (Π (a : pos_num), ?C a → ?C (pos_num.bit0 a)) → (Π (n : pos_num), ?C n)
|
|
|
|
|
pos_num.one|pos_num
|
2014-10-25 18:32:26 +00:00
|
|
|
pos_num.rec_on|Π (n : pos_num), ?C pos_num.one → (Π (a : pos_num), ?C a → ?C (pos_num.bit1 a)) → (Π (a : pos_num), ?C a → ?C (pos_num.bit0 a)) → ?C n
|
2014-09-15 17:25:07 +00:00
|
|
|
pos_num|Type
|
|
|
|
|
-- ENDFINDP
|
