Annotation of embedaddon/php/ext/standard/tests/math/log.phpt, revision 1.1

1.1     ! misho       1: --TEST--
        !             2: log() tests
        !             3: --FILE--
        !             4: <?php // $Id: log.phpt 242949 2007-09-26 15:44:16Z cvs2svn $
        !             5: echo "On failure, please mail result to php-dev@lists.php.net\n";
        !             6: for ($x = 0, $count= 0; $x < 200; $x++) {
        !             7:     $x2 = (int) exp(log($x));
        !             8:     // e ^ log(x) should be close in range to x
        !             9:     if (($x2 < ($x + 2)) && ($x2 > ($x - 2))) { 
        !            10:         $count++; 
        !            11:     } else {
        !            12:         print "$x : $x2\n";
        !            13:     }
        !            14: }
        !            15: print $count . "\n";
        !            16: 
        !            17: // Now test the base form of log
        !            18: for ($base = 2; $base < 11; $base++) {
        !            19:     for ($x = 0, $count= 0; $x < 50; $x++) {
        !            20:         $x2 = (int) pow($base, log($x, $base));
        !            21:         // base ^ log(x) should be close in range to x
        !            22:         if (($x2 < ($x + 2)) && ($x2 > ($x - 2))) { 
        !            23:             $count++; 
        !            24:         } else {
        !            25:              print "base $base: $x : $x2\n";
        !            26:         }
        !            27:     }
        !            28:     print $count . "\n";
        !            29: }
        !            30: ?>
        !            31: --EXPECT--
        !            32: On failure, please mail result to php-dev@lists.php.net
        !            33: 200
        !            34: 50
        !            35: 50
        !            36: 50
        !            37: 50
        !            38: 50
        !            39: 50
        !            40: 50
        !            41: 50
        !            42: 50

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>