| <!DOCTYPE html> |
| <head> |
| <!-- |
| Copyright (C) 2007 Apple Inc. All rights reserved. |
| |
| Redistribution and use in source and binary forms, with or without |
| modification, are permitted provided that the following conditions |
| are met: |
| 1. Redistributions of source code must retain the above copyright |
| notice, this list of conditions and the following disclaimer. |
| 2. Redistributions in binary form must reproduce the above copyright |
| notice, this list of conditions and the following disclaimer in the |
| documentation and/or other materials provided with the distribution. |
| |
| THIS SOFTWARE IS PROVIDED BY APPLE INC. ``AS IS'' AND ANY |
| EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
| IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR |
| PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL APPLE INC. OR |
| CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, |
| EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, |
| PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR |
| PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY |
| OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
| (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE |
| OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
| --> |
| |
| <title>SunSpider access-fannkuch</title> |
| <link rel="stylesheet" href="sunspider.css"> |
| </head> |
| |
| <body> |
| <h3>access-fannkuch</h3> |
| <div id="console"> |
| </div> |
| <script src="sunspider-record-result.js"></script> |
| <script> |
| |
| var _sunSpiderStartDate = new Date(); |
| |
| /* The Great Computer Language Shootout |
| http://shootout.alioth.debian.org/ |
| contributed by Isaac Gouy */ |
| |
| function fannkuch(n) { |
| var check = 0; |
| var perm = Array(n); |
| var perm1 = Array(n); |
| var count = Array(n); |
| var maxPerm = Array(n); |
| var maxFlipsCount = 0; |
| var m = n - 1; |
| |
| for (var i = 0; i < n; i++) perm1[i] = i; |
| var r = n; |
| |
| while (true) { |
| // write-out the first 30 permutations |
| if (check < 30){ |
| var s = ""; |
| for(var i=0; i<n; i++) s += (perm1[i]+1).toString(); |
| check++; |
| } |
| |
| while (r != 1) { count[r - 1] = r; r--; } |
| if (!(perm1[0] == 0 || perm1[m] == m)) { |
| for (var i = 0; i < n; i++) perm[i] = perm1[i]; |
| |
| var flipsCount = 0; |
| var k; |
| |
| while (!((k = perm[0]) == 0)) { |
| var k2 = (k + 1) >> 1; |
| for (var i = 0; i < k2; i++) { |
| var temp = perm[i]; perm[i] = perm[k - i]; perm[k - i] = temp; |
| } |
| flipsCount++; |
| } |
| |
| if (flipsCount > maxFlipsCount) { |
| maxFlipsCount = flipsCount; |
| for (var i = 0; i < n; i++) maxPerm[i] = perm1[i]; |
| } |
| } |
| |
| while (true) { |
| if (r == n) return maxFlipsCount; |
| var perm0 = perm1[0]; |
| var i = 0; |
| while (i < r) { |
| var j = i + 1; |
| perm1[i] = perm1[j]; |
| i = j; |
| } |
| perm1[r] = perm0; |
| |
| count[r] = count[r] - 1; |
| if (count[r] > 0) break; |
| r++; |
| } |
| } |
| } |
| |
| var n = 8; |
| var ret = fannkuch(n); |
| |
| |
| |
| var _sunSpiderInterval = new Date() - _sunSpiderStartDate; |
| |
| record(_sunSpiderInterval); |
| </script> |
| |
| |
| </body> |
| </html> |
