प्रोक के लिए हास्केल के फ्लिप

Question

हास्केल के प्रस्तावना एक उपयोगी समारोह है कि एक समारोह के तर्कों स्वैप है लागू करने के लिए की जरूरत है। एक कस्टम विधि को परिभाषित करने के बजाय, मैं बंदर Proc कक्षा को पैच करना चाहता हूं ताकि मैं flipProc#curry के साथ उपयोग कर सकूं।

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

y के लिए मूल्य की आपूर्ति करने के लिए कुछ।

मुझे नहीं पता कि Proc कक्षा को फिर से खोलने के लिए कैसे करें।

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" 

अद्यतन:

# 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 }