build/pgo/js-input/string-fasta.html

Wed, 31 Dec 2014 06:09:35 +0100

author
Michael Schloh von Bennewitz <michael@schloh.com>
date
Wed, 31 Dec 2014 06:09:35 +0100
changeset 0
6474c204b198
permissions
-rw-r--r--

Cloned upstream origin tor-browser at tor-browser-31.3.0esr-4.5-1-build1
revision ID fc1c9ff7c1b2defdbc039f12214767608f46423f for hacking purpose.

michael@0 1 <!DOCTYPE html>
michael@0 2 <head>
michael@0 3 <!--
michael@0 4 Copyright (C) 2007 Apple Inc. All rights reserved.
michael@0 5
michael@0 6 Redistribution and use in source and binary forms, with or without
michael@0 7 modification, are permitted provided that the following conditions
michael@0 8 are met:
michael@0 9 1. Redistributions of source code must retain the above copyright
michael@0 10 notice, this list of conditions and the following disclaimer.
michael@0 11 2. Redistributions in binary form must reproduce the above copyright
michael@0 12 notice, this list of conditions and the following disclaimer in the
michael@0 13 documentation and/or other materials provided with the distribution.
michael@0 14
michael@0 15 THIS SOFTWARE IS PROVIDED BY APPLE COMPUTER, INC. ``AS IS'' AND ANY
michael@0 16 EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
michael@0 17 IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
michael@0 18 PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL APPLE COMPUTER, INC. OR
michael@0 19 CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
michael@0 20 EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
michael@0 21 PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
michael@0 22 PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
michael@0 23 OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
michael@0 24 (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
michael@0 25 OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
michael@0 26 -->
michael@0 27
michael@0 28 <title>SunSpider string-fasta</title>
michael@0 29
michael@0 30 </head>
michael@0 31
michael@0 32 <body>
michael@0 33 <h3>string-fasta</h3>
michael@0 34 <div id="console">
michael@0 35 </div>
michael@0 36
michael@0 37 <script>
michael@0 38
michael@0 39 var _sunSpiderStartDate = new Date();
michael@0 40
michael@0 41 // The Great Computer Language Shootout
michael@0 42 // http://shootout.alioth.debian.org
michael@0 43 //
michael@0 44 // Contributed by Ian Osgood
michael@0 45
michael@0 46 var last = 42, A = 3877, C = 29573, M = 139968;
michael@0 47
michael@0 48 function rand(max) {
michael@0 49 last = (last * A + C) % M;
michael@0 50 return max * last / M;
michael@0 51 }
michael@0 52
michael@0 53 var ALU =
michael@0 54 "GGCCGGGCGCGGTGGCTCACGCCTGTAATCCCAGCACTTTGG" +
michael@0 55 "GAGGCCGAGGCGGGCGGATCACCTGAGGTCAGGAGTTCGAGA" +
michael@0 56 "CCAGCCTGGCCAACATGGTGAAACCCCGTCTCTACTAAAAAT" +
michael@0 57 "ACAAAAATTAGCCGGGCGTGGTGGCGCGCGCCTGTAATCCCA" +
michael@0 58 "GCTACTCGGGAGGCTGAGGCAGGAGAATCGCTTGAACCCGGG" +
michael@0 59 "AGGCGGAGGTTGCAGTGAGCCGAGATCGCGCCACTGCACTCC" +
michael@0 60 "AGCCTGGGCGACAGAGCGAGACTCCGTCTCAAAAA";
michael@0 61
michael@0 62 var IUB = {
michael@0 63 a:0.27, c:0.12, g:0.12, t:0.27,
michael@0 64 B:0.02, D:0.02, H:0.02, K:0.02,
michael@0 65 M:0.02, N:0.02, R:0.02, S:0.02,
michael@0 66 V:0.02, W:0.02, Y:0.02
michael@0 67 }
michael@0 68
michael@0 69 var HomoSap = {
michael@0 70 a: 0.3029549426680,
michael@0 71 c: 0.1979883004921,
michael@0 72 g: 0.1975473066391,
michael@0 73 t: 0.3015094502008
michael@0 74 }
michael@0 75
michael@0 76 function makeCumulative(table) {
michael@0 77 var last = null;
michael@0 78 for (var c in table) {
michael@0 79 if (last) table[c] += table[last];
michael@0 80 last = c;
michael@0 81 }
michael@0 82 }
michael@0 83
michael@0 84 function fastaRepeat(n, seq) {
michael@0 85 var seqi = 0, lenOut = 60;
michael@0 86 while (n>0) {
michael@0 87 if (n<lenOut) lenOut = n;
michael@0 88 if (seqi + lenOut < seq.length) {
michael@0 89 ret = seq.substring(seqi, seqi+lenOut);
michael@0 90 seqi += lenOut;
michael@0 91 } else {
michael@0 92 var s = seq.substring(seqi);
michael@0 93 seqi = lenOut - s.length;
michael@0 94 ret = s + seq.substring(0, seqi);
michael@0 95 }
michael@0 96 n -= lenOut;
michael@0 97 }
michael@0 98 }
michael@0 99
michael@0 100 function fastaRandom(n, table) {
michael@0 101 var line = new Array(60);
michael@0 102 makeCumulative(table);
michael@0 103 while (n>0) {
michael@0 104 if (n<line.length) line = new Array(n);
michael@0 105 for (var i=0; i<line.length; i++) {
michael@0 106 var r = rand(1);
michael@0 107 for (var c in table) {
michael@0 108 if (r < table[c]) {
michael@0 109 line[i] = c;
michael@0 110 break;
michael@0 111 }
michael@0 112 }
michael@0 113 }
michael@0 114 ret = line.join('');
michael@0 115 n -= line.length;
michael@0 116 }
michael@0 117 }
michael@0 118
michael@0 119 var ret;
michael@0 120
michael@0 121 var count = 7;
michael@0 122 ret = fastaRepeat(2*count*100000, ALU);
michael@0 123 ret = fastaRandom(3*count*1000, IUB);
michael@0 124 ret = fastaRandom(5*count*1000, HomoSap);
michael@0 125
michael@0 126
michael@0 127
michael@0 128 var _sunSpiderInterval = new Date() - _sunSpiderStartDate;
michael@0 129
michael@0 130 document.getElementById("console").innerHTML = _sunSpiderInterval;
michael@0 131 </script>
michael@0 132
michael@0 133
michael@0 134 </body>
michael@0 135 </html>

mercurial