Control.Effects.Early
data Early a
earlyReturn
handleEarly
onlyDo
ifNothingEarlyReturn
ifNothingDo
ifLeftEarlyReturn
ifLeftDo