def since
import bendvy-ecs-core@0.1.0.4/removals.bend as Removalsimport Base
34def since(~S: Data,~E: Data,~F: Data,~select: E -> Maybe<&2,Record<S,F>>,xs: List<&2,E>,cursor: Nat) -> List<&2,Record<S,F>>:
35 match xs cursor:
36 case [] _: []
37 case _ <> rest 1n+p: since(~S,~E,~F,~select,rest,p)
38 case value <> rest 0n: include(~S,~F,select(value),since(~S,~E,~F,~select,rest,0n))