それと、
print $ Char.ord '1'
ってやると49が帰ってくるんですが、どういう仕様ですか先生。