PROOFWhole.ckw.glt: def of bend-osdev-acpi@0.1.2.0
Import: import bend-osdev-acpi@0.1.2.0/PROOF_whole.bend as PROOFWhole
Lines 134-139 of bend-osdev-acpi@0.1.2.0/PROOF_whole.bend: https://jend.leeeet.dev/read.txt?path=bend-osdev-acpi@0.1.2.0/PROOF_whole.bend&start_line=134&end_line=139

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

def ckw.glt(+i: Nat, +p: B.Octets, +q: U32, +rest: B.Octets, +hp: {B.Octets.len(p) == i : Nat}) -> {Nat.is_lt(i, B.Octets.len(B.Octets.append(p, B.Octets.append(B.Octets.of_list([q]), rest)))) == True{} : Bool}:
  %Equal.sym(Nat, B.Octets.len(B.Octets.append(p, B.Octets.append(B.Octets.of_list([q]), rest))), Nat.add(B.Octets.len(p), B.Octets.len(B.Octets.append(B.Octets.of_list([q]), rest))), BL.octets_len_append(p, B.Octets.append(B.Octets.of_list([q]), rest))) : {Nat.is_lt(i, _) == True{} : Bool}
  %Equal.sym(Nat, B.Octets.len(p), i, hp) : {Nat.is_lt(i, Nat.add(_, B.Octets.len(B.Octets.append(B.Octets.of_list([q]), rest)))) == True{} : Bool}
  %Equal.sym(Nat, B.Octets.len(B.Octets.append(B.Octets.of_list([q]), rest)), Nat.add(B.Octets.len(B.Octets.of_list([q])), B.Octets.len(rest)), BL.octets_len_append(B.Octets.of_list([q]), rest)) : {Nat.is_lt(i, Nat.add(i, _)) == True{} : Bool}
  %Equal.sym(Nat, B.Octets.len(B.Octets.of_list([q])), B.len([q]), BL.octets_len_of_list([q])) : {Nat.is_lt(i, Nat.add(i, Nat.add(_, B.Octets.len(rest)))) == True{} : Bool}
  ckw.ltadd(i, B.Octets.len(rest))

Uses (15):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Equal.sym
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.add
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.is_lt
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-acpi@0.1.2.0/PROOF_whole.bend&name=ckw.ltadd
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-bytes@0.1.1.1/LAWS.bend&name=octets_len_append
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-bytes@0.1.1.1/LAWS.bend&name=octets_len_of_list
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-bytes@0.1.1.1/bytes.bend&name=Octets
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-bytes@0.1.1.1/bytes.bend&name=Octets.append
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-bytes@0.1.1.1/bytes.bend&name=Octets.len
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-bytes@0.1.1.1/bytes.bend&name=Octets.of_list
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-bytes@0.1.1.1/bytes.bend&name=len