Maybe.coffee

@Monad =
    Maybe: (value) ->
        wrap = (value) ->
            just =
                v: value
                value: () ->
                    @v
                pass: (f) ->
                    f(@v)
                    @
                chain: (f, nothing) ->
                    if(@v == nothing)
                        @
                    else
                        val = f(@v)
                        if(val == nothing)
                            return @
                        else
                            return wrap val

        wrap(value)