[Gzz-commits] manuscripts/Sigs birthday.bc

[Tuomas J. Lukka]

CVSROOT:        /cvsroot/gzz
Module name:    manuscripts
Changes by:     Tuomas J. Lukka <address@hidden>        03/05/19 16:29:41

Modified files:
        Sigs           : birthday.bc 

Log message:
        clearout

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gzz/manuscripts/Sigs/birthday.bc.diff?tr1=1.1&tr2=1.2&r1=text&r2=text

Patches:
Index: manuscripts/Sigs/birthday.bc
diff -u manuscripts/Sigs/birthday.bc:1.1 manuscripts/Sigs/birthday.bc:1.2
--- manuscripts/Sigs/birthday.bc:1.1    Mon May 19 16:24:03 2003
+++ manuscripts/Sigs/birthday.bc        Mon May 19 16:29:41 2003
@@ -5,9 +5,10 @@
 print l(n), "\n";
 
 define birthday(n, k) {
-    return (( (n-k+0.5) * (l(n) - l(n-k)) - k) / l(2));
+    return (( (n-k+0.5) * (l(n) - l(n-k)) - k));
     }
     
 for(k=20; k<30; k++) {
-    print k, "   ", birthday(2^56, 2^k), "\n";
+    b = birthday(2^56, 2^k); 
+    print k, "   ", b, " conf ", 1-e(b), "\n";
 }