[Haskell-cafe] Ord for partially ordered sets