Control.Arrow.ArrowIf

class ArrowIf a

data IfThen a b