data StarShp : API -> Typedata StarPos : (c : API) -> StarShp c -> Type.star : API -> APIKleene : API -> APImapStarShp : a =&> b -> StarShp a -> StarShp bmapStarPos : (mor : a =&> b) -> (x : StarShp a) -> StarPos b (mapStarShp mor x) -> StarPos a xmap_kleene : a =&> b -> a .star =&> b .starjoin_star : StarShp (a .star) -> StarShp asingle : a .message -> StarShp apure_kleene : a =&> a .starunit_kleene : End .star =&> EndkleeneCounit : a =&> End -> a .star =&> EndrunStar : a =&> b .star -> b =&> End -> a =&> End