def dbs.gof_app

bend-osdev-apparmor@0.1.0.0 · PROOF.bend:3773

import Base
import bend-osdev-apparmor@0.1.0.0/perm.bend as P
import bend-osdev-apparmor@0.1.0.0/rule_dbus.bend as RD

3773def dbs.gof_app(+xs: List<&2, RD.AaDbusRule>, +ys: List<&2, RD.AaDbusRule>) -> {RD.AaDbusRule.grants.of(RD.AaDbusRule.append(xs, ys)) == P.AaGrant.append(RD.AaDbusRule.grants.of(xs), RD.AaDbusRule.grants.of(ys)) : List<&2, P.AaGrant>}:
3774  match xs:
3775    case Nil{}:
3776      {==}
3777    case Con{r, t}:
3778      match r:
3779        case RD.AaDbusRule{qu, p, bus, path, iface, member, name, pn, pl}:
3780          Equal.cong(List<&2, P.AaGrant>, List<&2, P.AaGrant>, x => Con{P.AaGrant.of(qu, p), x}, RD.AaDbusRule.grants.of(RD.AaDbusRule.append(t, ys)), P.AaGrant.append(RD.AaDbusRule.grants.of(t), RD.AaDbusRule.grants.of(ys)), dbs.gof_app(t, ys))