Anonymous user
Unbias a random generator: Difference between revisions
Improve Seed7 example
(Add Seed7 example) |
(Improve Seed7 example) |
||
Line 700:
sumUnbiased +:= unbiased(n);
end for;
writeln(n <& ": " <& flt(100 * sumBiased)
" " <& flt(100 * sumUnbiased) / flt(tests)
end for;
end func;</lang>
|