tasks a-s

2013-04-10 23:57:08 -07:00 · 2013-04-10 23:57:08 -07:00 · b83f433714
commit b83f433714
parent 47bf37c096
12433 changed files with 156208 additions and 123 deletions
--- a/Task/Partial-function-application/Ruby/partial-function-application.rb
+++ b/Task/Partial-function-application/Ruby/partial-function-application.rb
@ -0,0 +1,10 @@
+fs = proc { |f, s| s.map &f }
+f1 = proc { |n| n * 2 }
+f2 = proc { |n| n ** 2 }
+fsf1 = fs.curry[f1]
+fsf2 = fs.curry[f2]
+
+[0..3, (2..8).step(2)].each do |e|
+  p fsf1[e]
+  p fsf2[e]
+end