home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume21 / cloops / part01 / data.h next >
Encoding:
C/C++ Source or Header  |  1991-07-25  |  3.0 KB  |  97 lines
  1. /*
  2.  * This file is part of the Livermore Loops transliteration into C.
  3.  * Copyright (C) 1991 by Martin Fouts
  4.  *
  5.  * This program is free software; you can redistribute it and/or modify
  6.  * it under the terms of the GNU General Public License as published by
  7.  * the Free Software Foundation; either version 1, or (at your option)
  8.  * any later version.
  9.  *
  10.  * This program is distributed in the hope that it will be useful,
  11.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13.  * GNU General Public License for more details.
  14.  *
  15.  * You should have received a copy of the GNU General Public License
  16.  * along with this program; if not, write to the Free Software
  17.  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18.  */
  19.  
  20. #include "params.h"
  21. Float Time[NTESTS];
  22.  
  23. Int in_lp;
  24.  
  25. Float loops[NTESTS];
  26.  
  27. Float nrops[NTESTS] = {
  28.   5.,4.,2.,2.,2.,2.,16.,36.,17.,9.,1.,1.,
  29.   7.,11.,33.,7.,9.,44.,6.,26.,2.,17.,11.,1.,
  30. };
  31.  
  32. Float wt[] = {
  33.   1.0,  1.0,  1.0,  1.0,  1.0,  1.0,  1.0,  1.0,
  34.   1.0,  1.0,  1.0,  1.0,  1.0,  1.0,  1.0,  1.0,
  35.   1.0,  1.0,  1.0,  1.0,  1.0,  1.0,  1.0,  1.0, 1.0,
  36. };
  37.  
  38. Float csum[NTESTS];
  39.  
  40. Float skale[47] = {
  41.   0.1  ,0.1  ,0.1  ,0.1  ,0.1  ,0.1  ,0.1  ,0.1  ,
  42.   0.1  ,0.1  ,0.1  ,0.1  ,0.1  ,0.1  ,0.1  ,0.1  ,
  43.   0.1  ,0.1  ,0.1  ,0.1  ,0.1  ,0.1  ,0.1  ,0.1  ,0.1,
  44. };
  45.  
  46. Float bias[47] = {
  47.   0.0  ,0.0  ,0.0  ,0.0  ,0.0  ,0.0  ,0.0  ,0.0  ,
  48.   0.0  ,0.0  ,0.0  ,0.0  ,0.0  ,0.0  ,0.0  ,0.0  ,
  49.   0.0  ,0.0  ,0.0  ,0.0  ,0.0  ,0.0  ,0.0  ,0.0  ,0.0,
  50. };
  51.  
  52. Int ispan[NTESTS] = {
  53.   l1, l2, l1, l1, l1, l13, m7, m2,
  54.   l2, l2, l1, m1, l13, l1, l2, l16,
  55.   l2, m2, l2, m1, l21, l2, m2, l1, 0,
  56. };
  57.  
  58. Int isp2[NTESTS] = {
  59.   101, 101, 101, 101, 101,  32, 101, 100,
  60.   101, 101, 101, 100,  32, 101, 101,  40,
  61.   101, 100, 101, 100,  20, 101, 100, 101, 0,
  62. };
  63.  
  64. Int isp3[NTESTS] = {
  65.   27, 15, 27, 27, 27,  8, 21, 14,
  66.   15, 15, 27, 26,  8, 27, 15, 15,
  67.   15, 14, 15, 26, 15, 15, 14, 27,  0,
  68. };
  69.   
  70. Int ipass[NTESTS] = {
  71.   1,  1,  1,  1,  1,  1,  1,  1,
  72.   1,  1,  1,  1,  1,  1,  1,  1,
  73.   1,  1,  1,  1,  1,  1,  1,  1,  0,
  74. };
  75.  
  76. Int ion, j5, k2, k3, lp, m, kr, n13h, n, n1, n13, n213, n813;
  77. Int n16, n416, n21, nt1, nt2, n2;
  78. Float a11,a12,a13,a21,a22,a23,a31,a32,a33,ar,br,c0,cr,di,dk;
  79. Float dm22,dm23,dm24,dm25,dm26,dm27,dm28,dn,e3,e6,expmax,flx;
  80. Float q,qa,r,ri,s,scale,sig,stb5,t,xnc,xnei,xnm;
  81.  
  82. Int e[96], f[96], ix[1001], ir[1001], zone[300];
  83. Float u[1001], v[1001], w[1001];
  84. Float x[1001], y[1001], z[1001], g[1001];
  85. Float du1[101], du2[101], du3[101], grd[1001], dex[1001];
  86. Float xi[1001], ex[1001], ex1[1001], dex1[1001];
  87. Float vx[1001], xx[1001], rx[1001], rh[1001];
  88. Float vsp[101], vstp[101], vxne[101], vxnd[101];
  89. Float ve3[101], vlr[101], vlin[101], b5[101];
  90. Float plan[300], d[300], sa[101], sb[101];
  91. Float p[4][512], px[25][101], cx[25][101];
  92. Float vy[101][25], vh[101][7], vf[101][7], vg[101][7], vs[101][7];
  93. Float za[101][7]  , zp[101][7], zq[101][7], zr[101][7], zm[101][7];
  94. Float zb[101][7]  , zu[101][7], zv[101][7], zz[101][7];
  95. Float b[64][64], c[64][64], h[64][64];
  96. Float u1[5][101][2],  u2[5][101][2],  u3[5][101][2];
  97.