sep and sep1

gistfile1.js

var sep = function(s, p) {
    var fun = function(state){
        return choice(sep1(s, p), [])
    };
    parsec(fun);
    return fun;
};
sep.prototype = parsec;

var sep1 = function(s, p) {
    var fun = function(state){
        p.bind(function(state, x){
            var re = new Array()
            re[0]=x
            re.contact(many(s.then(p)))
        })
        var result = op(state);
        var arr = new Array();
        arr.push(result);
        arr.contact(sep(op,sp)(state));
    };
    parsec(fun);
    return fun;
};