ordArray generated function from GHCJS

ordArray.js

    var ordArray = function (__dict_Ord_9) {
        return {
            "__superclasses": {
                "Prelude.Eq_0": function (_) {
                    return eqArray(__dict_Ord_9["__superclasses"]["Prelude.Eq_0"]({}));
                }
            },
            compare: function (_20) {
                return function (_21) {
                    if (_20.length === 0) {
                        if (_21.length === 0) {
                            return EQ;
                        };
                    };
                    if (_20.length === 0) {
                        return LT;
                    };
                    if (_21.length === 0) {
                        return GT;
                    };
                    if (_20.length > 0) {
                        var _64 = _20.slice(1);
                        if (_21.length > 0) {
                            var _62 = _21.slice(1);
                            return (function (_60) {
                                if (_60.ctor === "Prelude.EQ") {
                                    return compare(ordArray(__dict_Ord_9))(_64)(_62);
                                };
                                return _60;
                            })(compare(__dict_Ord_9)(_20[0])(_21[0]));
                        };
                    };
                    throw "Failed pattern match";
                };
            }
        };
    };