Just another update

Task/Generator-Exponential/Julia/generator-exponential.julia

@@ -0,0 +1,16 @@
+drop(n, gen) = (for i=1:n gen() end ; gen)
+
+take(n, gen) = [gen() for i=1:n]
+
+pgen(n) = let x=0; () -> (x+=1)^n; end
+
+function genfilter(gen1, gen2)
+  let r1 = -Inf, r2 = gen2()
+    () -> begin
+           r1 = gen1()
+           while r2 < r1   r2 = gen2() end
+           while r1 == r2  r1 = gen1() end
+           r1
+          end
+  end
+end