def ckr.fit
bend-osdev-acpi@0.1.2.0 · PROOF_rsdp.bend:42
import bend-osdev-acpi@0.1.2.0/PROOF_rsdp.bend as PROOFRsdp
import Base
import bend-osdev-bytes@0.1.1.1/bytes.bend as B
import bend-osdev-bytes@0.1.1.1/LAWS.bend as BL
import bend-osdev-acpi@0.1.2.0/fields.bend as F
42def ckr.fit(+oem: B.Octets, +oem6: {B.Octets.len(oem) == 6n : Nat}) -> {F.AcpiF.fit(6n, oem) == oem : B.Octets}:
43 %oem6 : {B.Octets.append(B.Octets.take(_, oem), B.Octets.zeros(Nat.sub(_, B.Octets.len(B.Octets.take(_, oem))))) == oem : B.Octets}
44 %Equal.sym(B.Octets, B.Octets.take(B.Octets.len(oem), oem), oem, BL.octets_take_len(oem)) : {B.Octets.append(_, B.Octets.zeros(Nat.sub(B.Octets.len(oem), B.Octets.len(_)))) == oem : B.Octets}
45 %Equal.sym(Nat, Nat.sub(B.Octets.len(oem), B.Octets.len(oem)), 0n, ckr.subn(B.Octets.len(oem))) : {B.Octets.append(oem, B.Octets.zeros(_)) == oem : B.Octets}
46 %Equal.sym(B.Octets, B.Octets.zeros(0n), B.Octets.empty(), ckr.z0()) : {B.Octets.append(oem, _) == oem : B.Octets}
47 BL.octets_append_empty_r(oem)