/* temp_convert.c -- convert voltages in data system time stream to
     temperatures */

/* format is extremely picky:
   1) data stream must have following format:
      1 float:  time
      NSEQ integers:  sequence number
      NGRT float pairs:  log and linear voltages for GRT's
      NCARB floats:  linear voltages for carbon thermometers
   2) hard-coded calibration curves */

#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include "temp_convert.h"


/* format is {R1, T1, R2, T2, ..., -1, -1} */
/* Must be in order of increasing R */

#ifdef OLD_CURVES
float  cal_curve[NGRT+NCARB][MAXVAL] = {
  /* #1: UC evap #2, X19402: */
  {34.4725 , 325.0000 ,
   36.4515 , 300.0000 ,
   41.5755 , 250.0000 ,
   49.0580 , 200.0000 ,
   60.7538 , 150.0000 ,
   81.2659 , 100.0000 ,
   94.7256 , 80.0000 ,
   114.6610 , 60.0000 ,
   148.3290 , 40.0000 ,
   176.4740 , 30.0000 ,
   222.4980 , 20.0000 ,
   260.5310 , 15.0000 ,
   324.4980 , 10.0000 ,
   366.6250 , 8.0000 ,
   430.9390 , 6.0000 ,
   548.3670 , 4.0000 ,
   658.6350 , 3.0000 ,
   875.5350 , 2.0000 ,
   1098.3300 , 1.5000 ,
   1587.2300 , 1.0000 ,
   2004.4700 , 0.8000 ,
   2334.9199 , 0.7000 ,
   2824.9500 , 0.6000 ,
   3623.7000 , 0.5000 ,
   3846.8899 , 0.4800 ,
   4100.9600 , 0.4600 ,
   4392.5098 , 0.4400 ,
   4729.8198 , 0.4200 ,
   5123.3701 , 0.4000 ,
   5587.7100 , 0.3800 ,
   6142.0000 , 0.3600 ,
   6813.3398 , 0.3400 ,
   7640.9702 , 0.3200 ,
   8684.2305 , 0.3000 ,
   9314.2998 , 0.2898 ,
   11640.0996 , 0.2604 ,
   12220.0000 , 0.2554 ,
   15010.0000 , 0.2335 ,
   -1, -1}
  ,
  /* #2: IC evap, X20063: */
  {34.0425 , 325.0000 ,
   35.9016 , 300.0000 ,
   40.6798 , 250.0000 ,
   47.5811 , 200.0000 ,
   58.2143 , 150.0000 ,
   76.5470 , 100.0000 ,
   96.1838 , 70.0000 ,
   118.2010 , 50.0000 ,
   158.9160 , 30.0000 ,
   198.4140 , 20.0000 ,
   231.9640 , 15.0000 ,
   291.7730 , 10.0000 ,
   364.1620 , 7.0000 ,
   460.5390 , 5.0000 ,
   547.7480 , 4.0000 ,
   702.9570 , 3.0000 ,
   837.6320 , 2.5000 ,
   1060.2500 , 2.0000 ,
   1380.6200 , 1.6000 ,
   1642.3800 , 1.4000 ,
   2039.4301 , 1.2000 ,
   2700.1499 , 1.0000 ,
   3219.0300 , 0.9000 ,
   3971.2800 , 0.8000 ,
   5139.3999 , 0.7000 ,
   7134.7002 , 0.6000 ,
   8725.7803 , 0.5500 ,
   11035.7998 , 0.5000 ,
   12261.0996 , 0.4800 ,
   13727.4004 , 0.4600 ,
   15508.0996 , 0.4400 ,
   17702.1992 , 0.4200 ,
   20447.5996 , 0.4000 ,
   23955.3008 , 0.3800 ,
   28538.0996 , 0.3600 ,
   34633.5000 , 0.3400 ,
   42827.8984 , 0.3200 ,
   53602.6992 , 0.3000 ,
   59185.0000 , 0.2919 ,
   98297.0000 , 0.2578 ,
   -1, -1}
  ,
  /* #3: 4He evap, standard carbon: */
  {  0.1 ,9999.999 ,
   100.0 , 300.000 ,
   105.0 , 227.600 ,
   107.5 , 183.000 ,
   110.0 , 152.700 ,
   115.0 , 114.300 ,
   120.0 , 91.020 ,
   125.0 , 75.480 ,
   130.0 , 64.400 ,
   140.0 , 49.720 ,
   150.0 , 40.490 ,
   160.0 , 34.180 ,
   180.0 , 26.150 ,
   200.0 , 21.300 ,
   220.0 , 18.050 ,
   250.0 , 14.830 ,
   300.0 , 11.620 ,
   350.0 , 9.709 ,
   400.0 , 8.436 ,
   450.0 , 7.527 ,
   500.0 , 6.844 ,
   600.0 , 5.881 ,
   800.0 , 4.763 ,
   1000.0 , 4.122 ,
   1200.0 , 3.702 ,
   1500.0 , 3.281 ,
   2000.0 , 2.851 ,
   3000.0 , 2.398 ,
   4000.0 , 2.151 ,
   6000.0 , 1.879 ,
   8000.0 , 1.725 ,
   10000.0 , 1.624 ,
   -1, -1}
  ,
  /* #4: UC FP #1, X30330: */
  {25.5350 , 333.4754 ,
   25.7200 , 328.4868 ,
   26.0103 , 320.9830 ,
   26.2619 , 314.7159 ,
   26.4649 , 309.7632 ,
   26.8963 , 299.7849 ,
   27.3537 , 289.8714 ,
   27.8362 , 279.8549 ,
   28.3553 , 269.8765 ,
   28.9087 , 259.8777 ,
   29.5021 , 249.8747 ,
   30.1265 , 239.8802 ,
   30.8020 , 229.8642 ,
   31.5302 , 219.8784 ,
   32.3068 , 209.8804 ,
   33.1447 , 199.8817 ,
   34.0495 , 189.8744 ,
   35.0259 , 179.8867 ,
   36.0882 , 169.8917 ,
   37.2468 , 159.8994 ,
   38.5147 , 149.8983 ,
   39.9028 , 139.9006 ,
   41.4382 , 129.9166 ,
   43.1508 , 119.8894 ,
   45.0473 , 109.9901 ,
   47.2364 , 99.9051 ,
   48.4411 , 94.9019 ,
   49.7343 , 89.9029 ,
   51.1313 , 84.9007 ,
   52.6428 , 79.9026 ,
   54.2959 , 74.8992 ,
   56.1087 , 69.8939 ,
   58.1124 , 64.8879 ,
   60.3433 , 59.8870 ,
   62.8524 , 54.8881 ,
   65.6933 , 49.8913 ,
   66.9401 , 47.8887 ,
   68.9571 , 44.8946 ,
   71.1564 , 41.9019 ,
   73.5782 , 38.9150 ,
   76.2631 , 35.9311 ,
   79.2540 , 32.9455 ,
   81.5602 , 30.8605 ,
   83.7232 , 29.0642 ,
   85.8058 , 27.4645 ,
   88.0300 , 25.8748 ,
   90.4005 , 24.3050 ,
   93.0481 , 22.7110 ,
   95.9536 , 21.1139 ,
   98.1200 , 20.0204 ,
   100.2163 , 19.0294 ,
   102.4811 , 18.0416 ,
   104.9088 , 17.0555 ,
   107.5345 , 16.0685 ,
   110.4703 , 15.0725 ,
   113.6751 , 14.0788 ,
   117.2735 , 13.0754 ,
   121.3380 , 12.0653 ,
   125.9869 , 11.0512 ,
   131.4524 , 10.0212 ,
   137.9314 , 8.9840 ,
   145.7429 , 7.9451 ,
   155.4511 , 6.9119 ,
   165.3628 , 6.0805 ,
   176.1878 , 5.3460 ,
   185.6327 , 4.8258 ,
   194.5627 , 4.4132 ,
   199.4172 , 4.2146 ,
   204.8485 , 4.0103 ,
   211.1061 , 3.7979 ,
   217.5392 , 3.6008 ,
   224.8491 , 3.3983 ,
   232.9587 , 3.1986 ,
   242.0850 , 2.9987 ,
   252.6583 , 2.7965 ,
   264.5936 , 2.5978 ,
   278.7761 , 2.3965 ,
   295.1749 , 2.1993 ,
   315.0840 , 2.0001 ,
   339.5944 , 1.8007 ,
   370.5344 , 1.6012 ,
   411.5938 , 1.3998 ,
   437.4132 , 1.2999 ,
   467.8819 , 1.2008 ,
   485.8000 , 1.1501 ,
   520.3315 , 1.0637 ,
   579.3570 , 0.9486 ,
   641.2000 , 0.8550 ,
   715.0100 , 0.7673 ,
   811.1500 , 0.6821 ,
   922.3200 , 0.6082 ,
   1073.2000 , 0.5367 ,
   1252.7200 , 0.4763 ,
   1496.7400 , 0.4173 ,
   1803.4700 , 0.3675 ,
   2136.8899 , 0.3294 ,
   2358.3601 , 0.3101 ,
   2640.1799 , 0.2899 ,
   3195.6799 , 0.2600 ,
   4023.5300 , 0.2296 ,
   5095.7998 , 0.2041 ,
   6536.7998 , 0.1820 ,
   8714.2002 , 0.1614 ,
   11254.5000 , 0.1462 ,
   16355.7998 , 0.1278 ,
   24415.4004 , 0.1122 ,
   41882.0000 , 0.0953 ,
   67880.0000 , 0.0836 ,
   -1, -1}
  ,
  /* #5: UC FP #2, X32726: */
  {30.0159 , 330.1436 ,
   30.1795 , 326.1445 ,
   30.4244 , 320.1570 ,
   30.6368 , 315.1584 ,
   30.8643 , 310.1517 ,
   31.3274 , 300.1414 ,
   31.8046 , 290.1317 ,
   32.3395 , 280.1270 ,
   32.8941 , 270.1126 ,
   33.4831 , 260.1130 ,
   34.1116 , 250.1030 ,
   34.7798 , 240.1087 ,
   35.4952 , 230.1006 ,
   36.2634 , 220.1050 ,
   37.0833 , 210.1064 ,
   37.9672 , 200.1006 ,
   38.9187 , 190.0932 ,
   39.9397 , 180.0988 ,
   41.0491 , 170.0983 ,
   42.2524 , 160.0959 ,
   43.5637 , 150.0940 ,
   44.9979 , 140.0992 ,
   46.5722 , 130.1046 ,
   48.3158 , 120.1103 ,
   50.2194 , 110.3088 ,
   52.4452 , 100.1196 ,
   53.6496 , 95.1161 ,
   54.9366 , 90.1191 ,
   56.3231 , 85.1226 ,
   57.8142 , 80.1250 ,
   59.4341 , 75.1284 ,
   61.2008 , 70.1296 ,
   63.1538 , 65.1288 ,
   65.3028 , 60.1305 ,
   67.7107 , 55.1311 ,
   70.4125 , 50.1352 ,
   71.5989 , 48.1293 ,
   73.4780 , 45.1396 ,
   75.5438 , 42.1382 ,
   77.7839 , 39.1539 ,
   80.2571 , 36.1494 ,
   83.0187 , 33.1423 ,
   85.1485 , 31.0259 ,
   87.1192 , 29.2083 ,
   89.0059 , 27.5862 ,
   91.0536 , 25.9506 ,
   93.2530 , 24.3205 ,
   95.5993 , 22.7229 ,
   98.1514 , 21.1281 ,
   100.0483 , 20.0333 ,
   101.8900 , 19.0414 ,
   103.8648 , 18.0462 ,
   105.9863 , 17.0518 ,
   108.2830 , 16.0552 ,
   110.7931 , 15.0530 ,
   113.5432 , 14.0557 ,
   116.5921 , 13.0483 ,
   120.0062 , 12.0404 ,
   123.8559 , 11.0344 ,
   128.2670 , 10.0276 ,
   133.3690 , 9.0261 ,
   139.3864 , 8.0264 ,
   146.7777 , 7.0205 ,
   154.0189 , 6.2172 ,
   161.6713 , 5.5170 ,
   168.2196 , 5.0154 ,
   174.2925 , 4.6148 ,
   181.2999 , 4.2145 ,
   185.5986 , 3.9979 ,
   189.9803 , 3.7971 ,
   194.7046 , 3.5969 ,
   199.9234 , 3.3974 ,
   205.6314 , 3.2000 ,
   212.0022 , 3.0019 ,
   219.4479 , 2.7973 ,
   227.6149 , 2.6001 ,
   237.2489 , 2.3981 ,
   248.2190 , 2.2005 ,
   261.3440 , 1.9995 ,
   277.1445 , 1.7992 ,
   296.5930 , 1.5993 ,
   321.2142 , 1.3997 ,
   336.4991 , 1.2990 ,
   353.1760 , 1.2036 ,
   363.4174 , 1.1515 ,
   386.9490 , 1.0488 ,
   414.4720 , 0.9495 ,
   446.7200 , 0.8545 ,
   484.5940 , 0.7649 ,
   527.3760 , 0.6848 ,
   577.5540 , 0.6102 ,
   644.5800 , 0.5359 ,
   715.4400 , 0.4764 ,
   807.4500 , 0.4183 ,
   915.4100 , 0.3678 ,
   1024.1400 , 0.3296 ,
   1091.3600 , 0.3103 ,
   1174.9100 , 0.2899 ,
   1322.8000 , 0.2601 ,
   1525.7800 , 0.2298 ,
   1761.9200 , 0.2039 ,
   2051.2800 , 0.1809 ,
   2409.1499 , 0.1604 ,
   2768.9099 , 0.1460 ,
   3400.6201 , 0.1277 ,
   4175.5200 , 0.1122 ,
   5490.5898 , 0.0952 ,
   6862.5000 , 0.0835 ,
   -1, -1}
  ,
  /* #6: IC FP, X31232: */
  {33.0290 , 333.4698 ,
   33.3142 , 328.4819 ,
   33.7561 , 320.9779 ,
   34.1449 , 314.7117 ,
   34.4544 , 309.7570 ,
   35.1191 , 299.7802 ,
   35.8232 , 289.8652 ,
   36.5752 , 279.8500 ,
   37.3788 , 269.8723 ,
   38.2398 , 259.8711 ,
   39.1545 , 249.8709 ,
   40.1391 , 239.8754 ,
   41.2006 , 229.8607 ,
   42.3368 , 219.8731 ,
   43.5644 , 209.8737 ,
   44.8972 , 199.8753 ,
   46.3413 , 189.8685 ,
   47.9061 , 179.8802 ,
   49.6208 , 169.8857 ,
   51.5019 , 159.8915 ,
   53.5664 , 149.8898 ,
   55.8559 , 139.8964 ,
   58.4009 , 129.9093 ,
   61.2659 , 119.8841 ,
   64.4630 , 109.9872 ,
   68.2063 , 99.8989 ,
   70.2640 , 94.8977 ,
   72.5013 , 89.8983 ,
   74.9279 , 84.8964 ,
   77.5758 , 79.8983 ,
   80.4816 , 74.8944 ,
   83.6998 , 69.8901 ,
   87.2809 , 64.8875 ,
   91.3011 , 59.8867 ,
   95.8597 , 54.8887 ,
   101.0754 , 49.8918 ,
   103.4026 , 47.8882 ,
   107.1413 , 44.8956 ,
   111.2804 , 41.9028 ,
   115.8548 , 38.9143 ,
   120.9732 , 35.9318 ,
   126.7495 , 32.9444 ,
   131.2589 , 30.8595 ,
   135.5090 , 29.0632 ,
   139.6063 , 27.4659 ,
   144.0754 , 25.8746 ,
   148.8662 , 24.3068 ,
   154.2295 , 22.7126 ,
   160.1729 , 21.1143 ,
   164.6585 , 20.0187 ,
   169.0642 , 19.0299 ,
   173.8052 , 18.0420 ,
   178.9676 , 17.0563 ,
   184.6026 , 16.0684 ,
   190.8994 , 15.0731 ,
   197.8720 , 14.0792 ,
   205.8237 , 13.0757 ,
   214.9170 , 12.0656 ,
   225.4575 , 11.0470 ,
   238.0339 , 10.0192 ,
   253.2464 , 8.9822 ,
   272.0662 , 7.9446 ,
   296.0750 , 6.9139 ,
   321.1552 , 6.0812 ,
   349.6871 , 5.3449 ,
   375.2152 , 4.8248 ,
   399.9380 , 4.4128 ,
   413.4790 , 4.2162 ,
   428.7514 , 4.0160 ,
   447.3313 , 3.7986 ,
   466.3868 , 3.6012 ,
   488.2035 , 3.3998 ,
   513.0731 , 3.1994 ,
   541.5160 , 2.9998 ,
   575.1257 , 2.7980 ,
   614.5574 , 2.5979 ,
   662.0544 , 2.3974 ,
   718.9124 , 2.2013 ,
   791.2856 , 2.0011 ,
   884.2958 , 1.8007 ,
   1007.8087 , 1.6006 ,
   1180.6326 , 1.4006 ,
   1297.2998 , 1.2996 ,
   1440.6387 , 1.2004 ,
   1527.8328 , 1.1498 ,
   1738.4900 , 1.0487 ,
   2013.8500 , 0.9502 ,
   2381.0200 , 0.8539 ,
   2895.2700 , 0.7596 ,
   3505.0200 , 0.6828 ,
   4356.9502 , 0.6101 ,
   5740.7700 , 0.5356 ,
   7531.8999 , 0.4763 ,
   10475.2998 , 0.4180 ,
   14856.5996 , 0.3684 ,
   20897.5996 , 0.3293 ,
   25186.6992 , 0.3107 ,
   32022.9004 , 0.2896 ,
   46832.8984 , 0.2607 ,
   -1, -1}
  ,
  /* #7: UC strap, X29903: */
  {24.8985 , 333.4753 ,
   25.0769 , 328.4874 ,
   25.3527 , 320.9834 ,
   25.5946 , 314.7158 ,
   25.7905 , 309.7645 ,
   26.2035 , 299.7859 ,
   26.6383 , 289.8721 ,
   27.1061 , 279.8547 ,
   27.6075 , 269.8760 ,
   28.1316 , 259.8773 ,
   28.7042 , 249.8741 ,
   29.3074 , 239.8805 ,
   29.9557 , 229.8654 ,
   30.6492 , 219.8786 ,
   31.3958 , 209.8802 ,
   32.1944 , 199.8811 ,
   33.0659 , 189.8738 ,
   34.0021 , 179.8866 ,
   35.0206 , 169.8911 ,
   36.1261 , 159.8988 ,
   37.3397 , 149.8983 ,
   38.6694 , 139.9007 ,
   40.1379 , 129.9164 ,
   41.7731 , 119.8898 ,
   43.5837 , 109.9899 ,
   45.6735 , 99.9055 ,
   46.8192 , 94.9015 ,
   48.0543 , 89.9031 ,
   49.3846 , 84.9005 ,
   50.8284 , 79.9013 ,
   52.3979 , 74.8986 ,
   54.1283 , 69.8933 ,
   56.0345 , 64.8870 ,
   58.1569 , 59.8873 ,
   60.5429 , 54.8883 ,
   63.2448 , 49.8911 ,
   64.4373 , 47.8882 ,
   66.3487 , 44.8948 ,
   68.4437 , 41.9019 ,
   70.7430 , 38.9148 ,
   73.2846 , 35.9311 ,
   76.1277 , 32.9452 ,
   78.3225 , 30.8606 ,
   80.3750 , 29.0642 ,
   82.3472 , 27.4662 ,
   84.4614 , 25.8751 ,
   86.7151 , 24.3055 ,
   89.2190 , 22.7113 ,
   91.9757 , 21.1136 ,
   94.0324 , 20.0195 ,
   96.0284 , 19.0301 ,
   98.1592 , 18.0420 ,
   100.4684 , 17.0558 ,
   102.9710 , 16.0685 ,
   105.7224 , 15.0725 ,
   108.7680 , 14.0788 ,
   112.1715 , 13.0762 ,
   116.0214 , 12.0652 ,
   120.4418 , 11.0472 ,
   125.6009 , 10.0215 ,
   131.7282 , 8.9841 ,
   139.1206 , 7.9455 ,
   148.3136 , 6.9121 ,
   157.6468 , 6.0810 ,
   167.9052 , 5.3462 ,
   176.8310 , 4.8259 ,
   185.2547 , 4.4134 ,
   189.8274 , 4.2147 ,
   194.9900 , 4.0097 ,
   200.8920 , 3.7979 ,
   206.9648 , 3.6007 ,
   213.8183 , 3.3982 ,
   221.4595 , 3.1986 ,
   230.0650 , 2.9987 ,
   239.9656 , 2.7966 ,
   251.2039 , 2.5979 ,
   264.4956 , 2.3966 ,
   279.8788 , 2.1995 ,
   298.5963 , 2.0002 ,
   321.5777 , 1.8008 ,
   350.5482 , 1.6012 ,
   388.8989 , 1.3999 ,
   413.0209 , 1.2998 ,
   441.4388 , 1.2006 ,
   457.7150 , 1.1505 ,
   490.1474 , 1.0636 ,
   544.6690 , 0.9492 ,
   581.2900 , 0.8860 ,
   673.6500 , 0.7640 ,
   756.1100 , 0.6842 ,
   857.6500 , 0.6107 ,
   1000.9200 , 0.5356 ,
   1160.0000 , 0.4763 ,
   1381.4000 , 0.4183 ,
   1658.0100 , 0.3681 ,
   1962.4800 , 0.3295 ,
   2162.8101 , 0.3099 ,
   2404.6499 , 0.2902 ,
   2889.4500 , 0.2605 ,
   3647.1699 , 0.2291 ,
   4574.3301 , 0.2039 ,
   5840.0698 , 0.1817 ,
   7645.2998 , 0.1616 ,
   9843.0996 , 0.1460 ,
   14144.7998 , 0.1278 ,
   20827.3008 , 0.1122 ,
   35098.6016 , 0.0952 ,
   55427.0000 , 0.0836 ,
   -1, -1}
  ,
  /* #8: UC evap #1, G27070: */
  {1.0000 , 300.0000 ,
   3.9820 , 50.0791 ,
   5.5149 , 40.3237 ,
   7.5111 , 30.0667 ,
   8.8283 , 25.0057 ,
   10.6026 , 20.0370 ,
   13.4087 , 15.0492 ,
   16.5456 , 12.0458 ,
   20.0545 , 10.0074 ,
   25.3582 , 8.0402 ,
   35.1884 , 6.0097 ,
   42.4287 , 5.0866 ,
   55.8094 , 4.0074 ,
   77.1414 , 3.0454 ,
   98.9826 , 2.5234 ,
   134.7940 , 2.0232 ,
   160.9060 , 1.7606 ,
   250.1110 , 1.3773 ,
   1149.5699 , 0.7637 ,
   1982.2400 , 0.4547 ,
   2446.5701 , 0.4002 ,
   2668.6201 , 0.3754 ,
   2893.1799 , 0.3503 ,
   3118.0500 , 0.3253 ,
   3785.6201 , 0.3003 ,
   4289.9102 , 0.2738 ,
   4465.7100 , 0.2603 ,
   5758.5801 , 0.2503 ,
   6949.2002 , 0.2452 ,
   8285.5703 , 0.2409 ,
   8509.4902 , 0.2376 ,
   -1, -1}
  ,
  /* #1: standard carbon + 150 ohms (UC pump): */
  {  0.1 ,9999.999 ,
   250.0 , 300.000 ,
   255.0 , 227.600 ,
   257.5 , 183.000 ,
   260.0 , 152.700 ,
   265.0 , 114.300 ,
   270.0 , 91.020 ,
   275.0 , 75.480 ,
   280.0 , 64.400 ,
   290.0 , 49.720 ,
   300.0 , 40.490 ,
   310.0 , 34.180 ,
   330.0 , 26.150 ,
   350.0 , 21.300 ,
   370.0 , 18.050 ,
   400.0 , 14.830 ,
   450.0 , 11.620 ,
   500.0 , 9.709 ,
   550.0 , 8.436 ,
   600.0 , 7.527 ,
   650.0 , 6.844 ,
   750.0 , 5.881 ,
   950.0 , 4.763 ,
   1150.0 , 4.122 ,
   1350.0 , 3.702 ,
   1650.0 , 3.281 ,
   2150.0 , 2.851 ,
   3150.0 , 2.398 ,
   4150.0 , 2.151 ,
   6150.0 , 1.879 ,
   8150.0 , 1.725 ,
   10150.0 , 1.624 ,
   -1, -1}
  ,
  /* #2: standard carbon + 165 ohms (UCHS): */
  {  0.1 ,9999.999 ,
   265.0 , 300.000 ,
   270.0 , 227.600 ,
   272.5 , 183.000 ,
   275.0 , 152.700 ,
   280.0 , 114.300 ,
   285.0 , 91.020 ,
   290.0 , 75.480 ,
   295.0 , 64.400 ,
   305.0 , 49.720 ,
   315.0 , 40.490 ,
   325.0 , 34.180 ,
   345.0 , 26.150 ,
   365.0 , 21.300 ,
   385.0 , 18.050 ,
   415.0 , 14.830 ,
   465.0 , 11.620 ,
   515.0 , 9.709 ,
   565.0 , 8.436 ,
   615.0 , 7.527 ,
   665.0 , 6.844 ,
   765.0 , 5.881 ,
   865.0 , 4.763 ,
   1165.0 , 4.122 ,
   1365.0 , 3.702 ,
   1665.0 , 3.281 ,
   2165.0 , 2.851 ,
   3165.0 , 2.398 ,
   4165.0 , 2.151 ,
   6165.0 , 1.879 ,
   8165.0 , 1.725 ,
   10165.0 , 1.624 ,
   -1, -1}
  ,
  /* #3: standard carbon + 50 ohms (IC pump): */
  {  0.1 ,9999.999 ,
   150.0 , 300.000 ,
   155.0 , 227.600 ,
   157.5 , 183.000 ,
   160.0 , 152.700 ,
   165.0 , 114.300 ,
   170.0 , 91.020 ,
   175.0 , 75.480 ,
   180.0 , 64.400 ,
   190.0 , 49.720 ,
   200.0 , 40.490 ,
   210.0 , 34.180 ,
   230.0 , 26.150 ,
   250.0 , 21.300 ,
   270.0 , 18.050 ,
   300.0 , 14.830 ,
   350.0 , 11.620 ,
   400.0 , 9.709 ,
   450.0 , 8.436 ,
   500.0 , 7.527 ,
   550.0 , 6.844 ,
   650.0 , 5.881 ,
   850.0 , 4.763 ,
   1050.0 , 4.122 ,
   1250.0 , 3.702 ,
   1550.0 , 3.281 ,
   2050.0 , 2.851 ,
   3050.0 , 2.398 ,
   4050.0 , 2.151 ,
   6050.0 , 1.879 ,
   8050.0 , 1.725 ,
   10050.0 , 1.624 ,
   -1, -1}
  ,
  /* #4: standard carbon + 50 ohms (IC HS): */
  {  0.1 ,9999.999 ,
   150.0 , 300.000 ,
   155.0 , 227.600 ,
   157.5 , 183.000 ,
   160.0 , 152.700 ,
   165.0 , 114.300 ,
   170.0 , 91.020 ,
   175.0 , 75.480 ,
   180.0 , 64.400 ,
   190.0 , 49.720 ,
   200.0 , 40.490 ,
   210.0 , 34.180 ,
   230.0 , 26.150 ,
   250.0 , 21.300 ,
   270.0 , 18.050 ,
   300.0 , 14.830 ,
   350.0 , 11.620 ,
   400.0 , 9.709 ,
   450.0 , 8.436 ,
   500.0 , 7.527 ,
   550.0 , 6.844 ,
   650.0 , 5.881 ,
   850.0 , 4.763 ,
   1050.0 , 4.122 ,
   1250.0 , 3.702 ,
   1550.0 , 3.281 ,
   2050.0 , 2.851 ,
   3050.0 , 2.398 ,
   4050.0 , 2.151 ,
   6050.0 , 1.879 ,
   8050.0 , 1.725 ,
   10050.0 , 1.624 ,
   -1, -1}
  ,
  /* #5: standard carbon (4He pump): */
  {  0.1 ,9999.999 ,
   100.0 , 300.000 ,
   105.0 , 227.600 ,
   107.5 , 183.000 ,
   110.0 , 152.700 ,
   115.0 , 114.300 ,
   120.0 , 91.020 ,
   125.0 , 75.480 ,
   130.0 , 64.400 ,
   140.0 , 49.720 ,
   150.0 , 40.490 ,
   160.0 , 34.180 ,
   180.0 , 26.150 ,
   200.0 , 21.300 ,
   220.0 , 18.050 ,
   250.0 , 14.830 ,
   300.0 , 11.620 ,
   350.0 , 9.709 ,
   400.0 , 8.436 ,
   450.0 , 7.527 ,
   500.0 , 6.844 ,
   600.0 , 5.881 ,
   800.0 , 4.763 ,
   1000.0 , 4.122 ,
   1200.0 , 3.702 ,
   1500.0 , 3.281 ,
   2000.0 , 2.851 ,
   3000.0 , 2.398 ,
   4000.0 , 2.151 ,
   6000.0 , 1.879 ,
   8000.0 , 1.725 ,
   10000.0 , 1.624 ,
   -1, -1}
  ,
  /* #6: standard carbon + 50 ohms (4He HS): */
  {  0.1 ,9999.999 ,
   150.0 , 300.000 ,
   155.0 , 227.600 ,
   157.5 , 183.000 ,
   160.0 , 152.700 ,
   165.0 , 114.300 ,
   170.0 , 91.020 ,
   175.0 , 75.480 ,
   180.0 , 64.400 ,
   190.0 , 49.720 ,
   200.0 , 40.490 ,
   210.0 , 34.180 ,
   230.0 , 26.150 ,
   250.0 , 21.300 ,
   270.0 , 18.050 ,
   300.0 , 14.830 ,
   350.0 , 11.620 ,
   400.0 , 9.709 ,
   450.0 , 8.436 ,
   500.0 , 7.527 ,
   550.0 , 6.844 ,
   650.0 , 5.881 ,
   850.0 , 4.763 ,
   1050.0 , 4.122 ,
   1250.0 , 3.702 ,
   1550.0 , 3.281 ,
   2050.0 , 2.851 ,
   3050.0 , 2.398 ,
   4050.0 , 2.151 ,
   6050.0 , 1.879 ,
   8050.0 , 1.725 ,
   10050.0 , 1.624 ,
   -1, -1}
  ,
  /* #7: standard carbon: */
  {  0.1 ,9999.999 ,
   100.0 , 300.000 ,
   105.0 , 227.600 ,
   107.5 , 183.000 ,
   110.0 , 152.700 ,
   115.0 , 114.300 ,
   120.0 , 91.020 ,
   125.0 , 75.480 ,
   130.0 , 64.400 ,
   140.0 , 49.720 ,
   150.0 , 40.490 ,
   160.0 , 34.180 ,
   180.0 , 26.150 ,
   200.0 , 21.300 ,
   220.0 , 18.050 ,
   250.0 , 14.830 ,
   300.0 , 11.620 ,
   350.0 , 9.709 ,
   400.0 , 8.436 ,
   450.0 , 7.527 ,
   500.0 , 6.844 ,
   600.0 , 5.881 ,
   800.0 , 4.763 ,
   1000.0 , 4.122 ,
   1200.0 , 3.702 ,
   1500.0 , 3.281 ,
   2000.0 , 2.851 ,
   3000.0 , 2.398 ,
   4000.0 , 2.151 ,
   6000.0 , 1.879 ,
   8000.0 , 1.725 ,
   10000.0 , 1.624 ,
   -1, -1}
  ,
  /* #8: standard carbon: */
  {  0.1 ,9999.999 ,
   100.0 , 300.000 ,
   105.0 , 227.600 ,
   107.5 , 183.000 ,
   110.0 , 152.700 ,
   115.0 , 114.300 ,
   120.0 , 91.020 ,
   125.0 , 75.480 ,
   130.0 , 64.400 ,
   140.0 , 49.720 ,
   150.0 , 40.490 ,
   160.0 , 34.180 ,
   180.0 , 26.150 ,
   200.0 , 21.300 ,
   220.0 , 18.050 ,
   250.0 , 14.830 ,
   300.0 , 11.620 ,
   350.0 , 9.709 ,
   400.0 , 8.436 ,
   450.0 , 7.527 ,
   500.0 , 6.844 ,
   600.0 , 5.881 ,
   800.0 , 4.763 ,
   1000.0 , 4.122 ,
   1200.0 , 3.702 ,
   1500.0 , 3.281 ,
   2000.0 , 2.851 ,
   3000.0 , 2.398 ,
   4000.0 , 2.151 ,
   6000.0 , 1.879 ,
   8000.0 , 1.725 ,
   10000.0 , 1.624 ,
   -1, -1}
  };

#else

float  cal_curve[NGRT+NCARB][MAXVAL] = {
  /* #1: UC evap #2, X19402: */
  {34.4725 , 325.0000 ,
   36.4515 , 300.0000 ,
   41.5755 , 250.0000 ,
   49.0580 , 200.0000 ,
   60.7538 , 150.0000 ,
   81.2659 , 100.0000 ,
   94.7256 , 80.0000 ,
   114.6610 , 60.0000 ,
   148.3290 , 40.0000 ,
   176.4740 , 30.0000 ,
   222.4980 , 20.0000 ,
   260.5310 , 15.0000 ,
   324.4980 , 10.0000 ,
   366.6250 , 8.0000 ,
   430.9390 , 6.0000 ,
   548.3670 , 4.0000 ,
   658.6350 , 3.0000 ,
   875.5350 , 2.0000 ,
   1098.3300 , 1.5000 ,
   1587.2300 , 1.0000 ,
   2004.4700 , 0.8000 ,
   2334.9199 , 0.7000 ,
   2824.9500 , 0.6000 ,
   3623.7000 , 0.5000 ,
   3846.8899 , 0.4800 ,
   4100.9600 , 0.4600 ,
   4392.5098 , 0.4400 ,
   4729.8198 , 0.4200 ,
   5123.3701 , 0.4000 ,
   5587.7100 , 0.3800 ,
   6142.0000 , 0.3600 ,
   6813.3398 , 0.3400 ,
   7640.9702 , 0.3200 ,
   8684.2305 , 0.3000 ,
   9314.2998 , 0.2898 ,
   11640.0996 , 0.2604 ,
   12220.0000 , 0.2554 ,
   15010.0000 , 0.2335 ,
   -1, -1}
  ,
  /* #2: IC evap, X20063: */
  {34.0425 , 325.0000 ,
   35.9016 , 300.0000 ,
   40.6798 , 250.0000 ,
   47.5811 , 200.0000 ,
   58.2143 , 150.0000 ,
   76.5470 , 100.0000 ,
   96.1838 , 70.0000 ,
   118.2010 , 50.0000 ,
   158.9160 , 30.0000 ,
   198.4140 , 20.0000 ,
   231.9640 , 15.0000 ,
   291.7730 , 10.0000 ,
   364.1620 , 7.0000 ,
   460.5390 , 5.0000 ,
   547.7480 , 4.0000 ,
   702.9570 , 3.0000 ,
   837.6320 , 2.5000 ,
   1060.2500 , 2.0000 ,
   1380.6200 , 1.6000 ,
   1642.3800 , 1.4000 ,
   2039.4301 , 1.2000 ,
   2700.1499 , 1.0000 ,
   3219.0300 , 0.9000 ,
   3971.2800 , 0.8000 ,
   5139.3999 , 0.7000 ,
   7134.7002 , 0.6000 ,
   8725.7803 , 0.5500 ,
   11035.7998 , 0.5000 ,
   12261.0996 , 0.4800 ,
   13727.4004 , 0.4600 ,
   15508.0996 , 0.4400 ,
   17702.1992 , 0.4200 ,
   20447.5996 , 0.4000 ,
   23955.3008 , 0.3800 ,
   28538.0996 , 0.3600 ,
   34633.5000 , 0.3400 ,
   42827.8984 , 0.3200 ,
   53602.6992 , 0.3000 ,
   59185.0000 , 0.2919 ,
   98297.0000 , 0.2578 ,
   -1, -1}
  ,
  /* #3: 4He evap, standard carbon: */
  {  0.1 ,9999.999 ,
   100.0 , 300.000 ,
   105.0 , 227.600 ,
   107.5 , 183.000 ,
   110.0 , 152.700 ,
   115.0 , 114.300 ,
   120.0 , 91.020 ,
   125.0 , 75.480 ,
   130.0 , 64.400 ,
   140.0 , 49.720 ,
   150.0 , 40.490 ,
   160.0 , 34.180 ,
   180.0 , 26.150 ,
   200.0 , 21.300 ,
   220.0 , 18.050 ,
   250.0 , 14.830 ,
   300.0 , 11.620 ,
   350.0 , 9.709 ,
   400.0 , 8.436 ,
   450.0 , 7.527 ,
   500.0 , 6.844 ,
   600.0 , 5.881 ,
   800.0 , 4.763 ,
   1000.0 , 4.122 ,
   1200.0 , 3.702 ,
   1500.0 , 3.281 ,
   2000.0 , 2.851 ,
   3000.0 , 2.398 ,
   4000.0 , 2.151 ,
   6000.0 , 1.879 ,
   8000.0 , 1.725 ,
   10000.0 , 1.624 ,
   -1, -1}
  ,
  /* #4: UC strap, X29903: */
  {24.8985 , 333.4753 ,
   25.0769 , 328.4874 ,
   25.3527 , 320.9834 ,
   25.5946 , 314.7158 ,
   25.7905 , 309.7645 ,
   26.2035 , 299.7859 ,
   26.6383 , 289.8721 ,
   27.1061 , 279.8547 ,
   27.6075 , 269.8760 ,
   28.1316 , 259.8773 ,
   28.7042 , 249.8741 ,
   29.3074 , 239.8805 ,
   29.9557 , 229.8654 ,
   30.6492 , 219.8786 ,
   31.3958 , 209.8802 ,
   32.1944 , 199.8811 ,
   33.0659 , 189.8738 ,
   34.0021 , 179.8866 ,
   35.0206 , 169.8911 ,
   36.1261 , 159.8988 ,
   37.3397 , 149.8983 ,
   38.6694 , 139.9007 ,
   40.1379 , 129.9164 ,
   41.7731 , 119.8898 ,
   43.5837 , 109.9899 ,
   45.6735 , 99.9055 ,
   46.8192 , 94.9015 ,
   48.0543 , 89.9031 ,
   49.3846 , 84.9005 ,
   50.8284 , 79.9013 ,
   52.3979 , 74.8986 ,
   54.1283 , 69.8933 ,
   56.0345 , 64.8870 ,
   58.1569 , 59.8873 ,
   60.5429 , 54.8883 ,
   63.2448 , 49.8911 ,
   64.4373 , 47.8882 ,
   66.3487 , 44.8948 ,
   68.4437 , 41.9019 ,
   70.7430 , 38.9148 ,
   73.2846 , 35.9311 ,
   76.1277 , 32.9452 ,
   78.3225 , 30.8606 ,
   80.3750 , 29.0642 ,
   82.3472 , 27.4662 ,
   84.4614 , 25.8751 ,
   86.7151 , 24.3055 ,
   89.2190 , 22.7113 ,
   91.9757 , 21.1136 ,
   94.0324 , 20.0195 ,
   96.0284 , 19.0301 ,
   98.1592 , 18.0420 ,
   100.4684 , 17.0558 ,
   102.9710 , 16.0685 ,
   105.7224 , 15.0725 ,
   108.7680 , 14.0788 ,
   112.1715 , 13.0762 ,
   116.0214 , 12.0652 ,
   120.4418 , 11.0472 ,
   125.6009 , 10.0215 ,
   131.7282 , 8.9841 ,
   139.1206 , 7.9455 ,
   148.3136 , 6.9121 ,
   157.6468 , 6.0810 ,
   167.9052 , 5.3462 ,
   176.8310 , 4.8259 ,
   185.2547 , 4.4134 ,
   189.8274 , 4.2147 ,
   194.9900 , 4.0097 ,
   200.8920 , 3.7979 ,
   206.9648 , 3.6007 ,
   213.8183 , 3.3982 ,
   221.4595 , 3.1986 ,
   230.0650 , 2.9987 ,
   239.9656 , 2.7966 ,
   251.2039 , 2.5979 ,
   264.4956 , 2.3966 ,
   279.8788 , 2.1995 ,
   298.5963 , 2.0002 ,
   321.5777 , 1.8008 ,
   350.5482 , 1.6012 ,
   388.8989 , 1.3999 ,
   413.0209 , 1.2998 ,
   441.4388 , 1.2006 ,
   457.7150 , 1.1505 ,
   490.1474 , 1.0636 ,
   544.6690 , 0.9492 ,
   581.2900 , 0.8860 ,
   673.6500 , 0.7640 ,
   756.1100 , 0.6842 ,
   857.6500 , 0.6107 ,
   1000.9200 , 0.5356 ,
   1160.0000 , 0.4763 ,
   1381.4000 , 0.4183 ,
   1658.0100 , 0.3681 ,
   1962.4800 , 0.3295 ,
   2162.8101 , 0.3099 ,
   2404.6499 , 0.2902 ,
   2889.4500 , 0.2605 ,
   3647.1699 , 0.2291 ,
   4574.3301 , 0.2039 ,
   5840.0698 , 0.1817 ,
   7645.2998 , 0.1616 ,
   9843.0996 , 0.1460 ,
   14144.7998 , 0.1278 ,
   20827.3008 , 0.1122 ,
   35098.6016 , 0.0952 ,
   55427.0000 , 0.0836 ,
   -1, -1}
  ,
  /* #5: IC FP, X31232: */
  {33.0290 , 333.4698 ,
   33.3142 , 328.4819 ,
   33.7561 , 320.9779 ,
   34.1449 , 314.7117 ,
   34.4544 , 309.7570 ,
   35.1191 , 299.7802 ,
   35.8232 , 289.8652 ,
   36.5752 , 279.8500 ,
   37.3788 , 269.8723 ,
   38.2398 , 259.8711 ,
   39.1545 , 249.8709 ,
   40.1391 , 239.8754 ,
   41.2006 , 229.8607 ,
   42.3368 , 219.8731 ,
   43.5644 , 209.8737 ,
   44.8972 , 199.8753 ,
   46.3413 , 189.8685 ,
   47.9061 , 179.8802 ,
   49.6208 , 169.8857 ,
   51.5019 , 159.8915 ,
   53.5664 , 149.8898 ,
   55.8559 , 139.8964 ,
   58.4009 , 129.9093 ,
   61.2659 , 119.8841 ,
   64.4630 , 109.9872 ,
   68.2063 , 99.8989 ,
   70.2640 , 94.8977 ,
   72.5013 , 89.8983 ,
   74.9279 , 84.8964 ,
   77.5758 , 79.8983 ,
   80.4816 , 74.8944 ,
   83.6998 , 69.8901 ,
   87.2809 , 64.8875 ,
   91.3011 , 59.8867 ,
   95.8597 , 54.8887 ,
   101.0754 , 49.8918 ,
   103.4026 , 47.8882 ,
   107.1413 , 44.8956 ,
   111.2804 , 41.9028 ,
   115.8548 , 38.9143 ,
   120.9732 , 35.9318 ,
   126.7495 , 32.9444 ,
   131.2589 , 30.8595 ,
   135.5090 , 29.0632 ,
   139.6063 , 27.4659 ,
   144.0754 , 25.8746 ,
   148.8662 , 24.3068 ,
   154.2295 , 22.7126 ,
   160.1729 , 21.1143 ,
   164.6585 , 20.0187 ,
   169.0642 , 19.0299 ,
   173.8052 , 18.0420 ,
   178.9676 , 17.0563 ,
   184.6026 , 16.0684 ,
   190.8994 , 15.0731 ,
   197.8720 , 14.0792 ,
   205.8237 , 13.0757 ,
   214.9170 , 12.0656 ,
   225.4575 , 11.0470 ,
   238.0339 , 10.0192 ,
   253.2464 , 8.9822 ,
   272.0662 , 7.9446 ,
   296.0750 , 6.9139 ,
   321.1552 , 6.0812 ,
   349.6871 , 5.3449 ,
   375.2152 , 4.8248 ,
   399.9380 , 4.4128 ,
   413.4790 , 4.2162 ,
   428.7514 , 4.0160 ,
   447.3313 , 3.7986 ,
   466.3868 , 3.6012 ,
   488.2035 , 3.3998 ,
   513.0731 , 3.1994 ,
   541.5160 , 2.9998 ,
   575.1257 , 2.7980 ,
   614.5574 , 2.5979 ,
   662.0544 , 2.3974 ,
   718.9124 , 2.2013 ,
   791.2856 , 2.0011 ,
   884.2958 , 1.8007 ,
   1007.8087 , 1.6006 ,
   1180.6326 , 1.4006 ,
   1297.2998 , 1.2996 ,
   1440.6387 , 1.2004 ,
   1527.8328 , 1.1498 ,
   1738.4900 , 1.0487 ,
   2013.8500 , 0.9502 ,
   2381.0200 , 0.8539 ,
   2895.2700 , 0.7596 ,
   3505.0200 , 0.6828 ,
   4356.9502 , 0.6101 ,
   5740.7700 , 0.5356 ,
   7531.8999 , 0.4763 ,
   10475.2998 , 0.4180 ,
   14856.5996 , 0.3684 ,
   20897.5996 , 0.3293 ,
   25186.6992 , 0.3107 ,
   32022.9004 , 0.2896 ,
   46832.8984 , 0.2607 ,
   -1, -1}
  ,
  /* #6: UC FP #1, X30330: */
  {25.5350 , 333.4754 ,
   25.7200 , 328.4868 ,
   26.0103 , 320.9830 ,
   26.2619 , 314.7159 ,
   26.4649 , 309.7632 ,
   26.8963 , 299.7849 ,
   27.3537 , 289.8714 ,
   27.8362 , 279.8549 ,
   28.3553 , 269.8765 ,
   28.9087 , 259.8777 ,
   29.5021 , 249.8747 ,
   30.1265 , 239.8802 ,
   30.8020 , 229.8642 ,
   31.5302 , 219.8784 ,
   32.3068 , 209.8804 ,
   33.1447 , 199.8817 ,
   34.0495 , 189.8744 ,
   35.0259 , 179.8867 ,
   36.0882 , 169.8917 ,
   37.2468 , 159.8994 ,
   38.5147 , 149.8983 ,
   39.9028 , 139.9006 ,
   41.4382 , 129.9166 ,
   43.1508 , 119.8894 ,
   45.0473 , 109.9901 ,
   47.2364 , 99.9051 ,
   48.4411 , 94.9019 ,
   49.7343 , 89.9029 ,
   51.1313 , 84.9007 ,
   52.6428 , 79.9026 ,
   54.2959 , 74.8992 ,
   56.1087 , 69.8939 ,
   58.1124 , 64.8879 ,
   60.3433 , 59.8870 ,
   62.8524 , 54.8881 ,
   65.6933 , 49.8913 ,
   66.9401 , 47.8887 ,
   68.9571 , 44.8946 ,
   71.1564 , 41.9019 ,
   73.5782 , 38.9150 ,
   76.2631 , 35.9311 ,
   79.2540 , 32.9455 ,
   81.5602 , 30.8605 ,
   83.7232 , 29.0642 ,
   85.8058 , 27.4645 ,
   88.0300 , 25.8748 ,
   90.4005 , 24.3050 ,
   93.0481 , 22.7110 ,
   95.9536 , 21.1139 ,
   98.1200 , 20.0204 ,
   100.2163 , 19.0294 ,
   102.4811 , 18.0416 ,
   104.9088 , 17.0555 ,
   107.5345 , 16.0685 ,
   110.4703 , 15.0725 ,
   113.6751 , 14.0788 ,
   117.2735 , 13.0754 ,
   121.3380 , 12.0653 ,
   125.9869 , 11.0512 ,
   131.4524 , 10.0212 ,
   137.9314 , 8.9840 ,
   145.7429 , 7.9451 ,
   155.4511 , 6.9119 ,
   165.3628 , 6.0805 ,
   176.1878 , 5.3460 ,
   185.6327 , 4.8258 ,
   194.5627 , 4.4132 ,
   199.4172 , 4.2146 ,
   204.8485 , 4.0103 ,
   211.1061 , 3.7979 ,
   217.5392 , 3.6008 ,
   224.8491 , 3.3983 ,
   232.9587 , 3.1986 ,
   242.0850 , 2.9987 ,
   252.6583 , 2.7965 ,
   264.5936 , 2.5978 ,
   278.7761 , 2.3965 ,
   295.1749 , 2.1993 ,
   315.0840 , 2.0001 ,
   339.5944 , 1.8007 ,
   370.5344 , 1.6012 ,
   411.5938 , 1.3998 ,
   437.4132 , 1.2999 ,
   467.8819 , 1.2008 ,
   485.8000 , 1.1501 ,
   520.3315 , 1.0637 ,
   579.3570 , 0.9486 ,
   641.2000 , 0.8550 ,
   715.0100 , 0.7673 ,
   811.1500 , 0.6821 ,
   922.3200 , 0.6082 ,
   1073.2000 , 0.5367 ,
   1252.7200 , 0.4763 ,
   1496.7400 , 0.4173 ,
   1803.4700 , 0.3675 ,
   2136.8899 , 0.3294 ,
   2358.3601 , 0.3101 ,
   2640.1799 , 0.2899 ,
   3195.6799 , 0.2600 ,
   4023.5300 , 0.2296 ,
   5095.7998 , 0.2041 ,
   6536.7998 , 0.1820 ,
   8714.2002 , 0.1614 ,
   11254.5000 , 0.1462 ,
   16355.7998 , 0.1278 ,
   24415.4004 , 0.1122 ,
   41882.0000 , 0.0953 ,
   67880.0000 , 0.0836 ,
   -1, -1}
  ,
  /* #7: UC FP #2, X32726: */
  {30.0159 , 330.1436 ,
   30.1795 , 326.1445 ,
   30.4244 , 320.1570 ,
   30.6368 , 315.1584 ,
   30.8643 , 310.1517 ,
   31.3274 , 300.1414 ,
   31.8046 , 290.1317 ,
   32.3395 , 280.1270 ,
   32.8941 , 270.1126 ,
   33.4831 , 260.1130 ,
   34.1116 , 250.1030 ,
   34.7798 , 240.1087 ,
   35.4952 , 230.1006 ,
   36.2634 , 220.1050 ,
   37.0833 , 210.1064 ,
   37.9672 , 200.1006 ,
   38.9187 , 190.0932 ,
   39.9397 , 180.0988 ,
   41.0491 , 170.0983 ,
   42.2524 , 160.0959 ,
   43.5637 , 150.0940 ,
   44.9979 , 140.0992 ,
   46.5722 , 130.1046 ,
   48.3158 , 120.1103 ,
   50.2194 , 110.3088 ,
   52.4452 , 100.1196 ,
   53.6496 , 95.1161 ,
   54.9366 , 90.1191 ,
   56.3231 , 85.1226 ,
   57.8142 , 80.1250 ,
   59.4341 , 75.1284 ,
   61.2008 , 70.1296 ,
   63.1538 , 65.1288 ,
   65.3028 , 60.1305 ,
   67.7107 , 55.1311 ,
   70.4125 , 50.1352 ,
   71.5989 , 48.1293 ,
   73.4780 , 45.1396 ,
   75.5438 , 42.1382 ,
   77.7839 , 39.1539 ,
   80.2571 , 36.1494 ,
   83.0187 , 33.1423 ,
   85.1485 , 31.0259 ,
   87.1192 , 29.2083 ,
   89.0059 , 27.5862 ,
   91.0536 , 25.9506 ,
   93.2530 , 24.3205 ,
   95.5993 , 22.7229 ,
   98.1514 , 21.1281 ,
   100.0483 , 20.0333 ,
   101.8900 , 19.0414 ,
   103.8648 , 18.0462 ,
   105.9863 , 17.0518 ,
   108.2830 , 16.0552 ,
   110.7931 , 15.0530 ,
   113.5432 , 14.0557 ,
   116.5921 , 13.0483 ,
   120.0062 , 12.0404 ,
   123.8559 , 11.0344 ,
   128.2670 , 10.0276 ,
   133.3690 , 9.0261 ,
   139.3864 , 8.0264 ,
   146.7777 , 7.0205 ,
   154.0189 , 6.2172 ,
   161.6713 , 5.5170 ,
   168.2196 , 5.0154 ,
   174.2925 , 4.6148 ,
   181.2999 , 4.2145 ,
   185.5986 , 3.9979 ,
   189.9803 , 3.7971 ,
   194.7046 , 3.5969 ,
   199.9234 , 3.3974 ,
   205.6314 , 3.2000 ,
   212.0022 , 3.0019 ,
   219.4479 , 2.7973 ,
   227.6149 , 2.6001 ,
   237.2489 , 2.3981 ,
   248.2190 , 2.2005 ,
   261.3440 , 1.9995 ,
   277.1445 , 1.7992 ,
   296.5930 , 1.5993 ,
   321.2142 , 1.3997 ,
   336.4991 , 1.2990 ,
   353.1760 , 1.2036 ,
   363.4174 , 1.1515 ,
   386.9490 , 1.0488 ,
   414.4720 , 0.9495 ,
   446.7200 , 0.8545 ,
   484.5940 , 0.7649 ,
   527.3760 , 0.6848 ,
   577.5540 , 0.6102 ,
   644.5800 , 0.5359 ,
   715.4400 , 0.4764 ,
   807.4500 , 0.4183 ,
   915.4100 , 0.3678 ,
   1024.1400 , 0.3296 ,
   1091.3600 , 0.3103 ,
   1174.9100 , 0.2899 ,
   1322.8000 , 0.2601 ,
   1525.7800 , 0.2298 ,
   1761.9200 , 0.2039 ,
   2051.2800 , 0.1809 ,
   2409.1499 , 0.1604 ,
   2768.9099 , 0.1460 ,
   3400.6201 , 0.1277 ,
   4175.5200 , 0.1122 ,
   5490.5898 , 0.0952 ,
   6862.5000 , 0.0835 ,
   -1, -1}
  ,
  /* #8: UC evap #1, G27070: */
  {1.0000 , 300.0000 ,
   3.9820 , 50.0791 ,
   5.5149 , 40.3237 ,
   7.5111 , 30.0667 ,
   8.8283 , 25.0057 ,
   10.6026 , 20.0370 ,
   13.4087 , 15.0492 ,
   16.5456 , 12.0458 ,
   20.0545 , 10.0074 ,
   25.3582 , 8.0402 ,
   35.1884 , 6.0097 ,
   42.4287 , 5.0866 ,
   55.8094 , 4.0074 ,
   77.1414 , 3.0454 ,
   98.9826 , 2.5234 ,
   134.7940 , 2.0232 ,
   160.9060 , 1.7606 ,
   250.1110 , 1.3773 ,
   1149.5699 , 0.7637 ,
   1982.2400 , 0.4547 ,
   2446.5701 , 0.4002 ,
   2668.6201 , 0.3754 ,
   2893.1799 , 0.3503 ,
   3118.0500 , 0.3253 ,
   3785.6201 , 0.3003 ,
   4289.9102 , 0.2738 ,
   4465.7100 , 0.2603 ,
   5758.5801 , 0.2503 ,
   6949.2002 , 0.2452 ,
   8285.5703 , 0.2409 ,
   8509.4902 , 0.2376 ,
   -1, -1}
  ,
  /* #1: standard carbon + 150 ohms (UC pump): */
  {  0.1 ,9999.999 ,
   250.0 , 300.000 ,
   255.0 , 227.600 ,
   257.5 , 183.000 ,
   260.0 , 152.700 ,
   265.0 , 114.300 ,
   270.0 , 91.020 ,
   275.0 , 75.480 ,
   280.0 , 64.400 ,
   290.0 , 49.720 ,
   300.0 , 40.490 ,
   310.0 , 34.180 ,
   330.0 , 26.150 ,
   350.0 , 21.300 ,
   370.0 , 18.050 ,
   400.0 , 14.830 ,
   450.0 , 11.620 ,
   500.0 , 9.709 ,
   550.0 , 8.436 ,
   600.0 , 7.527 ,
   650.0 , 6.844 ,
   750.0 , 5.881 ,
   950.0 , 4.763 ,
   1150.0 , 4.122 ,
   1350.0 , 3.702 ,
   1650.0 , 3.281 ,
   2150.0 , 2.851 ,
   3150.0 , 2.398 ,
   4150.0 , 2.151 ,
   6150.0 , 1.879 ,
   8150.0 , 1.725 ,
   10150.0 , 1.624 ,
   -1, -1}
  ,
  /* #2: standard carbon + 165 ohms (UCHS): */
  {  0.1 ,9999.999 ,
   265.0 , 300.000 ,
   270.0 , 227.600 ,
   272.5 , 183.000 ,
   275.0 , 152.700 ,
   280.0 , 114.300 ,
   285.0 , 91.020 ,
   290.0 , 75.480 ,
   295.0 , 64.400 ,
   305.0 , 49.720 ,
   315.0 , 40.490 ,
   325.0 , 34.180 ,
   345.0 , 26.150 ,
   365.0 , 21.300 ,
   385.0 , 18.050 ,
   415.0 , 14.830 ,
   465.0 , 11.620 ,
   515.0 , 9.709 ,
   565.0 , 8.436 ,
   615.0 , 7.527 ,
   665.0 , 6.844 ,
   765.0 , 5.881 ,
   865.0 , 4.763 ,
   1165.0 , 4.122 ,
   1365.0 , 3.702 ,
   1665.0 , 3.281 ,
   2165.0 , 2.851 ,
   3165.0 , 2.398 ,
   4165.0 , 2.151 ,
   6165.0 , 1.879 ,
   8165.0 , 1.725 ,
   10165.0 , 1.624 ,
   -1, -1}
  ,
  /* #3: standard carbon + 50 ohms (IC pump): */
  {  0.1 ,9999.999 ,
   150.0 , 300.000 ,
   155.0 , 227.600 ,
   157.5 , 183.000 ,
   160.0 , 152.700 ,
   165.0 , 114.300 ,
   170.0 , 91.020 ,
   175.0 , 75.480 ,
   180.0 , 64.400 ,
   190.0 , 49.720 ,
   200.0 , 40.490 ,
   210.0 , 34.180 ,
   230.0 , 26.150 ,
   250.0 , 21.300 ,
   270.0 , 18.050 ,
   300.0 , 14.830 ,
   350.0 , 11.620 ,
   400.0 , 9.709 ,
   450.0 , 8.436 ,
   500.0 , 7.527 ,
   550.0 , 6.844 ,
   650.0 , 5.881 ,
   850.0 , 4.763 ,
   1050.0 , 4.122 ,
   1250.0 , 3.702 ,
   1550.0 , 3.281 ,
   2050.0 , 2.851 ,
   3050.0 , 2.398 ,
   4050.0 , 2.151 ,
   6050.0 , 1.879 ,
   8050.0 , 1.725 ,
   10050.0 , 1.624 ,
   -1, -1}
  ,
  /* #4: standard carbon + 50 ohms (IC HS): */
  {  0.1 ,9999.999 ,
   150.0 , 300.000 ,
   155.0 , 227.600 ,
   157.5 , 183.000 ,
   160.0 , 152.700 ,
   165.0 , 114.300 ,
   170.0 , 91.020 ,
   175.0 , 75.480 ,
   180.0 , 64.400 ,
   190.0 , 49.720 ,
   200.0 , 40.490 ,
   210.0 , 34.180 ,
   230.0 , 26.150 ,
   250.0 , 21.300 ,
   270.0 , 18.050 ,
   300.0 , 14.830 ,
   350.0 , 11.620 ,
   400.0 , 9.709 ,
   450.0 , 8.436 ,
   500.0 , 7.527 ,
   550.0 , 6.844 ,
   650.0 , 5.881 ,
   850.0 , 4.763 ,
   1050.0 , 4.122 ,
   1250.0 , 3.702 ,
   1550.0 , 3.281 ,
   2050.0 , 2.851 ,
   3050.0 , 2.398 ,
   4050.0 , 2.151 ,
   6050.0 , 1.879 ,
   8050.0 , 1.725 ,
   10050.0 , 1.624 ,
   -1, -1}
  ,
  /* #5: standard carbon (4He pump): */
  {  0.1 ,9999.999 ,
   100.0 , 300.000 ,
   105.0 , 227.600 ,
   107.5 , 183.000 ,
   110.0 , 152.700 ,
   115.0 , 114.300 ,
   120.0 , 91.020 ,
   125.0 , 75.480 ,
   130.0 , 64.400 ,
   140.0 , 49.720 ,
   150.0 , 40.490 ,
   160.0 , 34.180 ,
   180.0 , 26.150 ,
   200.0 , 21.300 ,
   220.0 , 18.050 ,
   250.0 , 14.830 ,
   300.0 , 11.620 ,
   350.0 , 9.709 ,
   400.0 , 8.436 ,
   450.0 , 7.527 ,
   500.0 , 6.844 ,
   600.0 , 5.881 ,
   800.0 , 4.763 ,
   1000.0 , 4.122 ,
   1200.0 , 3.702 ,
   1500.0 , 3.281 ,
   2000.0 , 2.851 ,
   3000.0 , 2.398 ,
   4000.0 , 2.151 ,
   6000.0 , 1.879 ,
   8000.0 , 1.725 ,
   10000.0 , 1.624 ,
   -1, -1}
  ,
  /* #6: standard carbon + 50 ohms (4He HS): */
  {  0.1 ,9999.999 ,
   150.0 , 300.000 ,
   155.0 , 227.600 ,
   157.5 , 183.000 ,
   160.0 , 152.700 ,
   165.0 , 114.300 ,
   170.0 , 91.020 ,
   175.0 , 75.480 ,
   180.0 , 64.400 ,
   190.0 , 49.720 ,
   200.0 , 40.490 ,
   210.0 , 34.180 ,
   230.0 , 26.150 ,
   250.0 , 21.300 ,
   270.0 , 18.050 ,
   300.0 , 14.830 ,
   350.0 , 11.620 ,
   400.0 , 9.709 ,
   450.0 , 8.436 ,
   500.0 , 7.527 ,
   550.0 , 6.844 ,
   650.0 , 5.881 ,
   850.0 , 4.763 ,
   1050.0 , 4.122 ,
   1250.0 , 3.702 ,
   1550.0 , 3.281 ,
   2050.0 , 2.851 ,
   3050.0 , 2.398 ,
   4050.0 , 2.151 ,
   6050.0 , 1.879 ,
   8050.0 , 1.725 ,
   10050.0 , 1.624 ,
   -1, -1}
  ,
  /* #7: standard carbon: */
  {  0.1 ,9999.999 ,
   100.0 , 300.000 ,
   105.0 , 227.600 ,
   107.5 , 183.000 ,
   110.0 , 152.700 ,
   115.0 , 114.300 ,
   120.0 , 91.020 ,
   125.0 , 75.480 ,
   130.0 , 64.400 ,
   140.0 , 49.720 ,
   150.0 , 40.490 ,
   160.0 , 34.180 ,
   180.0 , 26.150 ,
   200.0 , 21.300 ,
   220.0 , 18.050 ,
   250.0 , 14.830 ,
   300.0 , 11.620 ,
   350.0 , 9.709 ,
   400.0 , 8.436 ,
   450.0 , 7.527 ,
   500.0 , 6.844 ,
   600.0 , 5.881 ,
   800.0 , 4.763 ,
   1000.0 , 4.122 ,
   1200.0 , 3.702 ,
   1500.0 , 3.281 ,
   2000.0 , 2.851 ,
   3000.0 , 2.398 ,
   4000.0 , 2.151 ,
   6000.0 , 1.879 ,
   8000.0 , 1.725 ,
   10000.0 , 1.624 ,
   -1, -1}
  ,
  /* #8: standard carbon: */
  {  0.1 ,9999.999 ,
   100.0 , 300.000 ,
   105.0 , 227.600 ,
   107.5 , 183.000 ,
   110.0 , 152.700 ,
   115.0 , 114.300 ,
   120.0 , 91.020 ,
   125.0 , 75.480 ,
   130.0 , 64.400 ,
   140.0 , 49.720 ,
   150.0 , 40.490 ,
   160.0 , 34.180 ,
   180.0 , 26.150 ,
   200.0 , 21.300 ,
   220.0 , 18.050 ,
   250.0 , 14.830 ,
   300.0 , 11.620 ,
   350.0 , 9.709 ,
   400.0 , 8.436 ,
   450.0 , 7.527 ,
   500.0 , 6.844 ,
   600.0 , 5.881 ,
   800.0 , 4.763 ,
   1000.0 , 4.122 ,
   1200.0 , 3.702 ,
   1500.0 , 3.281 ,
   2000.0 , 2.851 ,
   3000.0 , 2.398 ,
   4000.0 , 2.151 ,
   6000.0 , 1.879 ,
   8000.0 , 1.725 ,
   10000.0 , 1.624 ,
   -1, -1}
  };

#endif

/**************************************/

void abort_parse() {
  fprintf(stderr, "** Error parsing data stream **\n");
  exit(1);
}

/**************************************/

void fit(int num, double r, double *t) {

double  x[MAXVAL], y[MAXVAL], y2[MAXVAL];
  int  n;

  n = 0;
  while (cal_curve[num-1][n*2] > 0.0) {
    x[n+1] = log(cal_curve[num-1][n*2]);
    y[n+1] = cal_curve[num-1][n*2+1];
    n++;
  }
  spline(x, y, n, 1.0E30, 1.0E30, y2);
  splint(x, y, y2, n, log(r), t);
}

/**************************************/

#ifdef IGNORE_MAIN


main(argc, argv)

int  argc;
char  *argv[];

{
  char  line[MAX_LEN];
  int  i, j, n;
  double  time, logv, linv, r, t;
  int  seq;
  double  x[MAXVAL], y[MAXVAL], y2[MAXVAL];

  while (fgets(line, MAX_LEN, stdin) != NULL) {
    i = 0;
    if (sscanf(line, "%f %n", &time, &j) != 1) abort();
    i += j;
    printf("%.6f ", time);
    for (n = 1; n <= NSEQ; n++) {
      if (sscanf(&(line[i]), "%d %n", &seq, &j) != 1) abort();
      i += j;
      printf("%d ", seq);
    }
    for (n = 1; n <= NGRT; n++) {
      if (sscanf(&(line[i]), "%f %f %n", &logv, &linv, &j) != 2) abort();
      i += j;
      r = LIN_SCALE/linv;
      if (argc > 1) {
        r = LOG_SCALE2*pow(10.0,LOG_SCALE1*logv);
      }
      fit(n, r, &t);
      printf("%.4f ", t);
    }
    for (n = 1; n <= NCARB; n++) {
      if (sscanf(&(line[i]), "%f %n", &linv, &j) != 1) abort();
      i += j;
      r = linv/CARB_GAIN/CARB_CURRENT;
      fit(n+NGRT, r, &t);
      printf("%.3f ", t);
    }
    printf("%s", &(line[i]));     /* pass through remainder of line */
  }

}

#endif