def retained_head
import bendvy-ecs-core@0.1.0.4/event_publication.bend as EventPublicationimport Base
80def retained_head(~A:Data,~B:Data,keep:Bool,record:Publication<A,B>,rest:List<&2,Publication<A,B>>) -> List<&2,Publication<A,B>>:
81 match keep:
82 case True{}:record <> rest
83 case False{}:rest