Help for this page

Select Code to Download


  1. or download this
    10389! 4570! 44289! 11800!
------------------------------
56089! 989! 9400! 43300! 2400!
  2. or download this
    8.070604647867604097576877675243109941805e-7030
8.070604647867604097576877675243109941729476950993498765160880e-7030
  3. or download this
    #!/your/perl/here

...
{
    print +shift, ": ", timestr(timediff(@_)), "\n";
}
  4. or download this
    foreach my $t ( keys %{$factors} )
{
    my $bft = $ONE->copy()->bmul($t)->bpow($factors->{$t});
    $q->bmul($bft);
}
  5. or download this
    my $s = '$q';
foreach my $t ( keys %{$factors} )
...
}
eval $s;
die "Error on eval: $@" if $@;