def file.gof_app

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

import Base
import bend-osdev-apparmor@0.1.0.0/perm.bend as P
import bend-osdev-apparmor@0.1.0.0/rule_file.bend as F

3515def file.gof_app(+xs: List<&2, F.AaFileRule>, +ys: List<&2, F.AaFileRule>) -> {F.AaFileRule.grants.of(F.AaFileRule.append(xs, ys)) == P.AaGrant.append(F.AaFileRule.grants.of(xs), F.AaFileRule.grants.of(ys)) : List<&2, P.AaGrant>}:
3516  match xs:
3517    case Nil{}:
3518      {==}
3519    case Con{r, t}:
3520      Equal.cong(List<&2, P.AaGrant>, List<&2, P.AaGrant>, x => Con{F.AaFileRule.grant(r), x}, F.AaFileRule.grants.of(F.AaFileRule.append(t, ys)), P.AaGrant.append(F.AaFileRule.grants.of(t), F.AaFileRule.grants.of(ys)), file.gof_app(t, ys))