x.js

// foldp := (Signal<A>, (B, A) => B, B) => Signal<B>
function foldp(source, lambda, initial) {
    var result = Signal(initial)
    
    source.listen(function (ev) {
        result.set(lambda(result.get(), ev))
    })
    
    return result
}