build/pgo/js-input/math-spectral-norm.html

changeset 0
6474c204b198
     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/build/pgo/js-input/math-spectral-norm.html	Wed Dec 31 06:09:35 2014 +0100
     1.3 @@ -0,0 +1,101 @@
     1.4 +<!DOCTYPE html>
     1.5 +<head>
     1.6 +<!--
     1.7 + Copyright (C) 2007 Apple Inc.  All rights reserved.
     1.8 +
     1.9 + Redistribution and use in source and binary forms, with or without
    1.10 + modification, are permitted provided that the following conditions
    1.11 + are met:
    1.12 + 1. Redistributions of source code must retain the above copyright
    1.13 +    notice, this list of conditions and the following disclaimer.
    1.14 + 2. Redistributions in binary form must reproduce the above copyright
    1.15 +    notice, this list of conditions and the following disclaimer in the
    1.16 +    documentation and/or other materials provided with the distribution.
    1.17 +
    1.18 + THIS SOFTWARE IS PROVIDED BY APPLE COMPUTER, INC. ``AS IS'' AND ANY
    1.19 + EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
    1.20 + IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
    1.21 + PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL APPLE COMPUTER, INC. OR
    1.22 + CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
    1.23 + EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
    1.24 + PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
    1.25 + PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
    1.26 + OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
    1.27 + (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
    1.28 + OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 
    1.29 +-->
    1.30 +
    1.31 +<title>SunSpider math-spectral-norm</title>
    1.32 +
    1.33 +</head>
    1.34 +
    1.35 +<body>
    1.36 +<h3>math-spectral-norm</h3>
    1.37 +<div id="console">
    1.38 +</div>
    1.39 +
    1.40 +<script>
    1.41 +
    1.42 +var _sunSpiderStartDate = new Date();
    1.43 +
    1.44 +// The Great Computer Language Shootout
    1.45 +// http://shootout.alioth.debian.org/
    1.46 +//
    1.47 +// contributed by Ian Osgood
    1.48 +
    1.49 +function A(i,j) {
    1.50 +  return 1/((i+j)*(i+j+1)/2+i+1);
    1.51 +}
    1.52 +
    1.53 +function Au(u,v) {
    1.54 +  for (var i=0; i<u.length; ++i) {
    1.55 +    var t = 0;
    1.56 +    for (var j=0; j<u.length; ++j)
    1.57 +      t += A(i,j) * u[j];
    1.58 +    v[i] = t;
    1.59 +  }
    1.60 +}
    1.61 +
    1.62 +function Atu(u,v) {
    1.63 +  for (var i=0; i<u.length; ++i) {
    1.64 +    var t = 0;
    1.65 +    for (var j=0; j<u.length; ++j)
    1.66 +      t += A(j,i) * u[j];
    1.67 +    v[i] = t;
    1.68 +  }
    1.69 +}
    1.70 +
    1.71 +function AtAu(u,v,w) {
    1.72 +  Au(u,w);
    1.73 +  Atu(w,v);
    1.74 +}
    1.75 +
    1.76 +function spectralnorm(n) {
    1.77 +  var i, u=[], v=[], w=[], vv=0, vBv=0;
    1.78 +  for (i=0; i<n; ++i) {
    1.79 +    u[i] = 1; v[i] = w[i] = 0;
    1.80 +  }
    1.81 +  for (i=0; i<10; ++i) {
    1.82 +    AtAu(u,v,w);
    1.83 +    AtAu(v,u,w);
    1.84 +  }
    1.85 +  for (i=0; i<n; ++i) {
    1.86 +    vBv += u[i]*v[i];
    1.87 +    vv  += v[i]*v[i];
    1.88 +  }
    1.89 +  return Math.sqrt(vBv/vv);
    1.90 +}
    1.91 +
    1.92 +for (var i = 6; i <= 48; i *= 2) {
    1.93 +    spectralnorm(i);
    1.94 +}
    1.95 +
    1.96 +
    1.97 +var _sunSpiderInterval = new Date() - _sunSpiderStartDate;
    1.98 +
    1.99 +document.getElementById("console").innerHTML = _sunSpiderInterval;
   1.100 +</script>
   1.101 +
   1.102 +
   1.103 +</body>
   1.104 +</html>

mercurial