potrzeba wdrożenia klapki Haskell dla Proc

Question

Prelude Haskell zawiera użyteczną funkcję, która swapy arguments funkcji: http://zvon.org/other/haskell/Outputprelude/flip_f.html

muszę zrobić to samo w Ruby. Zamiast definiować niestandardową metodę, chciałabym przerobić klasę Proc tak, abym mógł używać flip obok Proc#curry. Coś jak

f = lambda {|x, y| [x, y]} 
g = f.flip.curry.(2) 

dostarczyć wartość dla y.

Nie wiem, jak otworzyć ponownie klasę Proc, aby to zrobić.

Answer 1

class Proc 
    def flip 
    lambda { |x, y| self.(y, x) } 
    end 
end 


f = lambda { |x, y| [x, y] } 
f.flip.(1, 2) 
#=> [2, 1] 

Answer 2

class Proc 
    def flip 
     lambda { |*args| self.curry[*args.reverse] } 
    end 
end 

plus = lambda {|a, b, c| a + b + c } 
p plus['A', 'B', 'C'] # => "ABC" 
p plus.flip['A', 'B', 'C'] # => "CBA" 
p plus.curry['A']['B', 'C'] # => "ABC" 
p plus.curry['A'].flip['B', 'C'] # => "ACB" 

Aktualizacja:

# intermediate transformations 
plus.flip.curry['a'] 
lambda {|a, b, c| a + b + c } 
# flip 
lambda {|c, b, a| a + b + c } 
# curry 'a', still a Proc because of currying 
lambda {|b, c| 'a' + b + c }