Data commit

Task/Pi/Sidef/pi-1.sidef

@@ -0,0 +1,26 @@
+func pi(callback) {
+    var (q, r, t, k, n, l) = (1, 0, 1, 1, 3, 3)
+    loop {
+        if ((4*q + r - t) < n*t) {
+            callback(n)
+            static _dot = callback('.')
+            var nr = 10*(r - n*t)
+            n = ((10*(3*q + r)) // t - 10*n)
+            q *= 10
+            r = nr
+        }
+        else {
+            var nr = ((2*q + r) * l)
+            var nn = ((q*(7*k + 2) + r*l) // (t*l))
+            q *= k
+            t *= l
+            l += 2
+            k += 1
+            n = nn
+            r = nr
+        }
+    }
+}
+ 
+STDOUT.autoflush(true)
+pi(func(digit){ print digit })

Task/Pi/Sidef/pi-2.sidef

@@ -0,0 +1,4 @@
+func p(c) { var(q,r,t,g,j,h,k,a,b,y) = (1,180,60,60,54,10,10,15,3)
+  loop { c(y=(q*(a+=27) +5*r)//5*t); static _ = c('.')
+    r=10*(g+=j+=54)*(q*(b+=5) +r -y*t); q*=h+=k+=40; t*=g } }
+STDOUT.autoflush(1):p(func(d){print d})