Help for this page

Select Code to Download

Select or download this

#! perl -slw
use strict;
...
        return     f( $x % $bsize, $y % $bsize, $d-1 );
    }
}