1 #define k_35_max 57 2 #define k_35_low 3500.0 3 #define k_35_high 31000.0 4 static float k_flux_35[NUM_MAG][57] = { 5 { 6 2.5703745E-05, 4.8672046E-05, 9.9079920E-05, 2.1266075E-04, 4.3555442E-04, 7 8.0658675E-04, 1.3854964E-03, 2.2507431E-03, 3.4607527E-03, 5.0268678E-03, 8 6.9259386E-03, 9.1218875E-03, 1.1590101E-02, 1.4326229E-02, 1.7354170E-02, 9 2.0861123E-02, 2.4471235E-02, 2.8511511E-02, 3.3103904E-02, 3.8242999E-02, 10 4.3930772E-02, 5.0036133E-02, 5.6445653E-02, 6.3290090E-02, 7.0448581E-02, 11 7.7900345E-02, 8.5622202E-02, 9.3643170E-02, 1.0190802E-01, 1.1041802E-01, 12 1.1918644E-01, 1.2820609E-01, 1.3745398E-01, 1.4691715E-01, 1.5656740E-01, 13 1.6641014E-01, 1.7640266E-01, 1.8656322E-01, 1.9686932E-01, 2.3973826E-01, 14 2.8556219E-01, 3.3500512E-01, 3.8875522E-01, 4.4745878E-01, 5.1154457E-01, 15 5.8152264E-01, 6.5778050E-01, 7.4017910E-01, 8.2832467E-01, 9.2183265E-01, 16 1.0211673E+00, 1.1288974E+00, 1.2476742E+00, 1.3772177E+00, 1.5123187E+00, 17 1.6452746E+00, 1.7683029E+00, }, 18 { 19 3.2520750E-04, 7.0286002E-04, 1.3701632E-03, 2.4357281E-03, 3.9986106E-03, 20 6.0833921E-03, 8.7681189E-03, 1.2173839E-02, 1.6423698E-02, 2.1624430E-02, 21 2.7862812E-02, 3.5259841E-02, 4.3921115E-02, 5.3917207E-02, 6.5624214E-02, 22 8.3781262E-02, 9.9420591E-02, 1.1764723E-01, 1.3811355E-01, 1.5767812E-01, 23 1.7649577E-01, 1.9492037E-01, 2.1261733E-01, 2.3006383E-01, 2.4720469E-01, 24 2.6403751E-01, 2.8060830E-01, 2.9714099E-01, 3.1358408E-01, 3.3003588E-01, 25 3.4649739E-01, 3.6302365E-01, 3.7959989E-01, 3.9629615E-01, 4.1296065E-01, 26 4.2981279E-01, 4.4668973E-01, 4.6368950E-01, 4.8079354E-01, 5.5033939E-01, 27 6.2251025E-01, 6.9814683E-01, 7.7793192E-01, 8.6256858E-01, 9.5233551E-01, 28 1.0475684E+00, 1.1482975E+00, 1.2546836E+00, 1.3666825E+00, 1.4847576E+00, 29 1.6106287E+00, 1.7465973E+00, 1.8947107E+00, 2.0531363E+00, 2.2152790E+00, 30 2.3725066E+00, 2.5176262E+00, }, 31 { 32 8.2498250E-04, 1.7548194E-03, 3.2033879E-03, 5.1446153E-03, 7.6622167E-03, 33 1.0746506E-02, 1.4349932E-02, 1.8444735E-02, 2.3060711E-02, 2.8235090E-02, 34 3.4013949E-02, 4.0486476E-02, 4.7731124E-02, 5.5792271E-02, 6.4884648E-02, 35 7.8287228E-02, 8.9319108E-02, 1.0099001E-01, 1.1279681E-01, 1.2442962E-01, 36 1.3559501E-01, 1.4632097E-01, 1.5661116E-01, 1.6665512E-01, 1.7659630E-01, 37 1.8649004E-01, 1.9639454E-01, 2.0633976E-01, 2.1632312E-01, 2.2637439E-01, 38 2.3645865E-01, 2.4659833E-01, 2.5673650E-01, 2.6693995E-01, 2.7708645E-01, 39 2.8728808E-01, 2.9745769E-01, 3.0767783E-01, 3.1789417E-01, 3.5908257E-01, 40 4.0122667E-01, 4.4490603E-01, 4.9065073E-01, 5.3901377E-01, 5.9040443E-01, 41 6.4516251E-01, 7.0337885E-01, 7.6498308E-01, 8.2954889E-01, 8.9700060E-01, 42 9.6777942E-01, 1.0437578E+00, 1.1269049E+00, 1.2168011E+00, 1.3102657E+00, 43 1.4021313E+00, 1.4872946E+00, }, 44 { 45 2.6338153E-03, 5.1531469E-03, 8.6718598E-03, 1.2757530E-02, 1.7527880E-02, 46 2.3053764E-02, 2.9350119E-02, 3.6339654E-02, 4.3959534E-02, 5.2189779E-02, 47 6.1061204E-02, 7.0638878E-02, 8.0976018E-02, 9.2079683E-02, 1.0411325E-01, 48 1.2007842E-01, 1.3354510E-01, 1.4704230E-01, 1.6011087E-01, 1.7330977E-01, 49 1.8632802E-01, 1.9888727E-01, 2.1117852E-01, 2.2328724E-01, 2.3543539E-01, 50 2.4762954E-01, 2.6002554E-01, 2.7253229E-01, 2.8511314E-01, 2.9785074E-01, 51 3.1064349E-01, 3.2351134E-01, 3.3630064E-01, 3.4918444E-01, 3.6199604E-01, 52 3.7479034E-01, 3.8750304E-01, 4.0023214E-01, 4.1292874E-01, 4.6360429E-01, 53 5.1492529E-01, 5.6769599E-01, 6.2260684E-01, 6.8028728E-01, 7.4136713E-01, 54 8.0637178E-01, 8.7561608E-01, 9.4903343E-01, 1.0260428E+00, 1.1059258E+00, 55 1.1891125E+00, 1.2779182E+00, 1.3751832E+00, 1.4819637E+00, 1.5947592E+00, 56 1.7083305E+00, 1.8153705E+00, }, 57 { 58 1.5830398E-02, 2.2758254E-02, 3.1427169E-02, 4.1393176E-02, 5.2620970E-02, 59 6.4987531E-02, 7.8419617E-02, 9.2680602E-02, 1.0752960E-01, 1.2282414E-01, 60 1.3847336E-01, 1.5454736E-01, 1.7099570E-01, 1.8781122E-01, 2.0507803E-01, 61 2.2294724E-01, 2.4005110E-01, 2.5658664E-01, 2.7246494E-01, 2.8870339E-01, 62 3.0504767E-01, 3.2104382E-01, 3.3707371E-01, 3.5306552E-01, 3.6923391E-01, 63 3.8551027E-01, 4.0221257E-01, 4.1906968E-01, 4.3604325E-01, 4.5321348E-01, 64 4.7028266E-01, 4.8741821E-01, 5.0453951E-01, 5.2165296E-01, 5.3855676E-01, 65 5.5541093E-01, 5.7212063E-01, 5.8873353E-01, 6.0521413E-01, 6.7045795E-01, 66 7.3543816E-01, 8.0131001E-01, 8.6924994E-01, 9.4016182E-01, 1.0147562E+00, 67 1.0940851E+00, 1.1787366E+00, 1.2692938E+00, 1.3648344E+00, 1.4637294E+00, 68 1.5651340E+00, 1.6714962E+00, 1.7874724E+00, 1.9162205E+00, 2.0558056E+00, 69 2.2006135E+00, 2.3415384E+00, }, 70 { 71 2.8785005E-02, 3.6672896E-02, 4.4797145E-02, 5.3650377E-02, 6.3177668E-02, 72 7.2963488E-02, 8.2818591E-02, 9.2618223E-02, 1.0238365E-01, 1.1212532E-01, 73 1.2192569E-01, 1.3185100E-01, 1.4189765E-01, 1.5192434E-01, 1.6214341E-01, 74 1.7406192E-01, 1.8365747E-01, 1.9275726E-01, 2.0126672E-01, 2.0986046E-01, 75 2.1842454E-01, 2.2674249E-01, 2.3499505E-01, 2.4317179E-01, 2.5141757E-01, 76 2.5975937E-01, 2.6827585E-01, 2.7686691E-01, 2.8555353E-01, 2.9431738E-01, 77 3.0312975E-01, 3.1194479E-01, 3.2073541E-01, 3.2951954E-01, 3.3820067E-01, 78 3.4681070E-01, 3.5536127E-01, 3.6381122E-01, 3.7218068E-01, 4.0516564E-01, 79 4.3771084E-01, 4.7051296E-01, 5.0408600E-01, 5.3886213E-01, 5.7524440E-01, 80 6.1376620E-01, 6.5484305E-01, 6.9879338E-01, 7.4529199E-01, 7.9333384E-01, 81 8.4231998E-01, 8.9309999E-01, 9.4811855E-01, 1.0095134E+00, 1.0766172E+00, 82 1.1470688E+00, 1.2166183E+00, }, 83 { 84 3.4075424E-02, 4.1849451E-02, 4.6814778E-02, 5.0994880E-02, 5.5031142E-02, 85 5.9045429E-02, 6.2859996E-02, 6.6666155E-02, 7.0345723E-02, 7.3841230E-02, 86 7.7420006E-02, 8.0995783E-02, 8.4587633E-02, 8.8095453E-02, 9.1718461E-02, 87 9.5953796E-02, 9.8968324E-02, 1.0186164E-01, 1.0473341E-01, 1.0781845E-01, 88 1.1101729E-01, 1.1425886E-01, 1.1762491E-01, 1.2109693E-01, 1.2463058E-01, 89 1.2825546E-01, 1.3199651E-01, 1.3581263E-01, 1.3968025E-01, 1.4359245E-01, 90 1.4752525E-01, 1.5147392E-01, 1.5540841E-01, 1.5933267E-01, 1.6322308E-01, 91 1.6707839E-01, 1.7090199E-01, 1.7467101E-01, 1.7840240E-01, 1.9302501E-01, 92 2.0736027E-01, 2.2171686E-01, 2.3635616E-01, 2.5145267E-01, 2.6719164E-01, 93 2.8373719E-01, 3.0137187E-01, 3.2027441E-01, 3.4041201E-01, 3.6130961E-01, 94 3.8251961E-01, 4.0428114E-01, 4.2761852E-01, 4.5373795E-01, 4.8266849E-01, 95 5.1349609E-01, 5.4430559E-01, }, 96 { 97 5.7576594E-02, 6.8077201E-02, 7.5059677E-02, 8.1118236E-02, 8.7105470E-02, 98 9.3043001E-02, 9.8897592E-02, 1.0472800E-01, 1.1059700E-01, 1.1659912E-01, 99 1.2209060E-01, 1.2749867E-01, 1.3249114E-01, 1.3782349E-01, 1.4322382E-01, 100 1.4782605E-01, 1.5234327E-01, 1.5671225E-01, 1.6107525E-01, 1.6564744E-01, 101 1.7016961E-01, 1.7470857E-01, 1.7931686E-01, 1.8398622E-01, 1.8872590E-01, 102 1.9359028E-01, 1.9860897E-01, 2.0372754E-01, 2.0894541E-01, 2.1427148E-01, 103 2.1966739E-01, 2.2509743E-01, 2.3055625E-01, 2.3599811E-01, 2.4141434E-01, 104 2.4677741E-01, 2.5208660E-01, 2.5731499E-01, 2.6249541E-01, 2.8271628E-01, 105 3.0241898E-01, 3.2203239E-01, 3.4194177E-01, 3.6243017E-01, 3.8368642E-01, 106 4.0597694E-01, 4.2959793E-01, 4.5496267E-01, 4.8204464E-01, 5.1022741E-01, 107 5.3890527E-01, 5.6797453E-01, 5.9904297E-01, 6.3383272E-01, 6.7277080E-01, 108 7.1447395E-01, 7.5645834E-01, }, 109 { 110 2.8137063E-04, 5.4775625E-04, 1.2196160E-03, 3.0025316E-03, 6.8928125E-03, 111 1.3557944E-02, 2.3919696E-02, 3.9086700E-02, 5.9593254E-02, 8.5181394E-02, 112 1.1534075E-01, 1.4937373E-01, 1.8672082E-01, 2.2707996E-01, 2.7027228E-01, 113 3.0193980E-01, 3.4507013E-01, 3.9199471E-01, 4.4506636E-01, 5.0693807E-01, 114 5.7807805E-01, 6.5753228E-01, 7.4566860E-01, 8.4246591E-01, 9.4928133E-01, 115 1.0673064E+00, 1.1977846E+00, 1.3402306E+00, 1.4947362E+00, 1.6610790E+00, 116 1.8386569E+00, 2.0267102E+00, 2.2236192E+00, 2.4287155E+00, 2.6402456E+00, 117 2.8580094E+00, 3.0808728E+00, 3.3086992E+00, 3.5407243E+00, 4.5162770E+00, 118 5.5714032E+00, 6.7222767E+00, 7.9864234E+00, 9.3829685E+00, 1.0926746E+01, 119 1.2633464E+01, 1.4515727E+01, 1.6569388E+01, 1.8777560E+01, 2.1116699E+01, 120 2.3601310E+01, 2.6303095E+01, 2.9300580E+01, 3.2598426E+01, 3.6061347E+01, 121 3.9488900E+01, 4.2664341E+01, }, 122 { 123 2.0277774E-03, 3.8965029E-03, 7.3940047E-03, 1.3943648E-02, 2.5123497E-02, 124 4.1714438E-02, 6.4989467E-02, 9.6682090E-02, 1.3796248E-01, 1.8988754E-01, 125 2.5333941E-01, 3.2978613E-01, 4.2075618E-01, 5.2746571E-01, 6.5418057E-01, 126 8.5285517E-01, 1.0285573E+00, 1.2407092E+00, 1.4872216E+00, 1.7215113E+00, 127 1.9480461E+00, 2.1711666E+00, 2.3848351E+00, 2.5954954E+00, 2.8013248E+00, 128 3.0024050E+00, 3.1989825E+00, 3.3946388E+00, 3.5885645E+00, 3.7822864E+00, 129 3.9759152E+00, 4.1702220E+00, 4.3650164E+00, 4.5612323E+00, 4.7572863E+00, 130 4.9556746E+00, 5.1545503E+00, 5.3550671E+00, 5.5571893E+00, 6.3800068E+00, 131 7.2369338E+00, 8.1379984E+00, 9.0902405E+00, 1.0101348E+01, 1.1175379E+01, 132 1.2314407E+01, 1.3518181E+01, 1.4792320E+01, 1.6137883E+01, 1.7566364E+01, 133 1.9096665E+01, 2.0754932E+01, 2.2560230E+01, 2.4488057E+01, 2.6454746E+01, 134 2.8352731E+01, 3.0102754E+01, }, 135 { 136 3.8703852E-03, 9.1840722E-03, 1.8299068E-02, 3.1659957E-02, 4.9691616E-02, 137 7.2404381E-02, 1.0039167E-01, 1.3427178E-01, 1.7478316E-01, 2.2257091E-01, 138 2.7815401E-01, 3.4287636E-01, 4.1815633E-01, 5.0492929E-01, 6.0705908E-01, 139 7.6930166E-01, 9.0370299E-01, 1.0572361E+00, 1.2252425E+00, 1.3812812E+00, 140 1.5261271E+00, 1.6650815E+00, 1.7971633E+00, 1.9257271E+00, 2.0523035E+00, 141 2.1769019E+00, 2.3007126E+00, 2.4247534E+00, 2.5489887E+00, 2.6736718E+00, 142 2.7987219E+00, 2.9244445E+00, 3.0504352E+00, 3.1775671E+00, 3.3041024E+00, 143 3.4318908E+00, 3.5597980E+00, 3.6883392E+00, 3.8174104E+00, 4.3408107E+00, 144 4.8801094E+00, 5.4426531E+00, 6.0341379E+00, 6.6598305E+00, 7.3237309E+00, 145 8.0276918E+00, 8.7727893E+00, 9.5570171E+00, 1.0381746E+01, 1.1244474E+01, 146 1.2159818E+01, 1.3144647E+01, 1.4214680E+01, 1.5361249E+01, 1.6534664E+01, 147 1.7678207E+01, 1.8735492E+01, }, 148 { 149 5.2277509E-03, 1.1212744E-02, 2.0799323E-02, 3.3621729E-02, 4.9768228E-02, 150 6.9244336E-02, 9.2149147E-02, 1.1844154E-01, 1.4825709E-01, 1.8180408E-01, 151 2.1932608E-01, 2.6145437E-01, 3.0869447E-01, 3.6130884E-01, 4.2077066E-01, 152 5.0899665E-01, 5.8139683E-01, 6.5797719E-01, 7.3527504E-01, 8.1166997E-01, 153 8.8490745E-01, 9.5536324E-01, 1.0231389E+00, 1.0891060E+00, 1.1544187E+00, 154 1.2193863E+00, 1.2842963E+00, 1.3494539E+00, 1.4147751E+00, 1.4806838E+00, 155 1.5466029E+00, 1.6130373E+00, 1.6793837E+00, 1.7462435E+00, 1.8126333E+00, 156 1.8795348E+00, 1.9460849E+00, 2.0129957E+00, 2.0799659E+00, 2.3497181E+00, 157 2.6257041E+00, 2.9119469E+00, 3.2118333E+00, 3.5288912E+00, 3.8659886E+00, 158 4.2250262E+00, 4.6065545E+00, 5.0097964E+00, 5.4319720E+00, 5.8721964E+00, 159 6.3352968E+00, 6.8321498E+00, 7.3745216E+00, 7.9614612E+00, 8.5707596E+00, 160 9.1679333E+00, 9.7211597E+00, }, 161 }; 162 163 static float k_temp_35[57] = { 3500.0, 164 3750.0, 165 4000.0, 166 4250.0, 167 4500.0, 168 4750.0, 169 5000.0, 170 5250.0, 171 5500.0, 172 5750.0, 173 6000.0, 174 6250.0, 175 6500.0, 176 6750.0, 177 7000.0, 178 7250.0, 179 7500.0, 180 7750.0, 181 8000.0, 182 8250.0, 183 8500.0, 184 8750.0, 185 9000.0, 186 9250.0, 187 9500.0, 188 9750.0, 189 10000.0, 190 10250.0, 191 10500.0, 192 10750.0, 193 11000.0, 194 11250.0, 195 11500.0, 196 11750.0, 197 12000.0, 198 12250.0, 199 12500.0, 200 12750.0, 201 13000.0, 202 14000.0, 203 15000.0, 204 16000.0, 205 17000.0, 206 18000.0, 207 19000.0, 208 20000.0, 209 21000.0, 210 22000.0, 211 23000.0, 212 24000.0, 213 25000.0, 214 26000.0, 215 27000.0, 216 28000.0, 217 29000.0, 218 30000.0, 219 31000.0, 220 }; 221 222