include either
import either as ...
left :: (v :: a) -> Either<a, b>right :: (v :: b) -> Either<a, b>is-left :: (val :: Any) -> Booleanis-right :: (val :: Any) -> Boolean