static int h_40_max = 65;
static float h_40_low = 2000.0;
static float h_40_high = 9800.0;
static float h_flux_40[NUM_MAG][65] = {
{
2.9498684E+01, 4.5665506E+02, 1.9530687E+03, 8.3451709E+03, 3.8310379E+04,
1.0976544E+05, 2.0526697E+05, 3.5719609E+05, 5.8189338E+05, 9.0633406E+05,
1.3466549E+06, 1.9186402E+06, 2.6126898E+06, 3.4128845E+06, 4.2669105E+06,
5.1348745E+06, 6.0713405E+06, 7.1762270E+06, 8.4871310E+06, 1.0162000E+07,
1.2589510E+07, 1.5355374E+07, 2.0057536E+07, 2.6687772E+07, 3.5863288E+07,
4.8297576E+07, 6.4697836E+07, 8.5858448E+07, 1.1278974E+08, 1.4652698E+08,
1.8822090E+08, 2.3932635E+08, 3.0131674E+08, 3.7610618E+08, 4.6114944E+08,
5.6243322E+08, 6.7875763E+08, 8.1071078E+08, 9.5887008E+08, 1.1259805E+09,
1.3075488E+09, 1.5051887E+09, 1.7185452E+09, 2.0864669E+09, 2.3349942E+09,
2.5940874E+09, 2.8628252E+09, 3.1415421E+09, 3.4293563E+09, 3.5520059E+09,
3.8525760E+09, 4.4829194E+09, 5.1658557E+09, 5.8880497E+09, 6.6671944E+09,
7.5134828E+09, 8.4413143E+09, 9.4901053E+09, 1.0498071E+10, 1.1619900E+10,
1.3010746E+10, 1.4428998E+10, 1.5688385E+10, 1.7081043E+10, 1.8533274E+10, },
{
1.8747404E+03, 9.0914707E+03, 2.6097666E+04, 8.2718000E+04, 3.0261534E+05,
7.8026131E+05, 1.4006144E+06, 2.3866845E+06, 3.8408798E+06, 5.9323365E+06,
8.7952380E+06, 1.2625412E+07, 1.7558720E+07, 2.3724008E+07, 3.1076476E+07,
3.9818080E+07, 5.0793452E+07, 6.4845196E+07, 8.2412464E+07, 1.0471383E+08,
1.3400795E+08, 1.6824934E+08, 2.1567885E+08, 2.7437194E+08, 3.4635990E+08,
4.3261222E+08, 5.3360502E+08, 6.4953197E+08, 7.8140045E+08, 9.2634099E+08,
1.0906010E+09, 1.2734776E+09, 1.4765153E+09, 1.7034500E+09, 1.9445393E+09,
2.2156462E+09, 2.5126346E+09, 2.8087542E+09, 3.1553329E+09, 3.5358968E+09,
3.9414500E+09, 4.3785027E+09, 4.8470820E+09, 5.6654449E+09, 6.2164736E+09,
6.7987302E+09, 7.4134420E+09, 8.0607268E+09, 8.7415204E+09, 9.0311588E+09,
9.7577882E+09, 1.1312330E+10, 1.3028747E+10, 1.4869646E+10, 1.6874234E+10,
1.9053046E+10, 2.1513601E+10, 2.4528294E+10, 2.7223894E+10, 3.0036118E+10,
3.3445990E+10, 3.6373692E+10, 3.8165893E+10, 4.0547123E+10, 4.2890916E+10, },
{
2.2600338E+04, 5.6659375E+04, 1.1120391E+05, 2.4661425E+05, 6.6959500E+05,
1.5294938E+06, 2.7089435E+06, 4.5928825E+06, 7.2974360E+06, 1.1044335E+07,
1.5944769E+07, 2.2324736E+07, 3.0463386E+07, 4.0851540E+07, 5.3721144E+07,
7.0240608E+07, 9.2106000E+07, 1.2079563E+08, 1.5517869E+08, 1.9819682E+08,
2.5035990E+08, 3.0744022E+08, 3.7855686E+08, 4.5880922E+08, 5.4940128E+08,
6.5073574E+08, 7.6245510E+08, 8.8473229E+08, 1.0173287E+09, 1.1572781E+09,
1.3073504E+09, 1.4658276E+09, 1.6329042E+09, 1.8097340E+09, 1.9892148E+09,
2.1822940E+09, 2.3848351E+09, 2.5836457E+09, 2.8041111E+09, 3.0365015E+09,
3.2773827E+09, 3.5290872E+09, 3.7914207E+09, 4.2393080E+09, 4.5298975E+09,
4.8318285E+09, 5.1455626E+09, 5.4711660E+09, 5.8091075E+09, 5.9468396E+09,
6.3013908E+09, 7.0460334E+09, 7.8427730E+09, 8.6784655E+09, 9.5578388E+09,
1.0475735E+10, 1.1433354E+10, 1.2405156E+10, 1.3340742E+10, 1.4357138E+10,
1.5516059E+10, 1.6473794E+10, 1.7067437E+10, 1.7927217E+10, 1.8778233E+10, },
{
3.2800419E+05, 7.6294138E+05, 1.2564608E+06, 2.1620308E+06, 4.1217968E+06,
7.1656515E+06, 1.1123398E+07, 1.6765004E+07, 2.4150956E+07, 3.3562516E+07,
4.5057984E+07, 5.9103168E+07, 7.6072624E+07, 9.6747288E+07, 1.2164431E+08,
1.5311318E+08, 1.9409208E+08, 2.4691246E+08, 3.0867091E+08, 3.8461725E+08,
4.7347866E+08, 5.6621978E+08, 6.7587872E+08, 7.9174016E+08, 9.1408710E+08,
1.0428434E+09, 1.1783965E+09, 1.3214723E+09, 1.4714381E+09, 1.6275732E+09,
1.7910930E+09, 1.9612518E+09, 2.1381356E+09, 2.3218990E+09, 2.5060147E+09,
2.7011717E+09, 2.9024630E+09, 3.1038505E+09, 3.3176845E+09, 3.5391465E+09,
3.7662735E+09, 4.0004150E+09, 4.2413092E+09, 4.6467236E+09, 4.9053865E+09,
5.1710587E+09, 5.4441748E+09, 5.7246454E+09, 6.0122604E+09, 6.1274440E+09,
6.4248873E+09, 7.0396308E+09, 7.6817848E+09, 8.3411988E+09, 9.0171720E+09,
9.7033615E+09, 1.0387494E+10, 1.1030159E+10, 1.1572372E+10, 1.2176001E+10,
1.2968798E+10, 1.3701821E+10, 1.4208225E+10, 1.4842553E+10, 1.5478171E+10, },
{
1.5891064E+07, 3.1142842E+07, 4.3054812E+07, 5.9399596E+07, 8.4751688E+07,
1.1078964E+08, 1.3817234E+08, 1.7012938E+08, 2.0659078E+08, 2.4815080E+08,
2.9587952E+08, 3.4997034E+08, 4.1055181E+08, 4.7628630E+08, 5.4590714E+08,
6.1682867E+08, 6.9339226E+08, 7.7655072E+08, 8.7124723E+08, 9.7105453E+08,
1.0822789E+09, 1.1945395E+09, 1.3255181E+09, 1.4658952E+09, 1.6161400E+09,
1.7749373E+09, 1.9412261E+09, 2.1144236E+09, 2.2936650E+09, 2.4788416E+09,
2.6688174E+09, 2.8638643E+09, 3.0636237E+09, 3.2677363E+09, 3.4695437E+09,
3.6796378E+09, 3.8926502E+09, 4.1095283E+09, 4.3290348E+09, 4.5521014E+09,
4.7780040E+09, 5.0071301E+09, 5.2396948E+09, 5.6223974E+09, 5.8630118E+09,
6.1069829E+09, 6.3545359E+09, 6.6059500E+09, 6.8603817E+09, 6.9627208E+09,
7.2219873E+09, 7.7487636E+09, 8.2869868E+09, 8.8292639E+09, 9.3732332E+09,
9.9148472E+09, 1.0437877E+10, 1.0911653E+10, 1.1275612E+10, 1.1671932E+10,
1.2230594E+10, 1.2807875E+10, 1.3273079E+10, 1.3758379E+10, 1.4245425E+10, },
{
6.5765080E+07, 9.3243344E+07, 1.1221522E+08, 1.3389305E+08, 1.6184843E+08,
1.8546704E+08, 2.1044682E+08, 2.3755219E+08, 2.6754019E+08, 3.0095069E+08,
3.3906006E+08, 3.8109862E+08, 4.2714528E+08, 4.7551763E+08, 5.2581040E+08,
5.7501171E+08, 6.2596019E+08, 6.7910592E+08, 7.4045862E+08, 8.0104083E+08,
8.6523334E+08, 9.3980941E+08, 1.0085199E+09, 1.0794767E+09, 1.1541951E+09,
1.2311062E+09, 1.3095315E+09, 1.3891562E+09, 1.4695496E+09, 1.5487004E+09,
1.6302798E+09, 1.7123688E+09, 1.7950328E+09, 1.8779773E+09, 1.9588184E+09,
2.0416646E+09, 2.1244349E+09, 2.2047247E+09, 2.2876890E+09, 2.3706847E+09,
2.4536095E+09, 2.5365878E+09, 2.6196636E+09, 2.7549839E+09, 2.8380951E+09,
2.9213217E+09, 3.0047145E+09, 3.0883057E+09, 3.1717806E+09, 3.2037632E+09,
3.2874493E+09, 3.4546509E+09, 3.6215967E+09, 3.7865065E+09, 3.9487063E+09,
4.1070700E+09, 4.2570993E+09, 4.3888850E+09, 4.4855521E+09, 4.5893709E+09,
4.7409239E+09, 4.9090319E+09, 5.0575365E+09, 5.1984230E+09, 5.3403540E+09, },
{
4.8792088E+07, 5.8465432E+07, 6.5857244E+07, 7.4162768E+07, 8.4463488E+07,
9.3536768E+07, 1.0469852E+08, 1.1699642E+08, 1.3075952E+08, 1.4668947E+08,
1.6606954E+08, 1.8943706E+08, 2.1700235E+08, 2.4739509E+08, 2.8017402E+08,
3.1366362E+08, 3.4848621E+08, 3.8342323E+08, 4.1968781E+08, 4.5166502E+08,
4.8069523E+08, 5.2890000E+08, 5.5142752E+08, 5.7003955E+08, 5.9163955E+08,
6.1271674E+08, 6.3336346E+08, 6.5362086E+08, 6.7356230E+08, 6.8922739E+08,
7.0888205E+08, 7.2838803E+08, 7.4778208E+08, 7.6707437E+08, 7.8563386E+08,
8.0441286E+08, 8.2298445E+08, 8.3878656E+08, 8.5746707E+08, 8.7598778E+08,
8.9429632E+08, 9.1235386E+08, 9.3029517E+08, 9.5961190E+08, 9.7692352E+08,
9.9397638E+08, 1.0107945E+09, 1.0274351E+09, 1.0436475E+09, 1.0488526E+09,
1.0649262E+09, 1.0965386E+09, 1.1276538E+09, 1.1580244E+09, 1.1877646E+09,
1.2169091E+09, 1.2446412E+09, 1.2691668E+09, 1.2887681E+09, 1.3098337E+09,
1.3389120E+09, 1.3745891E+09, 1.4120269E+09, 1.4446794E+09, 1.4780777E+09, },
{
6.1182616E+07, 6.9630064E+07, 7.7049480E+07, 8.5813184E+07, 9.6232648E+07,
1.0591917E+08, 1.1901473E+08, 1.3280124E+08, 1.4739634E+08, 1.6354702E+08,
1.8235451E+08, 2.0507526E+08, 2.3275971E+08, 2.6415061E+08, 2.9742106E+08,
3.3075949E+08, 3.6425216E+08, 3.9695654E+08, 4.2930368E+08, 4.5777978E+08,
4.8318022E+08, 5.2057696E+08, 5.3883898E+08, 5.5539296E+08, 5.7214605E+08,
5.8845805E+08, 6.0458458E+08, 6.2058662E+08, 6.3647296E+08, 6.5124653E+08,
6.6719981E+08, 6.8313894E+08, 6.9904890E+08, 7.1489696E+08, 7.3020307E+08,
7.4573261E+08, 7.6106445E+08, 7.7697830E+08, 7.9233856E+08, 8.0747027E+08,
8.2237517E+08, 8.3702662E+08, 8.5154381E+08, 8.7522861E+08, 8.8921190E+08,
9.0302598E+08, 9.1666042E+08, 9.3019642E+08, 9.4344090E+08, 9.4796115E+08,
9.6117568E+08, 9.8724294E+08, 1.0130286E+09, 1.0382026E+09, 1.0628718E+09,
1.0870775E+09, 1.1103178E+09, 1.1315108E+09, 1.1504861E+09, 1.1698934E+09,
1.1926052E+09, 1.2196634E+09, 1.2495165E+09, 1.2757624E+09, 1.3025371E+09, },
{
1.7373135E+02, 4.2494819E+03, 2.0556961E+04, 9.6167148E+04, 4.8154541E+05,
1.4476354E+06, 2.7222328E+06, 4.7754135E+06, 7.8504510E+06, 1.2349962E+07,
1.8509528E+07, 2.6606196E+07, 3.6544984E+07, 4.8146952E+07, 6.0629116E+07,
7.3353592E+07, 8.7134168E+07, 1.0359276E+08, 1.2315224E+08, 1.4851486E+08,
1.8643230E+08, 2.3023382E+08, 3.0824016E+08, 4.2281050E+08, 5.8704243E+08,
8.1671136E+08, 1.1269920E+09, 1.5362440E+09, 2.0669211E+09, 2.7447283E+09,
3.5897825E+09, 4.6315868E+09, 5.8980019E+09, 7.4235556E+09, 9.1495885E+09,
1.1190230E+10, 1.3509794E+10, 1.6189735E+10, 1.9103312E+10, 2.2349795E+10,
2.5820049E+10, 2.9537503E+10, 3.3483880E+10, 4.0150958E+10, 4.4523667E+10,
4.8988369E+10, 5.3510713E+10, 5.8097619E+10, 6.2723445E+10, 6.4583119E+10,
6.9258420E+10, 7.8777311E+10, 8.8741683E+10, 9.8993644E+10, 1.0982438E+11,
1.2142874E+11, 1.3369346E+11, 1.4620146E+11, 1.5875039E+11, 1.7246151E+11,
1.8876287E+11, 2.0897273E+11, 2.3271907E+11, 2.5565236E+11, 2.8058413E+11, },
{
4.4038438E+03, 6.8369625E+04, 2.6578103E+05, 9.9957581E+05, 3.9508320E+06,
1.0076210E+07, 1.7279148E+07, 2.7861732E+07, 4.2805844E+07, 6.3521048E+07,
9.1265912E+07, 1.2700396E+08, 1.7086838E+08, 2.2203744E+08, 2.7849366E+08,
3.3707238E+08, 4.0125414E+08, 4.7556394E+08, 5.6975130E+08, 6.8519622E+08,
8.4804960E+08, 1.0394773E+09, 1.3419232E+09, 1.7496236E+09, 2.2887158E+09,
2.9810642E+09, 3.8456727E+09, 4.8921661E+09, 6.1364035E+09, 7.5602586E+09,
9.2298813E+09, 1.1150865E+10, 1.3345695E+10, 1.5861479E+10, 1.8581885E+10,
2.1687409E+10, 2.5125622E+10, 2.8570925E+10, 3.2636611E+10, 3.7139628E+10,
4.1954804E+10, 4.7168815E+10, 5.2784226E+10, 6.2629503E+10, 6.9311029E+10,
7.6395119E+10, 8.3913294E+10, 9.1862868E+10, 1.0026227E+11, 1.0387038E+11,
1.1289284E+11, 1.3231305E+11, 1.5396985E+11, 1.7735931E+11, 2.0308738E+11,
2.3137110E+11, 2.6408319E+11, 3.0652426E+11, 3.4229240E+11, 3.7906616E+11,
4.2622553E+11, 4.6769137E+11, 4.9262517E+11, 5.2461706E+11, 5.5597394E+11, },
{
1.8321141E+04, 6.7492531E+04, 1.7382623E+05, 5.2107728E+05, 1.9226272E+06,
5.2559765E+06, 9.9819590E+06, 1.8063972E+07, 3.0553808E+07, 4.9198720E+07,
7.5436504E+07, 1.1195821E+08, 1.6140237E+08, 2.2739184E+08, 3.1163923E+08,
4.2068877E+08, 5.6833850E+08, 7.6732678E+08, 1.0203957E+09, 1.3466221E+09,
1.7647363E+09, 2.2615747E+09, 2.8989394E+09, 3.6494541E+09, 4.5312184E+09,
5.5416535E+09, 6.6669937E+09, 7.9123246E+09, 9.2841359E+09, 1.0736206E+10,
1.2348841E+10, 1.4097170E+10, 1.5987176E+10, 1.8049878E+10, 2.0188041E+10,
2.2539250E+10, 2.5061927E+10, 2.7479464E+10, 3.0311342E+10, 3.3358676E+10,
3.6548358E+10, 3.9931138E+10, 4.3503247E+10, 4.9702121E+10, 5.3793915E+10,
5.8098237E+10, 6.2626431E+10, 6.7380064E+10, 7.2373420E+10, 7.4440688E+10,
7.9759360E+10, 9.1099251E+10, 1.0352116E+11, 1.1675860E+11, 1.3101729E+11,
1.4629172E+11, 1.6309604E+11, 1.8235825E+11, 2.0068162E+11, 2.1985962E+11,
2.4141121E+11, 2.5893544E+11, 2.6931623E+11, 2.8432695E+11, 2.9912950E+11, },
{
1.0401604E+05, 3.1739412E+05, 6.9131019E+05, 1.6882694E+06, 4.8792520E+06,
1.1232897E+07, 1.9690308E+07, 3.2984348E+07, 5.1928764E+07, 7.8182392E+07,
1.1275440E+08, 1.5812016E+08, 2.1650131E+08, 2.9095565E+08, 3.8226320E+08,
4.9617318E+08, 6.4395386E+08, 8.3534950E+08, 1.0665379E+09, 1.3526618E+09,
1.7011476E+09, 2.0855997E+09, 2.5631219E+09, 3.1002486E+09, 3.7040515E+09,
4.3745966E+09, 5.1021737E+09, 5.8913526E+09, 6.7455299E+09, 7.6459203E+09,
8.6145935E+09, 9.6400527E+09, 1.0726624E+10, 1.1880818E+10, 1.3054048E+10,
1.4317392E+10, 1.5643526E+10, 1.6944544E+10, 1.8388974E+10, 1.9911049E+10,
2.1488224E+10, 2.3134816E+10, 2.4851354E+10, 2.7781716E+10, 2.9681451E+10,
3.1655801E+10, 3.3707807E+10, 3.5837551E+10, 3.8048936E+10, 3.8949503E+10,
4.1269412E+10, 4.6142124E+10, 5.1357270E+10, 5.6828350E+10, 6.2584914E+10,
6.8591841E+10, 7.4846708E+10, 8.1150501E+10, 8.7254041E+10, 9.3904757E+10,
1.0146489E+11, 1.0769027E+11, 1.1153881E+11, 1.1716235E+11, 1.2271712E+11, },
};
syntax highlighted by Code2HTML, v. 0.9.1