changing DisplayData -> Display in IHaskell