def ef_star

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

import Base
import bend-osdev-apparmor@0.1.0.0/glob.bend as G

129# ... and a star takes it
130def ef_star(+r: List<&2, G.AaGTok>, +ds: List<&2, List<&2, List<&2, U32>>>) -> {G.AaGSeq.fits_any(Con{G.AaGStar{}, r}, G.AaGCuts.empty_first(ds)) == G.AaGSeq.fits_any(r, ds) : Bool}:
131  match ds:
132    case Nil{}:
133      {==}
134    case Con{d, t}:
135      %ef_star(r, t) : {Bool.or(G.AaGSeq.fits(r, d), G.AaGSeq.fits_any(Con{G.AaGStar{}, r}, G.AaGCuts.empty_first(t))) == Bool.or(G.AaGSeq.fits(r, d), _) : Bool}
136      {==}