現状では、あまり良い書き方（実装）にはならないのだが、 ともかくうごく Ord Ordering 定義を書く。
そして、網羅的なテストケースをつくって、sample に追加。 実装の改善は、そのうえでおこなうのがいいと思われる。 （テストケースは Eq Ordering も同様に）
lib/Prelude.hs に instance Ord Ordering のナイーブな実装を追加。 それをテストするプログラムも書いた（sample151)。
ついでに、Eq Ordering のテストも追加した（sample152)。
クローズ。