PROOF.ptr.gof_app: def of bend-osdev-apparmor@0.1.0.0
Import: import bend-osdev-apparmor@0.1.0.0/PROOF.bend as PROOF
Lines 3687-3694 of bend-osdev-apparmor@0.1.0.0/PROOF.bend: https://jend.leeeet.dev/read.txt?path=bend-osdev-apparmor@0.1.0.0/PROOF.bend&start_line=3687&end_line=3694

import Base
import bend-osdev-apparmor@0.1.0.0/perm.bend as P
import bend-osdev-apparmor@0.1.0.0/rule_ptrace.bend as RP

def ptr.gof_app(+xs: List<&2, RP.AaPtraceRule>, +ys: List<&2, RP.AaPtraceRule>) -> {RP.AaPtraceRule.grants.of(RP.AaPtraceRule.append(xs, ys)) == P.AaGrant.append(RP.AaPtraceRule.grants.of(xs), RP.AaPtraceRule.grants.of(ys)) : List<&2, P.AaGrant>}:
  match xs:
    case Nil{}:
      {==}
    case Con{r, t}:
      match r:
        case RP.AaPtraceRule{qu, p, pe}:
          Equal.cong(List<&2, P.AaGrant>, List<&2, P.AaGrant>, x => Con{P.AaGrant.of(qu, p), x}, RP.AaPtraceRule.grants.of(RP.AaPtraceRule.append(t, ys)), P.AaGrant.append(RP.AaPtraceRule.grants.of(t), RP.AaPtraceRule.grants.of(ys)), ptr.gof_app(t, ys))

Uses (8):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Equal.cong
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-apparmor@0.1.0.0/perm.bend&name=AaGrant
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-apparmor@0.1.0.0/perm.bend&name=AaGrant.append
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-apparmor@0.1.0.0/perm.bend&name=AaGrant.of
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-apparmor@0.1.0.0/rule_ptrace.bend&name=AaPtraceRule
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-apparmor@0.1.0.0/rule_ptrace.bend&name=AaPtraceRule.append
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-apparmor@0.1.0.0/rule_ptrace.bend&name=AaPtraceRule.grants.of