OLD | NEW |
(Empty) | |
| 1 <!DOCTYPE html> |
| 2 <head> |
| 3 <!-- |
| 4 Copyright (C) 2007 Apple Inc. All rights reserved. |
| 5 |
| 6 Redistribution and use in source and binary forms, with or without |
| 7 modification, are permitted provided that the following conditions |
| 8 are met: |
| 9 1. Redistributions of source code must retain the above copyright |
| 10 notice, this list of conditions and the following disclaimer. |
| 11 2. Redistributions in binary form must reproduce the above copyright |
| 12 notice, this list of conditions and the following disclaimer in the |
| 13 documentation and/or other materials provided with the distribution. |
| 14 |
| 15 THIS SOFTWARE IS PROVIDED BY APPLE COMPUTER, INC. ``AS IS'' AND ANY |
| 16 EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
| 17 IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR |
| 18 PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL APPLE COMPUTER, INC. OR |
| 19 CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, |
| 20 EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, |
| 21 PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR |
| 22 PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY |
| 23 OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
| 24 (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE |
| 25 OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
| 26 --> |
| 27 |
| 28 <title>SunSpider controlflow-recursive</title> |
| 29 <link rel="stylesheet" href="sunspider.css"> |
| 30 </head> |
| 31 |
| 32 <body> |
| 33 <h3>controlflow-recursive</h3> |
| 34 <div id="console"> |
| 35 </div> |
| 36 <script src="sunspider-record-result.js"></script> |
| 37 <script> |
| 38 |
| 39 var _sunSpiderStartDate = new Date(); |
| 40 |
| 41 // The Computer Language Shootout |
| 42 // http://shootout.alioth.debian.org/ |
| 43 // contributed by Isaac Gouy |
| 44 |
| 45 function ack(m,n){ |
| 46 if (m==0) { return n+1; } |
| 47 if (n==0) { return ack(m-1,1); } |
| 48 return ack(m-1, ack(m,n-1) ); |
| 49 } |
| 50 |
| 51 function fib(n) { |
| 52 if (n < 2){ return 1; } |
| 53 return fib(n-2) + fib(n-1); |
| 54 } |
| 55 |
| 56 function tak(x,y,z) { |
| 57 if (y >= x) return z; |
| 58 return tak(tak(x-1,y,z), tak(y-1,z,x), tak(z-1,x,y)); |
| 59 } |
| 60 |
| 61 for ( var i = 3; i <= 5; i++ ) { |
| 62 ack(3,i); |
| 63 fib(17.0+i); |
| 64 tak(3*i+3,2*i+2,i+1); |
| 65 } |
| 66 |
| 67 |
| 68 var _sunSpiderInterval = new Date() - _sunSpiderStartDate; |
| 69 |
| 70 record(_sunSpiderInterval); |
| 71 </script> |
| 72 |
| 73 |
| 74 </body> |
| 75 </html> |
OLD | NEW |