@@ -13,5 +13,6 @@ class Arrow c => ArrowCond v c | c -> v where
-- | Type class constraint used by the abstract instances to join arrow computations.
typefamilyJoin(c::*->*->*)xy::Constraint
-- TODO: Change type to if_ :: Join c (e,s) y => c (e,s) y -> c (e,s) y -> c (e, (v, s)) y
-- | @'if_' f g -< (v,(x,y))@ performs a case distinction on the given value @v@ and executes either @(f -< x)@ or @(g -< y)@. Abstract instances might join the results of @f@ and @g@.