{-# htermination compare :: (Ord a, Ord k) => (Either a k) -> (Either a k) -> Ordering #-}
content may be truncated. 'popout' for larger text window.