Control.Arrow.ArrowIf
class
ArrowIf
a
data
IfThen
a b