Fun with deterministic gem

determ_ruby.rb

require 'deterministic'

module Deterministic
  module Monad
    alias :>= :fmap
  end
end

class Foo
  include Deterministic
  include Deterministic::Prelude::Result

  alias :m :method # method conveniently returns a Proc to a method

  def call(params)
    Success(params) >>
      m(:validate).curry['x'] >>
      m(:send).curry['y'] >=
      m(:report)
  end

  def validate(a, params)
    Success(params + a)
  end

  def send(a, params)
    Success(params + a)
  end

  def report(params)
    params + 'report'
  end

  def calculate
    Success(1) >= m(:plus_one)
  end

  def plus_one(n)
    n += 1
  end
end

p Foo.new.call('data')
p Foo.new.calculate