def ckw.okq

bend-osdev-acpi@0.1.2.0 · PROOF_whole.bend:204

import Base
import bend-osdev-bytes@0.1.1.1/bytes.bend as B
import bend-osdev-acpi@0.1.2.0/header.bend as H
import bend-osdev-acpi@0.1.2.0/checksum.bend as C
import bend-osdev-acpi@0.1.2.0/LAWS_checksum.bend as CL

204def ckw.okq(+s: B.Octets, +l: U32, +r: U32, +c: U32, +o: B.Octets, +t: B.Octets, +orv: U32, +ci: B.Octets, +cr: U32, +sig4: {B.Octets.len(s) == 4n : Nat}, +oem6: {B.Octets.len(o) == 6n : Nat}, +tid8: {B.Octets.len(t) == 8n : Nat}, +cid4: {B.Octets.len(ci) == 4n : Nat}, +body: B.Octets) -> {C.AcpiChecksum.ok(B.Octets.append(H.AcpiHeader.encode(H.AcpiHeader{s, U32.from_nat(Nat.add(36n, B.Octets.len(body))), r, C.AcpiChecksum.byte_for(9n, B.Octets.append(H.AcpiHeader.encode(H.AcpiHeader{s, U32.from_nat(Nat.add(36n, B.Octets.len(body))), r, 0, o, t, orv, ci, cr}), body)), o, t, orv, ci, cr}), body)) == True{} : Bool}:
205  %ckw.bl1(s, l, r, c, o, t, orv, ci, cr, sig4, body) : {C.AcpiChecksum.ok(_) == True{} : Bool}
206  CL.fix_ok(9n, B.Octets.append(H.AcpiHeader.encode(H.AcpiHeader{s, U32.from_nat(Nat.add(36n, B.Octets.len(body))), r, 0, o, t, orv, ci, cr}), body), ckw.hlt(s, l, r, c, o, t, orv, ci, cr, sig4, oem6, tid8, cid4, body))