比纳 我在运动，用O（log n）重新实现自然数。 动机 我在伊德里斯的实践和证明 Nat性能非常慢（尝试从fromIntegerNat 100 * 100尝试） 使用Int或原始的东西，我们不能通过归纳来编写证明 产品特点 BiNat将自然数定义为有限的位序列。 这样，我们具有以下功能： 0不是自然数因为每个序列都应以1开头 定义自然数n的成本为O（log n） 通过功能BiNat.Properties.Induction.induction归纳。归纳 请注意，n在结构上不小于n + 1