:param TryHaskell.Result result: Parse result of JSON data.
        :rtype: str|unicode

def show_type(cls, result):
        """
        :param TryHaskell.Result result: Parse result of JSON data.
        :rtype: str|unicode
        """
        if result.ok:
            return ' :: '.join([result.expr, result.type])
        return result.value