Perm.AaBits.covers: def of bend-osdev-apparmor@0.1.0.0
Import: import bend-osdev-apparmor@0.1.0.0/perm.bend as Perm
Lines 41-49 of bend-osdev-apparmor@0.1.0.0/perm.bend: https://jend.leeeet.dev/read.txt?path=bend-osdev-apparmor@0.1.0.0/perm.bend&start_line=41&end_line=49

import Base

# every bit of r is in a
def AaBits.covers(a: List<&2, Bool>, r: List<&2, Bool>) -> Bool:
  match a r:
    case _ Nil{}:
      True{}
    case Nil{} Con{y, ys}:
      Bool.not(AaBits.any(Con{y, ys}))
    case Con{x, xs} Con{y, ys}:
      Bool.and(Bool.or(x, Bool.not(y)), AaBits.covers(xs, ys))

Uses (6):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool.and
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool.not
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool.or
  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=AaBits.any