serCompLeftToRightF :: F (Either a b) (Either b c) -> F a c serCompRightToLeftF :: F (Either a b) (Either c a) -> F b c
The following equations hold:
left>==<right = serCompF left right = serCompRightToLeftF (left>+<right) = serCompLeftToRightF (right>+<left)