sys/src/cmd/astro/merct.c

   1 #include "astro.h"
   2
   3 double  mercfp[] =
   4 {
   5         0.013,          0.6807,
   6         0.048,          0.6283,
   7         0.185,          0.6231,
   8         0.711,          0.6191,
   9         0.285,          0.5784,
  10         0.075,          0.5411,
  11         0.019,          0.5585,
  12         0.010,          2.8449,
  13         0.039,          2.8117,
  14         0.147,          2.8135,
  15         0.552,          2.8126,
  16         2.100,          2.8126,
  17         3.724,          2.8046,
  18         0.729,          2.7883,
  19         0.186,          2.7890,
  20         0.049,          2.7943,
  21         0.013,          2.7402,
  22         0.033,          1.8361,
  23         0.118,          1.8396,
  24         0.431,          1.8391,
  25         1.329,          1.8288,
  26         0.539,          4.8686,
  27         0.111,          4.8904,
  28         0.027,          4.8956,
  29         0.012,          3.9794,
  30         0.056,          3.9636,
  31         0.294,          3.9910,
  32         0.484,          3.9514,
  33         0.070,          3.9270,
  34         0.018,          3.9270,
  35         0.013,          6.1261,
  36         0.050,          6.1052,
  37         0.185,          6.1069,
  38         0.685,          6.1011,
  39         2.810,          6.1062,
  40         7.356,          6.0699,
  41         1.471,          6.0685,
  42         0.375,          6.0687,
  43         0.098,          6.0720,
  44         0.026,          6.0476,
  45         0.062,          5.1540,
  46         0.122,          5.1191,
  47         0.011,          0.9076,
  48         0.074,          1.0123,
  49         0.106,          0.9372,
  50         0.017,          0.9425,
  51         0.020,          0.0506,
  52         0.052,          0.0384,
  53         0.052,          3.0281,
  54         0.012,          3.0543,
  55         0.011,          2.1642,
  56         0.016,          2.2340,
  57         0.040,          4.3912,
  58         0.080,          4.4262,
  59         0.016,          4.4506,
  60         0,
  61
  62         0.014,          1.0996,
  63         0.056,          1.1153,
  64         0.219,          1.1160,
  65         0.083,          1.0734,
  66         0.024,          0.9442,
  67         0.018,          3.8432,
  68         0.070,          3.8293,
  69         0.256,          3.8230,
  70         0.443,          3.8132,
  71         0.080,          3.7647,
  72         0.020,          3.7734,
  73         0.019,          0.0000,
  74         0.133,          0.1134,
  75         0.129,          6.2588,
  76         0.026,          6.2413,
  77         0.026,          2.6599,
  78         0.087,          2.6232,
  79         0.374,          2.6496,
  80         0.808,          2.5470,
  81         0.129,          2.5587,
  82         0.019,          2.5534,
  83         0.012,          2.1642,
  84         0,
  85
  86         0.014,          3.1416,
  87         0.047,          3.1625,
  88         0.179,          3.1695,
  89         0.697,          3.1603,
  90         0.574,          4.1315,
  91         0.181,          4.2537,
  92         0.047,          4.2481,
  93         0.013,          4.2062,
  94         0.018,          0.6650,
  95         0.069,          0.6405,
  96         0.253,          0.6449,
  97         0.938,          0.6454,
  98         3.275,          0.6458,
  99         0.499,          0.5569,
 100         0.119,          0.5271,
 101         0.032,          0.5184,
 102         0.030,          0.4939,
 103         0.106,          0.4171,
 104         0.353,          0.4510,
 105         0.056,          0.3840,
 106         0.013,          0.3142,
 107         0.028,          0.2531,
 108         0,
 109
 110         0.034,          0.9512,
 111         0.060,          4.7962,
 112         0.028,          4.7124,
 113         0.028,          4.1836,
 114         0.102,          4.1871,
 115         0.380,          4.1864,
 116         0.059,          4.1818,
 117         0.015,          4.2185,
 118         0.012,          4.1713,
 119         0.050,          4.1870,
 120         0,
 121
 122         0.218e-6,       5.3369,
 123         0.491e-6,       5.3281,
 124         0.172e-6,       2.1642,
 125         0.091e-6,       2.1084,
 126         0.204e-6,       1.2460,
 127         0.712e-6,       1.2413,
 128         2.370e-6,       1.2425,
 129         0.899e-6,       1.2303,
 130         0.763e-6,       4.3633,
 131         0.236e-6,       4.3590,
 132         0.163e-6,       0.2705,
 133         0.541e-6,       0.2710,
 134         1.157e-6,       0.2590,
 135         0.099e-6,       0.1798,
 136         0.360e-6,       2.4237,
 137         0.234e-6,       2.3740,
 138         0.253e-6,       4.5365,
 139         0.849e-6,       4.5293,
 140         2.954e-6,       4.5364,
 141         0.282e-6,       4.4581,
 142         1.550e-6,       1.3570,
 143         0.472e-6,       1.3561,
 144         0.135e-6,       1.3579,
 145         0.081e-6,       3.5936,
 146         0.087e-6,       3.5500,
 147         0.087e-6,       5.7334,
 148         0,
 149
 150         0.181e-6,       5.8275,
 151         0.095e-6,       2.2427,
 152         0.319e-6,       2.2534,
 153         0.256e-6,       2.2403,
 154         0.157e-6,       4.8292,
 155         0.106e-6,       1.0332,
 156         0.397e-6,       1.0756,
 157         0.143e-6,       4.0980,
 158         0,
 159
 160         0.222e-6,       1.6024,
 161         0.708e-6,       1.5949,
 162         0.191e-6,       5.7914,
 163         0.100e-6,       5.3564,
 164         0.347e-6,       5.3548,
 165         1.185e-6,       5.3576,
 166         3.268e-6,       5.3579,
 167         0.371e-6,       2.2148,
 168         0.160e-6,       2.1241,
 169         0.134e-6,       5.1260,
 170         0.347e-6,       5.1620,
 171         0,
 172 };
 173
 174 char    merccp[] =
 175 {
 176          4,     1,
 177          3,     1,
 178          2,     1,
 179          1,     1,
 180          0,     1,
 181         -1,     1,
 182         -2,     1,
 183          6,     2,
 184          5,     2,
 185          4,     2,
 186          3,     2,
 187          2,     2,
 188          1,     2,
 189          0,     2,
 190         -1,     2,
 191         -2,     2,
 192         -3,     2,
 193          5,     3,
 194          4,     3,
 195          3,     3,
 196          2,     3,
 197          1,     3,
 198          0,     3,
 199         -1,     3,
 200          5,     4,
 201          4,     4,
 202          3,     4,
 203          2,     4,
 204          1,     4,
 205          0,     4,
 206          7,     5,
 207          6,     5,
 208          5,     5,
 209          4,     5,
 210          3,     5,
 211          2,     5,
 212          1,     5,
 213          0,     5,
 214         -1,     5,
 215         -2,     5,
 216          4,     6,
 217          3,     6,
 218          5,     7,
 219          4,     7,
 220          3,     7,
 221          2,     7,
 222          5,     8,
 223          4,     8,
 224          3,     8,
 225          2,     8,
 226          5,     9,
 227          4,     9,
 228          5,     10,
 229          4,     10,
 230          3,     10,
 231
 232          3,     1,
 233          2,     1,
 234          1,     1,
 235          0,     1,
 236         -1,     1,
 237          4,     2,
 238          3,     2,
 239          2,     2,
 240          1,     2,
 241          0,     2,
 242         -1,     2,
 243          3,     3,
 244          2,     3,
 245          1,     3,
 246          0,     3,
 247          4,     4,
 248          3,     4,
 249          2,     4,
 250          1,     4,
 251          0,     4,
 252         -1,     4,
 253          2,     5,
 254
 255          4,     1,
 256          3,     1,
 257          2,     1,
 258          1,     1,
 259          0,     1,
 260         -1,     1,
 261         -2,     1,
 262         -3,     1,
 263          5,     2,
 264          4,     2,
 265          3,     2,
 266          2,     2,
 267          1,     2,
 268          0,     2,
 269         -1,     2,
 270         -2,     2,
 271          3,     3,
 272          2,     3,
 273          1,     3,
 274          0,     3,
 275         -1,     3,
 276          1,     4,
 277
 278          1,     1,
 279          0,     1,
 280         -1,     1,
 281          3,     2,
 282          2,     2,
 283          1,     2,
 284          0,     2,
 285         -1,     2,
 286          2,     3,
 287          1,     3,
 288
 289          2,     1,
 290          1,     1,
 291          0,     1,
 292         -1,     1,
 293          4,     2,
 294          3,     2,
 295          2,     2,
 296          1,     2,
 297          0,     2,
 298         -1,     2,
 299          4,     3,
 300          3,     3,
 301          2,     3,
 302          0,     3,
 303          3,     4,
 304          2,     4,
 305          5,     5,
 306          4,     5,
 307          3,     5,
 308          2,     5,
 309          1,     5,
 310          0,     5,
 311         -1,     5,
 312          4,     6,
 313          3,     6,
 314          4,     7,
 315
 316          1,     1,
 317          3,     2,
 318          2,     2,
 319          1,     2,
 320          2,     3,
 321          3,     4,
 322          2,     4,
 323          0,     4,
 324
 325          2,     1,
 326          1,     1,
 327         -1,     1,
 328          4,     2,
 329          3,     2,
 330          2,     2,
 331          1,     2,
 332          0,     2,
 333         -1,     2,
 334          2,     3,
 335          1,     3,
 336 };