Help for this page
#!/usr/bin/perl -slw use strict; ... print hypergeom( 300, 700, 100, 40 );
... 5898.31366843071 5905.22042320936 5912.12817848834