Data.Comp.Multi.Sum
type f :<: g
data (f :+: g) h e
caseH
proj
project
deepProject
inj
inject
deepInject
split
injectConst
projectConst
injectCxt
liftCxt
substHoles