kernel-Nat.bit_add_right
- Kind
- kernel-term
- Status
- checked
Supports: ∀ (b : Bool) (n m : ℕ), Nat.bit b (n + m) = Nat.bit b n + Nat.bit false m
test "$(cargo run -q -p axeyum-lean-kernel --example nat_theorem_inventory -- bit_add_right 2>/dev/null | grep -Ec '^Nat\.bit_add_right[[:space:]]')" -ge 1 Evidence notes
`build_nat_prelude` admits `Nat.bit_add_right` through the trusted `Kernel::add_declaration` gate, declared in `nat_prelude/bit_extra.rs` (a new module, kept separate from `bits.rs`'s own dense theorem set). `nat_theorem_inventory`'s rendered type is `((x0 : Bool) -> ((x1 : AxNat) -> ((x2 : AxNat) -> Eq.{1} AxNat (AxNat.bit x0 (AxNat.add x1 x2)) (AxNat.add (AxNat.bit x0 x1) (AxNat.bit Bool.false x2)))))`, matching this fact's `formal.statement`. `nat_theorem_inventory` exits non-zero for a name that does not exist, and the `grep -c` count (tested `-ge 1`, not piped into `grep -q`) requires the admitted declaration to actually be printed. Verified both ways: the real name greps to a count `-ge 1`; grepping a made-up name (`Nat.bit_add_right_bogus`) greps to `0`.