aboutsummaryrefslogtreecommitdiff
path: root/noao/mtlocal/cyber/pow.inc
blob: b87b75bbe6a807d3da0b804775a24110611c4028 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
data (tbl[i], i=1, 3)   /0.0         , 0.0         , 0.0         /
	data (tbl[i], i=4, 6)   /0.0         , 0.0         , 0.0         / 
	data (tbl[i], i=7, 9)   /1.880791E-37, 3.761582E-37, 7.523164E-37/ 
	data (tbl[i], i=10, 12) /1.504633E-36, 3.009266E-36, 6.018531E-36/ 
	data (tbl[i], i=13, 15) /1.203706E-35, 2.407412E-35, 4.814825E-35/ 
	data (tbl[i], i=16, 18) /9.629650E-35, 1.925930E-34, 3.851860E-34/ 
	data (tbl[i], i=19, 21) /7.703720E-34, 1.540744E-33, 3.081488E-33/ 
	data (tbl[i], i=22, 24) /6.162976E-33, 1.232595E-32, 2.465190E-32/ 
	data (tbl[i], i=25, 27) /4.930381E-32, 9.860761E-32, 1.972152E-31/ 
	data (tbl[i], i=28, 30) /3.944305E-31, 7.888609E-31, 1.577722E-30/ 
	data (tbl[i], i=31, 33) /3.155444E-30, 6.310887E-30, 1.262177E-29/ 
	data (tbl[i], i=34, 36) /2.524355E-29, 5.048710E-29, 1.009742E-28/ 
	data (tbl[i], i=37, 39) /2.019484E-28, 4.038968E-28, 8.077936E-28/ 
	data (tbl[i], i=40, 42) /1.615587E-27, 3.231174E-27, 6.462349E-27/ 
	data (tbl[i], i=43, 45) /1.292470E-26, 2.584939E-26, 5.169879E-26/ 
	data (tbl[i], i=46, 48) /1.033976E-25, 2.067952E-25, 4.135903E-25/ 
	data (tbl[i], i=49, 51) /8.271806E-25, 1.654361E-24, 3.308722E-24/ 
	data (tbl[i], i=52, 54) /6.617445E-24, 1.323489E-23, 2.646978E-23/ 
	data (tbl[i], i=55, 57) /5.293956E-23, 1.058791E-22, 2.117582E-22/ 
	data (tbl[i], i=58, 60) /4.235165E-22, 8.470329E-22, 1.694066E-21/ 
	data (tbl[i], i=61, 63) /3.388132E-21, 6.776264E-21, 1.355253E-20/ 
	data (tbl[i], i=64, 66) /2.710505E-20, 5.421011E-20, 1.084202E-19/ 
	data (tbl[i], i=67, 69) /2.168404E-19, 4.336809E-19, 8.673617E-19/ 
	data (tbl[i], i=70, 72) /1.734723E-18, 3.469447E-18, 6.938894E-18/ 
	data (tbl[i], i=73, 75) /1.387779E-17, 2.775558E-17, 5.551115E-17/ 
	data (tbl[i], i=76, 78) /1.110223E-16, 2.220446E-16, 4.440892E-16/ 
	data (tbl[i], i=79, 81) /8.881784E-16, 1.776357E-15, 3.552714E-15/ 
	data (tbl[i], i=82, 84) /7.105427E-15, 1.421085E-14, 2.842171E-14/ 
	data (tbl[i], i=85, 87) /5.684342E-14, 1.136868E-13, 2.273737E-13/ 
	data (tbl[i], i=88, 90) /4.547474E-13, 9.094947E-13, 1.818989E-12/ 
	data (tbl[i], i=91, 93) /3.637979E-12, 7.275958E-12, 1.455192E-11/ 
	data (tbl[i], i=94, 96) /2.910383E-11, 5.820766E-11, 1.164153E-10/ 
	data (tbl[i], i=97, 99) /2.328306E-10, 4.656613E-10, 9.313226E-10/ 
	data (tbl[i], i=100, 102) / 1.862645E-9,  3.725290E-9,  7.450581E-9/ 
	data (tbl[i], i=103, 105) / 1.490116E-8,  2.980232E-8,  5.960464E-8/ 
	data (tbl[i], i=106, 108) / 1.192093E-7,  2.384186E-7,  4.768372E-7/ 
	data (tbl[i], i=109, 111) / 9.536743E-7,  1.907349E-6,  3.814697E-6/ 
	data (tbl[i], i=112, 114) / 7.629395E-6,  1.525879E-5,  3.051758E-5/ 
	data (tbl[i], i=115, 117) / 6.103516E-5,  1.220703E-4,  2.441406E-4/ 
	data (tbl[i], i=118, 120) / 4.882813E-4,  9.765625E-4,  0.001953125/ 
	data (tbl[i], i=121, 123) /  0.00390625,    0.0078125,     0.015625/ 
	data (tbl[i], i=124, 126) /     0.03125,       0.0625,        0.125/ 
	data (tbl[i], i=127, 129) /        0.25,          0.5,           1./ 
	data (tbl[i], i=130, 132) /          2.,           4.,           8./ 
	data (tbl[i], i=133, 135) /         16.,          32.,          64./ 
	data (tbl[i], i=136, 138) /        128.,         256.,         512./ 
	data (tbl[i], i=139, 141) /       1024.,        2048.,        4096./ 
	data (tbl[i], i=142, 144) /       8192.,       16384.,       32768./ 
	data (tbl[i], i=145, 147) /      65536.,      131072.,      262144./ 
	data (tbl[i], i=148, 150) /     524288.,     1048576.,     2097152./ 
	data (tbl[i], i=151, 153) /    4194304.,     8388608.,    16777216./ 
	data (tbl[i], i=154, 156) /   33554432.,    67108864.,   134217728./ 
	data (tbl[i], i=157, 159) /  268435456.,   536870912.,   1.073742E9/ 
	data (tbl[i], i=160, 162) /  2.147484E9,   4.294967E9,   8.589935E9/ 
	data (tbl[i], i=163, 165) / 1.717987E10,  3.435974E10,  6.871948E10/ 
	data (tbl[i], i=166, 168) / 1.374390E11,  2.748779E11,  5.497558E11/ 
	data (tbl[i], i=169, 171) / 1.099512E12,  2.199023E12,  4.398047E12/ 
	data (tbl[i], i=172, 174) / 8.796093E12,  1.759219E13,  3.518437E13/ 
	data (tbl[i], i=175, 177) / 7.036874E13,  1.407375E14,  2.814750E14/ 
	data (tbl[i], i=178, 180) / 5.629500E14,  1.125900E15,  2.251800E15/ 
	data (tbl[i], i=181, 183) / 4.503600E15,  9.007199E15,  1.801440E16/ 
	data (tbl[i], i=184, 186) / 3.602880E16,  7.205759E16,  1.441152E17/ 
	data (tbl[i], i=187, 189) / 2.882304E17,  5.764608E17,  1.152922E18/ 
	data (tbl[i], i=190, 192) / 2.305843E18,  4.611686E18,  9.223372E18/ 
	data (tbl[i], i=193, 195) / 1.844674E19,  3.689349E19,  7.378698E19/ 
	data (tbl[i], i=196, 198) / 1.475740E20,  2.951479E20,  5.902958E20/ 
	data (tbl[i], i=199, 201) / 1.180592E21,  2.361183E21,  4.722366E21/ 
	data (tbl[i], i=202, 204) / 9.444733E21,  1.888947E22,  3.777893E22/ 
	data (tbl[i], i=205, 207) / 7.555786E22,  1.511157E23,  3.022315E23/ 
	data (tbl[i], i=208, 210) / 6.044629E23,  1.208926E24,  2.417852E24/ 
	data (tbl[i], i=211, 213) / 4.835703E24,  9.671407E24,  1.934281E25/ 
	data (tbl[i], i=214, 216) / 3.868563E25,  7.737125E25,  1.547425E26/ 
	data (tbl[i], i=217, 219) / 3.094850E26,  6.189700E26,  1.237940E27/ 
	data (tbl[i], i=220, 222) / 2.475880E27,  4.951760E27,  9.903520E27/ 
	data (tbl[i], i=223, 225) / 1.980704E28,  3.961408E28,  7.922816E28/ 
	data (tbl[i], i=226, 228) / 1.584563E29,  3.169127E29,  6.338253E29/ 
	data (tbl[i], i=229, 231) / 1.267651E30,  2.535301E30,  5.070602E30/ 
	data (tbl[i], i=232, 234) / 1.014120E31,  2.028241E31,  4.056482E31/ 
	data (tbl[i], i=235, 237) / 8.112964E31,  1.622593E32,  3.245186E32/ 
	data (tbl[i], i=238, 240) / 6.490371E32,  1.298074E33,  2.596148E33/ 
	data (tbl[i], i=241, 243) / 5.192297E33,  1.038459E34,  2.076919E34/ 
	data (tbl[i], i=244, 246) / 4.153837E34,  8.307675E34,  1.661535E35/ 
	data (tbl[i], i=247, 249) / 3.323070E35,  6.646140E35,  1.329228E36/ 
	data (tbl[i], i=250, 252) / 2.658456E36,  5.316912E36,  1.063382E37/ 
	data (tbl[i], i=253, 255) / 2.126765E37,  4.253530E37,  8.507059E37/