@[extern lean_nat_shiftl]
Equations
- Nat.shiftLeft x 0 = x
- Nat.shiftLeft x (Nat.succ m) = Nat.shiftLeft (2 * x) m
@[extern lean_nat_shiftr]
Equations
- Nat.shiftRight x 0 = x
- Nat.shiftRight x (Nat.succ m) = Nat.shiftRight x m / 2
Equations
- Nat.instShiftLeftNat = { shiftLeft := Nat.shiftLeft }
Equations
- Nat.instShiftRightNat = { shiftRight := Nat.shiftRight }