def cnt.d100

bend-osdev-acpi@0.1.1.0 · PROOF.bend:1266

import bend-osdev-acpi@0.1.1.0/PROOF.bend as PROOF
import Base
import bend-osdev-bytes@0.1.1.0/bytes.bend as B

1266def cnt.d100(+k: Nat, +lt: {Nat.is_lt(Nat.add(100n, k), 256n) == True{} : Bool}) -> {U32.to_nat(B.byte(U32.from_nat(Nat.add(100n, k)))) == Nat.add(100n, k) : Nat}:
1267  match k:
1268    case 0n:
1269      {==}
1270    case 1n+p:
1271      cnt.d101(p, lt)

Uses (8)

Used by (1)