real FUNCTION  f3nc00hb00(xin,q2in)
***********************************************************
c  parametrization of f3 nc  from a fit to dis data
c  available for :  0.000057 <= x <=  0.906052  and 
c         
c                        1.500 <= q2 <=   35000.000
c*                                                 
c   for q2 or x outside limits, the closest        
c  limit is assumed : f2(x>xmax,q2)=f2(xmax,q2)    
c                     f2(x<xmin,q2)=f2(xmin,q2)    
c                     f2(x,q2>q2max)=f2(x,q2max)   
c                     f2(x,q2<q2min)=f2(x,q2min)   
c*                                                 
c  input : x and q2                                
c  comments, etc... to c. pascaud or f. zomer      
***************************************************
      parameter(n_bin_q2= 86)
      parameter(n_bin_x=100)
      parameter(cm_s=0.9012000E+06)
      dimension xl_bin(n_bin_x),q2l_bin(n_bin_q2) 
      dimension f(n_bin_x,n_bin_q2)               
      logical first                                                     
      data first/.true./                                                
      real fgd1(n_bin_x),fgd2(n_bin_x),fgd3(n_bin_x),fgd4(n_bin_x),     
     & fgd5(n_bin_x),fgd6(n_bin_x),fgd7(n_bin_x),fgd8(n_bin_x),         
     & fgd9(n_bin_x),fgd10(n_bin_x),fgd11(n_bin_x),fgd12(n_bin_x),      
     & fgd13(n_bin_x),fgd14(n_bin_x),fgd15(n_bin_x),fgd16(n_bin_x),     
     & fgd17(n_bin_x),fgd18(n_bin_x),fgd19(n_bin_x),fgd20(n_bin_x),     
     & fgd21(n_bin_x),fgd22(n_bin_x),fgd23(n_bin_x),fgd24(n_bin_x),     
     & fgd25(n_bin_x),fgd26(n_bin_x),fgd27(n_bin_x),fgd28(n_bin_x),     
     & fgd29(n_bin_x),fgd30(n_bin_x),fgd31(n_bin_x),fgd32(n_bin_x),     
     & fgd33(n_bin_x),fgd34(n_bin_x),fgd35(n_bin_x),fgd36(n_bin_x),     
     & fgd37(n_bin_x),fgd38(n_bin_x),fgd39(n_bin_x),fgd40(n_bin_x),     
     & fgd41(n_bin_x),fgd42(n_bin_x),fgd43(n_bin_x),fgd44(n_bin_x),     
     & fgd45(n_bin_x),fgd46(n_bin_x),fgd47(n_bin_x),fgd48(n_bin_x),     
     & fgd49(n_bin_x),fgd50(n_bin_x),fgd51(n_bin_x),fgd52(n_bin_x),     
     & fgd53(n_bin_x),fgd54(n_bin_x),fgd55(n_bin_x),fgd56(n_bin_x),     
     & fgd57(n_bin_x),fgd58(n_bin_x),fgd59(n_bin_x),fgd60(n_bin_x),     
     & fgd61(n_bin_x),fgd62(n_bin_x),fgd63(n_bin_x),fgd64(n_bin_x),     
     & fgd65(n_bin_x),fgd66(n_bin_x),fgd67(n_bin_x),fgd68(n_bin_x),     
     & fgd69(n_bin_x),fgd70(n_bin_x),fgd71(n_bin_x),fgd72(n_bin_x),     
     & fgd73(n_bin_x),fgd74(n_bin_x),fgd75(n_bin_x),fgd76(n_bin_x),     
     & fgd77(n_bin_x),fgd78(n_bin_x),fgd79(n_bin_x),fgd80(n_bin_x),     
     & fgd81(n_bin_x),fgd82(n_bin_x),fgd83(n_bin_x),fgd84(n_bin_x),     
     & fgd85(n_bin_x),fgd86(n_bin_x)                                    
      data xl_bin/                                                      
     &-.9767210E+01,-.9668551E+01,-.9569893E+01,-.9471234E+01,          
     &-.9372575E+01,-.9273917E+01,-.9175258E+01,-.9076599E+01,          
     &-.8977940E+01,-.8879282E+01,-.8780623E+01,-.8681964E+01,          
     &-.8583306E+01,-.8484647E+01,-.8385988E+01,-.8287330E+01,          
     &-.8188671E+01,-.8090012E+01,-.7991354E+01,-.7892695E+01,          
     &-.7794036E+01,-.7695378E+01,-.7596719E+01,-.7498060E+01,          
     &-.7399401E+01,-.7300743E+01,-.7202084E+01,-.7103425E+01,          
     &-.7004767E+01,-.6906108E+01,-.6807449E+01,-.6708791E+01,          
     &-.6610132E+01,-.6511473E+01,-.6412815E+01,-.6314156E+01,          
     &-.6215497E+01,-.6116839E+01,-.6018180E+01,-.5919521E+01,          
     &-.5820862E+01,-.5722204E+01,-.5623545E+01,-.5524886E+01,          
     &-.5426228E+01,-.5327569E+01,-.5228910E+01,-.5130252E+01,          
     &-.5031593E+01,-.4932934E+01,-.4834276E+01,-.4735617E+01,          
     &-.4636958E+01,-.4538300E+01,-.4439641E+01,-.4340982E+01,          
     &-.4242324E+01,-.4143665E+01,-.4045006E+01,-.3946347E+01,          
     &-.3847689E+01,-.3749030E+01,-.3650371E+01,-.3551713E+01,          
     &-.3453054E+01,-.3354395E+01,-.3255737E+01,-.3157078E+01,          
     &-.3058419E+01,-.2959761E+01,-.2861102E+01,-.2762443E+01,          
     &-.2663785E+01,-.2565126E+01,-.2466467E+01,-.2367808E+01,          
     &-.2269150E+01,-.2170491E+01,-.2071832E+01,-.1973174E+01,          
     &-.1874515E+01,-.1775856E+01,-.1677198E+01,-.1578539E+01,          
     &-.1479880E+01,-.1381222E+01,-.1282563E+01,-.1183904E+01,          
     &-.1085246E+01,-.9865869E+00,-.8879282E+00,-.7892695E+00,          
     &-.6906108E+00,-.5919521E+00,-.4932934E+00,-.3946347E+00,          
     &-.2959761E+00,-.1973174E+00,-.9865869E-01,0.0000000E+00/          
      data q2l_bin/                                                     
     &  0.15000E+01,  0.16000E+01,  0.17000E+01,  0.18000E+01,          
     &  0.19000E+01,  0.19599E+01,  0.19600E+01,  0.19601E+01,          
     &  0.20000E+01,  0.21000E+01,  0.22000E+01,  0.23000E+01,          
     &  0.24000E+01,  0.25000E+01,  0.30000E+01,  0.35000E+01,          
     &  0.40000E+01,  0.45000E+01,  0.50000E+01,  0.60000E+01,          
     &  0.70000E+01,  0.80000E+01,  0.90000E+01,  0.10000E+02,          
     &  0.15000E+02,  0.20000E+02,  0.20249E+02,  0.20250E+02,          
     &  0.20251E+02,  0.25000E+02,  0.30000E+02,  0.35000E+02,          
     &  0.40000E+02,  0.45000E+02,  0.50000E+02,  0.55000E+02,          
     &  0.60000E+02,  0.65000E+02,  0.70000E+02,  0.75000E+02,          
     &  0.80000E+02,  0.85000E+02,  0.90000E+02,  0.95000E+02,          
     &  0.10000E+03,  0.15000E+03,  0.20000E+03,  0.25000E+03,          
     &  0.30000E+03,  0.35000E+03,  0.40000E+03,  0.45000E+03,          
     &  0.50000E+03,  0.55000E+03,  0.60000E+03,  0.65000E+03,          
     &  0.70000E+03,  0.75000E+03,  0.80000E+03,  0.85000E+03,          
     &  0.90000E+03,  0.95000E+03,  0.10000E+04,  0.15000E+04,          
     &  0.20000E+04,  0.25000E+04,  0.30000E+04,  0.35000E+04,          
     &  0.40000E+04,  0.45000E+04,  0.50000E+04,  0.55000E+04,          
     &  0.60000E+04,  0.65000E+04,  0.70000E+04,  0.75000E+04,          
     &  0.80000E+04,  0.85000E+04,  0.90000E+04,  0.95000E+04,          
     &  0.10000E+05,  0.15000E+05,  0.20000E+05,  0.25000E+05,          
     &  0.30000E+05,  0.35000E+05/                                      
      data fgd1/                                                        
     &0.3830098E-06,0.4116528E-06,0.4423795E-06,0.4753360E-06,          
     &0.5106783E-06,0.5485729E-06,0.5891967E-06,0.6327392E-06,          
     &0.6794019E-06,0.7293996E-06,0.7829611E-06,0.8403300E-06,          
     &0.9017660E-06,0.9675450E-06,0.1037961E-05,0.1113328E-05,          
     &0.1193976E-05,0.1280262E-05,0.1372560E-05,0.1471271E-05,          
     &0.1576819E-05,0.1689657E-05,0.1810265E-05,0.1939151E-05,          
     &0.2076856E-05,0.2223956E-05,0.2381060E-05,0.2548815E-05,          
     &0.2727908E-05,0.2919067E-05,0.3123065E-05,0.3340721E-05,          
     &0.3572904E-05,0.3820536E-05,0.4084593E-05,0.4366110E-05,          
     &0.4666184E-05,0.4985978E-05,0.5326723E-05,0.5689722E-05,          
     &0.6076359E-05,0.6488094E-05,0.6926476E-05,0.7393141E-05,          
     &0.7889820E-05,0.8418343E-05,0.8980642E-05,0.9578755E-05,          
     &0.1021483E-04,0.1089113E-04,0.1161003E-04,0.1237402E-04,          
     &0.1318570E-04,0.1404779E-04,0.1496311E-04,0.1593457E-04,          
     &0.1696516E-04,0.1805794E-04,0.1921596E-04,0.2044230E-04,          
     &0.2173996E-04,0.2311182E-04,0.2456053E-04,0.2608846E-04,          
     &0.2769752E-04,0.2938906E-04,0.3116365E-04,0.3302090E-04,          
     &0.3495917E-04,0.3697534E-04,0.3906445E-04,0.4121939E-04,          
     &0.4343049E-04,0.4568509E-04,0.4796717E-04,0.5025691E-04,          
     &0.5253015E-04,0.5475804E-04,0.5690641E-04,0.5893523E-04,          
     &0.6079791E-04,0.6244038E-04,0.6380022E-04,0.6480563E-04,          
     &0.6537504E-04,0.6541773E-04,0.6483695E-04,0.6353674E-04,          
     &0.6143383E-04,0.5847427E-04,0.5465195E-04,0.4995756E-04,          
     &0.4439774E-04,0.3835495E-04,0.3211878E-04,0.2593583E-04,          
     &0.2002784E-04,0.1481948E-04,0.1030275E-04,0.0000000E+00/          
      data fgd2/                                                        
     &0.4159010E-06,0.4469213E-06,0.4801936E-06,0.5158757E-06,          
     &0.5541361E-06,0.5951542E-06,0.6391214E-06,0.6862421E-06,          
     &0.7367339E-06,0.7908287E-06,0.8487736E-06,0.9108319E-06,          
     &0.9772837E-06,0.1048428E-05,0.1124581E-05,0.1206082E-05,          
     &0.1293290E-05,0.1386587E-05,0.1486381E-05,0.1593103E-05,          
     &0.1707214E-05,0.1829201E-05,0.1959584E-05,0.2098914E-05,          
     &0.2247776E-05,0.2406792E-05,0.2576623E-05,0.2757968E-05,          
     &0.2951572E-05,0.3158224E-05,0.3378759E-05,0.3614068E-05,          
     &0.3865090E-05,0.4132825E-05,0.4418331E-05,0.4722730E-05,          
     &0.5047213E-05,0.5393038E-05,0.5761542E-05,0.6154138E-05,          
     &0.6572323E-05,0.7017683E-05,0.7491894E-05,0.7996729E-05,          
     &0.8534063E-05,0.9105875E-05,0.9714255E-05,0.1036140E-04,          
     &0.1104964E-04,0.1178141E-04,0.1255926E-04,0.1338587E-04,          
     &0.1426405E-04,0.1519668E-04,0.1618680E-04,0.1723750E-04,          
     &0.1835196E-04,0.1953340E-04,0.2078506E-04,0.2211015E-04,          
     &0.2351179E-04,0.2499293E-04,0.2655628E-04,0.2820419E-04,          
     &0.2993851E-04,0.3176043E-04,0.3367027E-04,0.3566728E-04,          
     &0.3774936E-04,0.3991274E-04,0.4215170E-04,0.4445812E-04,          
     &0.4682116E-04,0.4922676E-04,0.5165726E-04,0.5409089E-04,          
     &0.5650136E-04,0.5885728E-04,0.6112170E-04,0.6325143E-04,          
     &0.6519632E-04,0.6689836E-04,0.6829063E-04,0.6929633E-04,          
     &0.6982824E-04,0.6978941E-04,0.6907635E-04,0.6758617E-04,          
     &0.6522918E-04,0.6194673E-04,0.5773155E-04,0.5264290E-04,          
     &0.4658277E-04,0.3999931E-04,0.3322786E-04,0.2656320E-04,          
     &0.2024908E-04,0.1473705E-04,0.9989540E-05,0.0000000E+00/          
      data fgd3/                                                        
     &0.4491911E-06,0.4826155E-06,0.5184619E-06,0.5569001E-06,          
     &0.5981108E-06,0.6422871E-06,0.6896345E-06,0.7403726E-06,          
     &0.7947352E-06,0.8529717E-06,0.9153476E-06,0.9821457E-06,          
     &0.1053667E-05,0.1130233E-05,0.1212185E-05,0.1299886E-05,          
     &0.1393722E-05,0.1494105E-05,0.1601473E-05,0.1716291E-05,          
     &0.1839052E-05,0.1970283E-05,0.2110542E-05,0.2260422E-05,          
     &0.2420554E-05,0.2591607E-05,0.2774292E-05,0.2969364E-05,          
     &0.3177623E-05,0.3399919E-05,0.3637154E-05,0.3890285E-05,          
     &0.4160328E-05,0.4448357E-05,0.4755515E-05,0.5083010E-05,          
     &0.5432125E-05,0.5804219E-05,0.6200730E-05,0.6623183E-05,          
     &0.7073191E-05,0.7552462E-05,0.8062801E-05,0.8606120E-05,          
     &0.9184433E-05,0.9799871E-05,0.1045468E-04,0.1115123E-04,          
     &0.1189200E-04,0.1267961E-04,0.1351680E-04,0.1440643E-04,          
     &0.1535149E-04,0.1635507E-04,0.1742038E-04,0.1855070E-04,          
     &0.1974940E-04,0.2101987E-04,0.2236550E-04,0.2378963E-04,          
     &0.2529551E-04,0.2688615E-04,0.2856431E-04,0.3033230E-04,          
     &0.3219190E-04,0.3414412E-04,0.3618904E-04,0.3832554E-04,          
     &0.4055100E-04,0.4286105E-04,0.4524913E-04,0.4770615E-04,          
     &0.5022006E-04,0.5277540E-04,0.5535283E-04,0.5792869E-04,          
     &0.6047445E-04,0.6295626E-04,0.6533434E-04,0.6756237E-04,          
     &0.6958663E-04,0.7134517E-04,0.7276660E-04,0.7376916E-04,          
     &0.7426002E-04,0.7413609E-04,0.7328722E-04,0.7160380E-04,          
     &0.6898991E-04,0.6538249E-04,0.6077348E-04,0.5522753E-04,          
     &0.4873045E-04,0.4160910E-04,0.3430719E-04,0.2716582E-04,          
     &0.2044645E-04,0.1463953E-04,0.9765473E-05,0.0000000E+00/          
      data fgd4/                                                        
     &0.4828551E-06,0.5187085E-06,0.5571558E-06,0.5983784E-06,          
     &0.6425698E-06,0.6899364E-06,0.7406983E-06,0.7950904E-06,          
     &0.8533630E-06,0.9157827E-06,0.9826338E-06,0.1054219E-05,          
     &0.1130861E-05,0.1212902E-05,0.1300709E-05,0.1394670E-05,          
     &0.1495199E-05,0.1602737E-05,0.1717752E-05,0.1840742E-05,          
     &0.1972237E-05,0.2112799E-05,0.2263028E-05,0.2423558E-05,          
     &0.2595065E-05,0.2778267E-05,0.2973925E-05,0.3182848E-05,          
     &0.3405895E-05,0.3643977E-05,0.3898062E-05,0.4169175E-05,          
     &0.4458404E-05,0.4766905E-05,0.5095901E-05,0.5446689E-05,          
     &0.5820645E-05,0.6219226E-05,0.6643974E-05,0.7096526E-05,          
     &0.7578610E-05,0.8092057E-05,0.8638803E-05,0.9220891E-05,          
     &0.9840484E-05,0.1049986E-04,0.1120142E-04,0.1194770E-04,          
     &0.1274135E-04,0.1358515E-04,0.1448204E-04,0.1543505E-04,          
     &0.1644736E-04,0.1752225E-04,0.1866311E-04,0.1987341E-04,          
     &0.2115669E-04,0.2251652E-04,0.2395643E-04,0.2547989E-04,          
     &0.2709025E-04,0.2879060E-04,0.3058372E-04,0.3247189E-04,          
     &0.3445679E-04,0.3653927E-04,0.3871911E-04,0.4099484E-04,          
     &0.4336332E-04,0.4581953E-04,0.4835609E-04,0.5096291E-04,          
     &0.5362672E-04,0.5633064E-04,0.5905367E-04,0.6177020E-04,          
     &0.6444951E-04,0.6705524E-04,0.6954482E-04,0.7186873E-04,          
     &0.7396976E-04,0.7578198E-04,0.7722958E-04,0.7822584E-04,          
     &0.7867239E-04,0.7846006E-04,0.7747217E-04,0.7559251E-04,          
     &0.7271918E-04,0.6878495E-04,0.6378128E-04,0.5777857E-04,          
     &0.5084434E-04,0.4318772E-04,0.3535975E-04,0.2774793E-04,          
     &0.2062234E-04,0.1452823E-04,0.9535747E-05,0.0000000E+00/          
      data fgd5/                                                        
     &0.5168709E-06,0.5551768E-06,0.5962498E-06,0.6402834E-06,          
     &0.6874839E-06,0.7380712E-06,0.7922798E-06,0.8503602E-06,          
     &0.9125793E-06,0.9792212E-06,0.1050589E-05,0.1127005E-05,          
     &0.1208814E-05,0.1296381E-05,0.1390096E-05,0.1490375E-05,          
     &0.1597657E-05,0.1712414E-05,0.1835144E-05,0.1966379E-05,          
     &0.2106684E-05,0.2256660E-05,0.2416945E-05,0.2588218E-05,          
     &0.2771198E-05,0.2966653E-05,0.3175395E-05,0.3398287E-05,          
     &0.3636246E-05,0.3890246E-05,0.4161320E-05,0.4450561E-05,          
     &0.4759134E-05,0.5088271E-05,0.5439279E-05,0.5813543E-05,          
     &0.6212533E-05,0.6637804E-05,0.7091004E-05,0.7573879E-05,          
     &0.8088274E-05,0.8636142E-05,0.9219551E-05,0.9840679E-05,          
     &0.1050183E-04,0.1120543E-04,0.1195405E-04,0.1275036E-04,          
     &0.1359720E-04,0.1449753E-04,0.1545444E-04,0.1647117E-04,          
     &0.1755106E-04,0.1869760E-04,0.1991435E-04,0.2120497E-04,          
     &0.2257315E-04,0.2402264E-04,0.2555711E-04,0.2718017E-04,          
     &0.2889525E-04,0.3070551E-04,0.3261373E-04,0.3462218E-04,          
     &0.3673240E-04,0.3894508E-04,0.4125973E-04,0.4367444E-04,          
     &0.4618562E-04,0.4878752E-04,0.5147197E-04,0.5422785E-04,          
     &0.5704068E-04,0.5989213E-04,0.6275951E-04,0.6561530E-04,          
     &0.6842655E-04,0.7115441E-04,0.7375346E-04,0.7617105E-04,          
     &0.7834644E-04,0.8020975E-04,0.8168076E-04,0.8266780E-04,          
     &0.8306704E-04,0.8276326E-04,0.8163341E-04,0.7955477E-04,          
     &0.7641967E-04,0.7215695E-04,0.6675793E-04,0.6029900E-04,          
     &0.5292747E-04,0.4473805E-04,0.3638807E-04,0.2831144E-04,          
     &0.2081164E-04,0.1440438E-04,0.9300595E-05,0.0000000E+00/          
      data fgd6/                                                        
     &0.5374071E-06,0.5771928E-06,0.6198501E-06,0.6655796E-06,          
     &0.7145954E-06,0.7671258E-06,0.8234136E-06,0.8837191E-06,          
     &0.9483187E-06,0.1017507E-05,0.1091600E-05,0.1170930E-05,          
     &0.1255855E-05,0.1346755E-05,0.1444034E-05,0.1548122E-05,          
     &0.1659477E-05,0.1778587E-05,0.1905969E-05,0.2042177E-05,          
     &0.2187795E-05,0.2343446E-05,0.2509795E-05,0.2687544E-05,          
     &0.2877442E-05,0.3080283E-05,0.3296912E-05,0.3528225E-05,          
     &0.3775174E-05,0.4038769E-05,0.4320081E-05,0.4620249E-05,          
     &0.4940479E-05,0.5282052E-05,0.5646324E-05,0.6034734E-05,          
     &0.6448806E-05,0.6890157E-05,0.7360497E-05,0.7861636E-05,          
     &0.8395492E-05,0.8964091E-05,0.9569576E-05,0.1021421E-04,          
     &0.1090038E-04,0.1163061E-04,0.1240754E-04,0.1323397E-04,          
     &0.1411281E-04,0.1504714E-04,0.1604016E-04,0.1709521E-04,          
     &0.1821574E-04,0.1940535E-04,0.2066771E-04,0.2200658E-04,          
     &0.2342577E-04,0.2492910E-04,0.2652035E-04,0.2820318E-04,          
     &0.2998109E-04,0.3185727E-04,0.3383450E-04,0.3591503E-04,          
     &0.3810034E-04,0.4039099E-04,0.4278631E-04,0.4528418E-04,          
     &0.4788065E-04,0.5056962E-04,0.5334237E-04,0.5618718E-04,          
     &0.5908884E-04,0.6202816E-04,0.6498142E-04,0.6791993E-04,          
     &0.7080942E-04,0.7360954E-04,0.7627317E-04,0.7874578E-04,          
     &0.8096449E-04,0.8285706E-04,0.8434065E-04,0.8532062E-04,          
     &0.8568988E-04,0.8532964E-04,0.8411303E-04,0.8191355E-04,          
     &0.7862011E-04,0.7415934E-04,0.6852257E-04,0.6178996E-04,          
     &0.5413880E-04,0.4564752E-04,0.3698591E-04,0.2863260E-04,          
     &0.2091988E-04,0.1431504E-04,0.9147044E-05,0.0000000E+00/          
      data fgd7/                                                        
     &0.5374305E-06,0.5772180E-06,0.6198772E-06,0.6656088E-06,          
     &0.7146268E-06,0.7671595E-06,0.8234499E-06,0.8837580E-06,          
     &0.9483607E-06,0.1017553E-05,0.1091648E-05,0.1170982E-05,          
     &0.1255911E-05,0.1346815E-05,0.1444098E-05,0.1548191E-05,          
     &0.1659552E-05,0.1778667E-05,0.1906056E-05,0.2042269E-05,          
     &0.2187894E-05,0.2343553E-05,0.2509909E-05,0.2687667E-05,          
     &0.2877574E-05,0.3080425E-05,0.3297064E-05,0.3528389E-05,          
     &0.3775350E-05,0.4038957E-05,0.4320284E-05,0.4620466E-05,          
     &0.4940713E-05,0.5282302E-05,0.5646592E-05,0.6035021E-05,          
     &0.6449115E-05,0.6890487E-05,0.7360851E-05,0.7862016E-05,          
     &0.8395899E-05,0.8964527E-05,0.9570044E-05,0.1021471E-04,          
     &0.1090092E-04,0.1163118E-04,0.1240816E-04,0.1323463E-04,          
     &0.1411352E-04,0.1504790E-04,0.1604097E-04,0.1709608E-04,          
     &0.1821667E-04,0.1940634E-04,0.2066877E-04,0.2200772E-04,          
     &0.2342699E-04,0.2493040E-04,0.2652173E-04,0.2820466E-04,          
     &0.2998267E-04,0.3185895E-04,0.3383630E-04,0.3591694E-04,          
     &0.3810237E-04,0.4039315E-04,0.4278860E-04,0.4528662E-04,          
     &0.4788324E-04,0.5057235E-04,0.5334525E-04,0.5619023E-04,          
     &0.5909205E-04,0.6203153E-04,0.6498495E-04,0.6792362E-04,          
     &0.7081327E-04,0.7361353E-04,0.7627731E-04,0.7875005E-04,          
     &0.8096887E-04,0.8286154E-04,0.8434520E-04,0.8532522E-04,          
     &0.8569450E-04,0.8533422E-04,0.8411753E-04,0.8191790E-04,          
     &0.7862425E-04,0.7416320E-04,0.6852607E-04,0.6179302E-04,          
     &0.5414136E-04,0.4564958E-04,0.3698740E-04,0.2863356E-04,          
     &0.2092041E-04,0.1431515E-04,0.9146970E-05,0.0000000E+00/          
      data fgd8/                                                        
     &0.5374543E-06,0.5772436E-06,0.6199047E-06,0.6656384E-06,          
     &0.7146586E-06,0.7671936E-06,0.8234867E-06,0.8837976E-06,          
     &0.9484031E-06,0.1017598E-05,0.1091697E-05,0.1171035E-05,          
     &0.1255968E-05,0.1346876E-05,0.1444164E-05,0.1548261E-05,          
     &0.1659627E-05,0.1778748E-05,0.1906143E-05,0.2042363E-05,          
     &0.2187994E-05,0.2343661E-05,0.2510025E-05,0.2687791E-05,          
     &0.2877707E-05,0.3080568E-05,0.3297218E-05,0.3528554E-05,          
     &0.3775526E-05,0.4039147E-05,0.4320487E-05,0.4620685E-05,          
     &0.4940947E-05,0.5282553E-05,0.5646861E-05,0.6035310E-05,          
     &0.6449424E-05,0.6890819E-05,0.7361207E-05,0.7862397E-05,          
     &0.8396308E-05,0.8964966E-05,0.9570514E-05,0.1021522E-04,          
     &0.1090146E-04,0.1163176E-04,0.1240878E-04,0.1323529E-04,          
     &0.1411423E-04,0.1504866E-04,0.1604178E-04,0.1709694E-04,          
     &0.1821760E-04,0.1940733E-04,0.2066983E-04,0.2200885E-04,          
     &0.2342820E-04,0.2493169E-04,0.2652311E-04,0.2820613E-04,          
     &0.2998424E-04,0.3186062E-04,0.3383808E-04,0.3591884E-04,          
     &0.3810440E-04,0.4039529E-04,0.4279089E-04,0.4528903E-04,          
     &0.4788580E-04,0.5057506E-04,0.5334812E-04,0.5619325E-04,          
     &0.5909523E-04,0.6203487E-04,0.6498845E-04,0.6792728E-04,          
     &0.7081709E-04,0.7361751E-04,0.7628142E-04,0.7875429E-04,          
     &0.8097323E-04,0.8286600E-04,0.8434973E-04,0.8532979E-04,          
     &0.8569908E-04,0.8533878E-04,0.8412201E-04,0.8192224E-04,          
     &0.7862839E-04,0.7416706E-04,0.6852957E-04,0.6179608E-04,          
     &0.5414392E-04,0.4565165E-04,0.3698889E-04,0.2863452E-04,          
     &0.2092094E-04,0.1431527E-04,0.9146902E-05,0.0000000E+00/          
      data fgd9/                                                        
     &0.5513126E-06,0.5920979E-06,0.6358254E-06,0.6827003E-06,          
     &0.7329419E-06,0.7867839E-06,0.8444752E-06,0.9062820E-06,          
     &0.9724877E-06,0.1043394E-05,0.1119324E-05,0.1200619E-05,          
     &0.1287645E-05,0.1380790E-05,0.1480469E-05,0.1587123E-05,          
     &0.1701221E-05,0.1823261E-05,0.1953775E-05,0.2093327E-05,          
     &0.2242518E-05,0.2401987E-05,0.2572411E-05,0.2754512E-05,          
     &0.2949057E-05,0.3156860E-05,0.3378784E-05,0.3615749E-05,          
     &0.3868729E-05,0.4138758E-05,0.4426936E-05,0.4734427E-05,          
     &0.5062468E-05,0.5412369E-05,0.5785521E-05,0.6183398E-05,          
     &0.6607560E-05,0.7059663E-05,0.7541459E-05,0.8054802E-05,          
     &0.8601656E-05,0.9184096E-05,0.9804314E-05,0.1046463E-04,          
     &0.1116748E-04,0.1191545E-04,0.1271125E-04,0.1355773E-04,          
     &0.1445788E-04,0.1541484E-04,0.1643187E-04,0.1751239E-04,          
     &0.1865993E-04,0.1987815E-04,0.2117080E-04,0.2254170E-04,          
     &0.2399473E-04,0.2553378E-04,0.2716267E-04,0.2888513E-04,          
     &0.3070467E-04,0.3262452E-04,0.3464747E-04,0.3677573E-04,          
     &0.3901076E-04,0.4135302E-04,0.4380175E-04,0.4635466E-04,          
     &0.4900761E-04,0.5175421E-04,0.5458543E-04,0.5748915E-04,          
     &0.6044966E-04,0.6344722E-04,0.6645744E-04,0.6945087E-04,          
     &0.7239237E-04,0.7524058E-04,0.7794730E-04,0.8045675E-04,          
     &0.8270464E-04,0.8461719E-04,0.8610981E-04,0.8708591E-04,          
     &0.8743622E-04,0.8703955E-04,0.8576645E-04,0.8348785E-04,          
     &0.8009033E-04,0.7549893E-04,0.6970489E-04,0.6279079E-04,          
     &0.5493998E-04,0.4626096E-04,0.3739108E-04,0.2885260E-04,          
     &0.2099719E-04,0.1425832E-04,0.9046916E-05,0.0000000E+00/          
      data fgd10/                                                       
     &0.5862727E-06,0.6295697E-06,0.6759854E-06,0.7257374E-06,          
     &0.7790579E-06,0.8361943E-06,0.8974104E-06,0.9629879E-06,          
     &0.1033227E-05,0.1108447E-05,0.1188990E-05,0.1275218E-05,          
     &0.1367518E-05,0.1466302E-05,0.1572009E-05,0.1685104E-05,          
     &0.1806086E-05,0.1935482E-05,0.2073856E-05,0.2221804E-05,          
     &0.2379964E-05,0.2549011E-05,0.2729664E-05,0.2922688E-05,          
     &0.3128894E-05,0.3349144E-05,0.3584355E-05,0.3835499E-05,          
     &0.4103609E-05,0.4389782E-05,0.4695181E-05,0.5021041E-05,          
     &0.5368670E-05,0.5739460E-05,0.6134881E-05,0.6556496E-05,          
     &0.7005959E-05,0.7485021E-05,0.7995538E-05,0.8539475E-05,          
     &0.9118909E-05,0.9736035E-05,0.1039318E-04,0.1109278E-04,          
     &0.1183743E-04,0.1262986E-04,0.1347292E-04,0.1436962E-04,          
     &0.1532312E-04,0.1633673E-04,0.1741388E-04,0.1855816E-04,          
     &0.1977329E-04,0.2106310E-04,0.2243151E-04,0.2388252E-04,          
     &0.2542018E-04,0.2704852E-04,0.2877151E-04,0.3059297E-04,          
     &0.3251652E-04,0.3454543E-04,0.3668250E-04,0.3892989E-04,          
     &0.4128893E-04,0.4375991E-04,0.4634177E-04,0.4903182E-04,          
     &0.5182540E-04,0.5471545E-04,0.5769212E-04,0.6074227E-04,          
     &0.6384899E-04,0.6699110E-04,0.7014257E-04,0.7327202E-04,          
     &0.7634214E-04,0.7930910E-04,0.8212193E-04,0.8472173E-04,          
     &0.8704077E-04,0.8900136E-04,0.9051459E-04,0.9147899E-04,          
     &0.9177993E-04,0.9129025E-04,0.8987422E-04,0.8739638E-04,          
     &0.8373765E-04,0.7881926E-04,0.7263245E-04,0.6526600E-04,          
     &0.5691849E-04,0.4777166E-04,0.3838504E-04,0.2938824E-04,          
     &0.2118113E-04,0.1410808E-04,0.8792694E-05,0.0000000E+00/          
      data fgd11/                                                       
     &0.6215478E-06,0.6673768E-06,0.7165027E-06,0.7691551E-06,          
     &0.8255791E-06,0.8860364E-06,0.9508052E-06,0.1020183E-05,          
     &0.1094487E-05,0.1174055E-05,0.1259247E-05,0.1350446E-05,          
     &0.1448061E-05,0.1552526E-05,0.1664306E-05,0.1783892E-05,          
     &0.1911809E-05,0.2048616E-05,0.2194907E-05,0.2351313E-05,          
     &0.2518507E-05,0.2697202E-05,0.2888158E-05,0.3092182E-05,          
     &0.3310131E-05,0.3542917E-05,0.3791507E-05,0.4056929E-05,          
     &0.4340274E-05,0.4642700E-05,0.4965436E-05,0.5309787E-05,          
     &0.5677136E-05,0.6068950E-05,0.6486786E-05,0.6932291E-05,          
     &0.7407214E-05,0.7913403E-05,0.8452819E-05,0.9027534E-05,          
     &0.9639743E-05,0.1029176E-04,0.1098604E-04,0.1172515E-04,          
     &0.1251183E-04,0.1334895E-04,0.1423952E-04,0.1518670E-04,          
     &0.1619382E-04,0.1726434E-04,0.1840189E-04,0.1961021E-04,          
     &0.2089321E-04,0.2225489E-04,0.2369935E-04,0.2523075E-04,          
     &0.2685331E-04,0.2857120E-04,0.3038853E-04,0.3230923E-04,          
     &0.3433700E-04,0.3647515E-04,0.3872648E-04,0.4109310E-04,          
     &0.4357622E-04,0.4617591E-04,0.4889082E-04,0.5171787E-04,          
     &0.5465185E-04,0.5768503E-04,0.6080671E-04,0.6400275E-04,          
     &0.6725501E-04,0.7054087E-04,0.7383264E-04,0.7709701E-04,          
     &0.8029449E-04,0.8337878E-04,0.8629612E-04,0.8898452E-04,          
     &0.9137276E-04,0.9337930E-04,0.9491088E-04,0.9586124E-04,          
     &0.9611033E-04,0.9552517E-04,0.9396376E-04,0.9128444E-04,          
     &0.8736260E-04,0.8211589E-04,0.7553573E-04,0.6771736E-04,          
     &0.5887479E-04,0.4926048E-04,0.3936029E-04,0.2990941E-04,          
     &0.2135556E-04,0.1394795E-04,0.8533633E-05,0.0000000E+00/          
      data fgd12/                                                       
     &0.6571224E-06,0.7055031E-06,0.7573599E-06,0.8129348E-06,          
     &0.8724860E-06,0.9362890E-06,0.1004637E-05,0.1077844E-05,          
     &0.1156243E-05,0.1240191E-05,0.1330066E-05,0.1426272E-05,          
     &0.1529240E-05,0.1639427E-05,0.1757323E-05,0.1883445E-05,          
     &0.2018347E-05,0.2162617E-05,0.2316880E-05,0.2481803E-05,          
     &0.2658092E-05,0.2846501E-05,0.3047829E-05,0.3262928E-05,          
     &0.3492699E-05,0.3738103E-05,0.4000161E-05,0.4279953E-05,          
     &0.4578631E-05,0.4897414E-05,0.5237599E-05,0.5600557E-05,          
     &0.5987748E-05,0.6400717E-05,0.6841103E-05,0.7310642E-05,          
     &0.7811175E-05,0.8344651E-05,0.8913133E-05,0.9518802E-05,          
     &0.1016397E-04,0.1085107E-04,0.1158268E-04,0.1236152E-04,          
     &0.1319045E-04,0.1407248E-04,0.1501078E-04,0.1600869E-04,          
     &0.1706967E-04,0.1819736E-04,0.1939556E-04,0.2066820E-04,          
     &0.2201933E-04,0.2345314E-04,0.2497391E-04,0.2658598E-04,          
     &0.2829369E-04,0.3010138E-04,0.3201329E-04,0.3403344E-04,          
     &0.3616562E-04,0.3841318E-04,0.4077891E-04,0.4326485E-04,          
     &0.4587209E-04,0.4860049E-04,0.5144840E-04,0.5441231E-04,          
     &0.5748646E-04,0.6066246E-04,0.6392876E-04,0.6727016E-04,          
     &0.7066733E-04,0.7409618E-04,0.7752735E-04,0.8092561E-04,          
     &0.8424926E-04,0.8744953E-04,0.9046989E-04,0.9324522E-04,          
     &0.9570085E-04,0.9775136E-04,0.9929919E-04,0.1002333E-03,          
     &0.1004282E-03,0.9974523E-04,0.9803619E-04,0.9515330E-04,          
     &0.9096658E-04,0.8539031E-04,0.7841632E-04,0.7014650E-04,          
     &0.6081046E-04,0.5072902E-04,0.4031830E-04,0.3041729E-04,          
     &0.2152131E-04,0.1387015E-04,0.8270171E-05,0.0000000E+00/          
      data fgd13/                                                       
     &0.6929830E-06,0.7439338E-06,0.7985413E-06,0.8570598E-06,          
     &0.9197606E-06,0.9869333E-06,0.1058886E-05,0.1135949E-05,          
     &0.1218471E-05,0.1306829E-05,0.1401419E-05,0.1502667E-05,          
     &0.1611024E-05,0.1726973E-05,0.1851026E-05,0.1983728E-05,          
     &0.2125661E-05,0.2277443E-05,0.2439731E-05,0.2613226E-05,          
     &0.2798670E-05,0.2996855E-05,0.3208622E-05,0.3434865E-05,          
     &0.3676533E-05,0.3934635E-05,0.4210242E-05,0.4504494E-05,          
     &0.4818599E-05,0.5153838E-05,0.5511574E-05,0.5893251E-05,          
     &0.6300400E-05,0.6734646E-05,0.7197712E-05,0.7691422E-05,          
     &0.8217710E-05,0.8778623E-05,0.9376328E-05,0.1001312E-04,          
     &0.1069141E-04,0.1141378E-04,0.1218291E-04,0.1300167E-04,          
     &0.1387305E-04,0.1480021E-04,0.1578648E-04,0.1683533E-04,          
     &0.1795041E-04,0.1913552E-04,0.2039461E-04,0.2173180E-04,          
     &0.2315132E-04,0.2465752E-04,0.2625485E-04,0.2794782E-04,          
     &0.2974093E-04,0.3163866E-04,0.3364536E-04,0.3576517E-04,          
     &0.3800195E-04,0.4035907E-04,0.4283932E-04,0.4544468E-04,          
     &0.4817609E-04,0.5103319E-04,0.5401402E-04,0.5711465E-04,          
     &0.6032879E-04,0.6364731E-04,0.6705783E-04,0.7054412E-04,          
     &0.7408559E-04,0.7765672E-04,0.8122645E-04,0.8475760E-04,          
     &0.8820630E-04,0.9152129E-04,0.9464324E-04,0.9750393E-04,          
     &0.1000252E-03,0.1021179E-03,0.1036800E-03,0.1045956E-03,          
     &0.1047343E-03,0.1039513E-03,0.1020925E-03,0.9900406E-04,          
     &0.9455085E-04,0.8864389E-04,0.8127565E-04,0.7255485E-04,          
     &0.6272687E-04,0.5216104E-04,0.4126036E-04,0.3091296E-04,          
     &0.2167910E-04,0.1383250E-04,0.8002710E-05,0.0000000E+00/          
      data fgd14/                                                       
     &0.7291166E-06,0.7826555E-06,0.8400326E-06,0.9015147E-06,          
     &0.9673865E-06,0.1037952E-05,0.1113533E-05,0.1194477E-05,          
     &0.1281151E-05,0.1373947E-05,0.1473284E-05,0.1579606E-05,          
     &0.1693388E-05,0.1815135E-05,0.1945384E-05,0.2084708E-05,          
     &0.2233716E-05,0.2393057E-05,0.2563421E-05,0.2745540E-05,          
     &0.2940195E-05,0.3148216E-05,0.3370485E-05,0.3607939E-05,          
     &0.3861574E-05,0.4132449E-05,0.4421687E-05,0.4730482E-05,          
     &0.5060102E-05,0.5411892E-05,0.5787279E-05,0.6187778E-05,          
     &0.6614996E-05,0.7070637E-05,0.7556505E-05,0.8074516E-05,          
     &0.8626695E-05,0.9215188E-05,0.9842266E-05,0.1051033E-04,          
     &0.1122192E-04,0.1197973E-04,0.1278657E-04,0.1364543E-04,          
     &0.1455945E-04,0.1553195E-04,0.1656638E-04,0.1766640E-04,          
     &0.1883579E-04,0.2007854E-04,0.2139876E-04,0.2280074E-04,          
     &0.2428888E-04,0.2586771E-04,0.2754185E-04,0.2931595E-04,          
     &0.3119469E-04,0.3318267E-04,0.3528436E-04,0.3750403E-04,          
     &0.3984558E-04,0.4231241E-04,0.4490730E-04,0.4763216E-04,          
     &0.5048778E-04,0.5347357E-04,0.5658727E-04,0.5982450E-04,          
     &0.6317841E-04,0.6663918E-04,0.7019356E-04,0.7382427E-04,          
     &0.7750947E-04,0.8122218E-04,0.8492966E-04,0.8859279E-04,          
     &0.9216548E-04,0.9559398E-04,0.9881618E-04,0.1017608E-03,          
     &0.1043461E-03,0.1064791E-03,0.1080536E-03,0.1089489E-03,          
     &0.1090291E-03,0.1081441E-03,0.1061335E-03,0.1028378E-03,          
     &0.9811652E-04,0.9187785E-04,0.8411497E-04,0.7494370E-04,          
     &0.6462525E-04,0.5355574E-04,0.4218762E-04,0.3139735E-04,          
     &0.2182959E-04,0.1379139E-04,0.7731623E-05,0.0000000E+00/          
      data fgd15/                                                       
     &0.9135056E-06,0.9802263E-06,0.1051709E-05,0.1128282E-05,          
     &0.1210300E-05,0.1298136E-05,0.1392190E-05,0.1492890E-05,          
     &0.1600690E-05,0.1716076E-05,0.1839563E-05,0.1971702E-05,          
     &0.2113078E-05,0.2264317E-05,0.2426082E-05,0.2599081E-05,          
     &0.2784067E-05,0.2981840E-05,0.3193254E-05,0.3419214E-05,          
     &0.3660685E-05,0.3918691E-05,0.4194324E-05,0.4488739E-05,          
     &0.4803170E-05,0.5138922E-05,0.5497385E-05,0.5880032E-05,          
     &0.6288430E-05,0.6724240E-05,0.7189224E-05,0.7685252E-05,          
     &0.8214308E-05,0.8778492E-05,0.9380032E-05,0.1002129E-04,          
     &0.1070475E-04,0.1143307E-04,0.1220904E-04,0.1303560E-04,          
     &0.1391589E-04,0.1485319E-04,0.1585096E-04,0.1691286E-04,          
     &0.1804272E-04,0.1924458E-04,0.2052266E-04,0.2188137E-04,          
     &0.2332531E-04,0.2485928E-04,0.2648823E-04,0.2821729E-04,          
     &0.3005171E-04,0.3199684E-04,0.3405813E-04,0.3624102E-04,          
     &0.3855090E-04,0.4099305E-04,0.4357251E-04,0.4629397E-04,          
     &0.4916162E-04,0.5217896E-04,0.5534859E-04,0.5867198E-04,          
     &0.6214913E-04,0.6577824E-04,0.6955534E-04,0.7347379E-04,          
     &0.7752385E-04,0.8169208E-04,0.8596077E-04,0.9030730E-04,          
     &0.9470351E-04,0.9911499E-04,0.1035004E-03,0.1078109E-03,          
     &0.1119892E-03,0.1159692E-03,0.1196747E-03,0.1230188E-03,          
     &0.1259026E-03,0.1282139E-03,0.1298252E-03,0.1305924E-03,          
     &0.1303537E-03,0.1289311E-03,0.1261355E-03,0.1217791E-03,          
     &0.1156982E-03,0.1077879E-03,0.9804801E-04,0.8663193E-04,          
     &0.7388196E-04,0.6032828E-04,0.4663266E-04,0.3367676E-04,          
     &0.2249104E-04,0.1354334E-04,0.6868645E-05,0.0000000E+00/          
      data fgd16/                                                       
     &0.1103305E-05,0.1183558E-05,0.1269519E-05,0.1361581E-05,          
     &0.1460165E-05,0.1565719E-05,0.1678722E-05,0.1799684E-05,          
     &0.1929149E-05,0.2067694E-05,0.2215938E-05,0.2374537E-05,          
     &0.2544193E-05,0.2725649E-05,0.2919701E-05,0.3127192E-05,          
     &0.3349023E-05,0.3586149E-05,0.3839588E-05,0.4110424E-05,          
     &0.4399807E-05,0.4708961E-05,0.5039187E-05,0.5391869E-05,          
     &0.5768474E-05,0.6170565E-05,0.6599797E-05,0.7057929E-05,          
     &0.7546831E-05,0.8068484E-05,0.8624988E-05,0.9218576E-05,          
     &0.9851608E-05,0.1052659E-04,0.1124617E-04,0.1201316E-04,          
     &0.1283054E-04,0.1370143E-04,0.1462917E-04,0.1561726E-04,          
     &0.1666940E-04,0.1778949E-04,0.1898163E-04,0.2025014E-04,          
     &0.2159955E-04,0.2303461E-04,0.2456030E-04,0.2618179E-04,          
     &0.2790447E-04,0.2973395E-04,0.3167600E-04,0.3373656E-04,          
     &0.3592171E-04,0.3823762E-04,0.4069049E-04,0.4328652E-04,          
     &0.4603178E-04,0.4893216E-04,0.5199321E-04,0.5521997E-04,          
     &0.5861684E-04,0.6218733E-04,0.6593377E-04,0.6985709E-04,          
     &0.7395635E-04,0.7822841E-04,0.8266747E-04,0.8726451E-04,          
     &0.9200671E-04,0.9687686E-04,0.1018526E-03,0.1069059E-03,          
     &0.1120021E-03,0.1170991E-03,0.1221470E-03,0.1270870E-03,          
     &0.1318506E-03,0.1363590E-03,0.1405221E-03,0.1442375E-03,          
     &0.1473891E-03,0.1498454E-03,0.1514582E-03,0.1520600E-03,          
     &0.1514643E-03,0.1494660E-03,0.1458486E-03,0.1403986E-03,          
     &0.1329313E-03,0.1233322E-03,0.1116113E-03,0.9796264E-04,          
     &0.8281183E-04,0.6682307E-04,0.5084113E-04,0.3576669E-04,          
     &0.2303025E-04,0.1323564E-04,0.6396709E-05,0.0000000E+00/          
      data fgd17/                                                       
     &0.1297689E-05,0.1391771E-05,0.1492525E-05,0.1600410E-05,          
     &0.1715916E-05,0.1839568E-05,0.1971921E-05,0.2113572E-05,          
     &0.2265153E-05,0.2427340E-05,0.2600851E-05,0.2786454E-05,          
     &0.2984964E-05,0.3197249E-05,0.3424236E-05,0.3666907E-05,          
     &0.3926312E-05,0.4203564E-05,0.4499849E-05,0.4816429E-05,          
     &0.5154645E-05,0.5515921E-05,0.5901774E-05,0.6313814E-05,          
     &0.6753751E-05,0.7223401E-05,0.7724694E-05,0.8259678E-05,          
     &0.8830526E-05,0.9439544E-05,0.1008918E-04,0.1078201E-04,          
     &0.1152081E-04,0.1230846E-04,0.1314806E-04,0.1404287E-04,          
     &0.1499633E-04,0.1601209E-04,0.1709399E-04,0.1824611E-04,          
     &0.1947271E-04,0.2077832E-04,0.2216766E-04,0.2364574E-04,          
     &0.2521776E-04,0.2688919E-04,0.2866575E-04,0.3055338E-04,          
     &0.3255826E-04,0.3468676E-04,0.3694548E-04,0.3934116E-04,          
     &0.4188068E-04,0.4457099E-04,0.4741904E-04,0.5043174E-04,          
     &0.5361581E-04,0.5697770E-04,0.6052339E-04,0.6425826E-04,          
     &0.6818683E-04,0.7231253E-04,0.7663738E-04,0.8116161E-04,          
     &0.8588332E-04,0.9079789E-04,0.9589759E-04,0.1011709E-03,          
     &0.1066017E-03,0.1121691E-03,0.1178458E-03,0.1235982E-03,          
     &0.1293850E-03,0.1351566E-03,0.1408540E-03,0.1464086E-03,          
     &0.1517405E-03,0.1567583E-03,0.1613580E-03,0.1654214E-03,          
     &0.1688153E-03,0.1713894E-03,0.1729746E-03,0.1733810E-03,          
     &0.1723972E-03,0.1697925E-03,0.1653243E-03,0.1587545E-03,          
     &0.1498802E-03,0.1385797E-03,0.1248759E-03,0.1090064E-03,          
     &0.9148131E-04,0.7309861E-04,0.5488273E-04,0.3793867E-04,          
     &0.2347929E-04,0.1288406E-04,0.5908653E-05,0.0000000E+00/          
      data fgd18/                                                       
     &0.1496046E-05,0.1604213E-05,0.1720032E-05,0.1844029E-05,          
     &0.1976766E-05,0.2118841E-05,0.2270891E-05,0.2433599E-05,          
     &0.2607688E-05,0.2793932E-05,0.2993152E-05,0.3206226E-05,          
     &0.3434086E-05,0.3677727E-05,0.3938207E-05,0.4216651E-05,          
     &0.4514258E-05,0.4832302E-05,0.5172139E-05,0.5535211E-05,          
     &0.5923050E-05,0.6337287E-05,0.6779654E-05,0.7251990E-05,          
     &0.7756250E-05,0.8294509E-05,0.8868972E-05,0.9481978E-05,          
     &0.1013601E-04,0.1083369E-04,0.1157783E-04,0.1237136E-04,          
     &0.1321744E-04,0.1411938E-04,0.1508068E-04,0.1610507E-04,          
     &0.1719648E-04,0.1835905E-04,0.1959716E-04,0.2091542E-04,          
     &0.2231872E-04,0.2381216E-04,0.2540113E-04,0.2709127E-04,          
     &0.2888849E-04,0.3079898E-04,0.3282917E-04,0.3498578E-04,          
     &0.3727575E-04,0.3970625E-04,0.4228465E-04,0.4501849E-04,          
     &0.4791543E-04,0.5098318E-04,0.5422942E-04,0.5766174E-04,          
     &0.6128747E-04,0.6511357E-04,0.6914644E-04,0.7339172E-04,          
     &0.7785401E-04,0.8253659E-04,0.8744107E-04,0.9256698E-04,          
     &0.9791130E-04,0.1034679E-03,0.1092270E-03,0.1151744E-03,          
     &0.1212908E-03,0.1275512E-03,0.1339236E-03,0.1403686E-03,          
     &0.1468381E-03,0.1532747E-03,0.1596107E-03,0.1657672E-03,          
     &0.1716531E-03,0.1771642E-03,0.1821824E-03,0.1865742E-03,          
     &0.1901892E-03,0.1928583E-03,0.1943919E-03,0.1945777E-03,          
     &0.1931804E-03,0.1899442E-03,0.1846014E-03,0.1768912E-03,          
     &0.1665938E-03,0.1535830E-03,0.1378968E-03,0.1198183E-03,          
     &0.9994344E-04,0.7920320E-04,0.5879873E-04,0.4003340E-04,          
     &0.2407935E-04,0.1251358E-04,0.5422649E-05,0.0000000E+00/          
      data fgd19/                                                       
     &0.1697903E-05,0.1820381E-05,0.1951505E-05,0.2091868E-05,          
     &0.2242105E-05,0.2402891E-05,0.2574944E-05,0.2759032E-05,          
     &0.2955973E-05,0.3166638E-05,0.3391954E-05,0.3632910E-05,          
     &0.3890557E-05,0.4166016E-05,0.4460479E-05,0.4775216E-05,          
     &0.5111575E-05,0.5470994E-05,0.5855001E-05,0.6265219E-05,          
     &0.6703376E-05,0.7171307E-05,0.7670963E-05,0.8204416E-05,          
     &0.8773867E-05,0.9381652E-05,0.1003025E-04,0.1072230E-04,          
     &0.1146059E-04,0.1224809E-04,0.1308792E-04,0.1398342E-04,          
     &0.1493811E-04,0.1595572E-04,0.1704020E-04,0.1819571E-04,          
     &0.1942668E-04,0.2073775E-04,0.2213383E-04,0.2362010E-04,          
     &0.2520202E-04,0.2688530E-04,0.2867598E-04,0.3058035E-04,          
     &0.3260501E-04,0.3475687E-04,0.3704309E-04,0.3947112E-04,          
     &0.4204869E-04,0.4478373E-04,0.4768440E-04,0.5075901E-04,          
     &0.5401599E-04,0.5746378E-04,0.6111078E-04,0.6496523E-04,          
     &0.6903504E-04,0.7332764E-04,0.7784983E-04,0.8260744E-04,          
     &0.8760511E-04,0.9284594E-04,0.9833106E-04,0.1040592E-03,          
     &0.1100262E-03,0.1162243E-03,0.1226416E-03,0.1292612E-03,          
     &0.1360605E-03,0.1430102E-03,0.1500736E-03,0.1572052E-03,          
     &0.1643504E-03,0.1714438E-03,0.1784088E-03,0.1851561E-03,          
     &0.1915835E-03,0.1975739E-03,0.2029953E-03,0.2076985E-03,          
     &0.2115162E-03,0.2142607E-03,0.2157219E-03,0.2156657E-03,          
     &0.2138331E-03,0.2099441E-03,0.2037068E-03,0.1948389E-03,          
     &0.1831055E-03,0.1683774E-03,0.1507101E-03,0.1304336E-03,          
     &0.1082308E-03,0.8516494E-04,0.6261099E-04,0.4206541E-04,          
     &0.2486522E-04,0.1213132E-04,0.4940548E-05,0.0000000E+00/          
      data fgd20/                                                       
     &0.2110694E-05,0.2262376E-05,0.2424729E-05,0.2598484E-05,          
     &0.2784421E-05,0.2983370E-05,0.3196216E-05,0.3423902E-05,          
     &0.3667435E-05,0.3927885E-05,0.4206393E-05,0.4504172E-05,          
     &0.4822517E-05,0.5162805E-05,0.5526500E-05,0.5915160E-05,          
     &0.6330446E-05,0.6774119E-05,0.7248057E-05,0.7754255E-05,          
     &0.8294829E-05,0.8872036E-05,0.9488267E-05,0.1014606E-04,          
     &0.1084813E-04,0.1159732E-04,0.1239669E-04,0.1324945E-04,          
     &0.1415903E-04,0.1512905E-04,0.1616335E-04,0.1726601E-04,          
     &0.1844133E-04,0.1969387E-04,0.2102844E-04,0.2245015E-04,          
     &0.2396436E-04,0.2557675E-04,0.2729329E-04,0.2912029E-04,          
     &0.3106435E-04,0.3313244E-04,0.3533183E-04,0.3767017E-04,          
     &0.4015541E-04,0.4279587E-04,0.4560017E-04,0.4857724E-04,          
     &0.5173633E-04,0.5508688E-04,0.5863860E-04,0.6240132E-04,          
     &0.6638494E-04,0.7059934E-04,0.7505428E-04,0.7975923E-04,          
     &0.8472319E-04,0.8995450E-04,0.9546056E-04,0.1012475E-03,          
     &0.1073200E-03,0.1136806E-03,0.1203293E-03,0.1272631E-03,          
     &0.1344753E-03,0.1419548E-03,0.1496852E-03,0.1576439E-03,          
     &0.1658015E-03,0.1741202E-03,0.1825532E-03,0.1910432E-03,          
     &0.1995216E-03,0.2079072E-03,0.2161052E-03,0.2240060E-03,          
     &0.2314843E-03,0.2383977E-03,0.2445859E-03,0.2498688E-03,          
     &0.2540454E-03,0.2568910E-03,0.2581554E-03,0.2575612E-03,          
     &0.2548041E-03,0.2495566E-03,0.2414811E-03,0.2302557E-03,          
     &0.2156193E-03,0.1974415E-03,0.1758173E-03,0.1511752E-03,          
     &0.1243737E-03,0.9673845E-04,0.6998457E-04,0.4598076E-04,          
     &0.2637520E-04,0.1220664E-04,0.3992263E-05,0.0000000E+00/          
      data fgd21/                                                       
     &0.2533809E-05,0.2715358E-05,0.2909644E-05,0.3117538E-05,          
     &0.3339968E-05,0.3577922E-05,0.3832454E-05,0.4104687E-05,          
     &0.4395818E-05,0.4707121E-05,0.5039952E-05,0.5395757E-05,          
     &0.5776074E-05,0.6182540E-05,0.6616896E-05,0.7080997E-05,          
     &0.7576813E-05,0.8106441E-05,0.8672110E-05,0.9276190E-05,          
     &0.9921198E-05,0.1060981E-04,0.1134487E-04,0.1212939E-04,          
     &0.1296658E-04,0.1385984E-04,0.1481277E-04,0.1582919E-04,          
     &0.1691317E-04,0.1806900E-04,0.1930123E-04,0.2061468E-04,          
     &0.2201445E-04,0.2350592E-04,0.2509480E-04,0.2678711E-04,          
     &0.2858918E-04,0.3050772E-04,0.3254977E-04,0.3472275E-04,          
     &0.3703445E-04,0.3949303E-04,0.4210706E-04,0.4488549E-04,          
     &0.4783764E-04,0.5097321E-04,0.5430229E-04,0.5783526E-04,          
     &0.6158285E-04,0.6555603E-04,0.6976599E-04,0.7422402E-04,          
     &0.7894148E-04,0.8392964E-04,0.8919954E-04,0.9476180E-04,          
     &0.1006264E-03,0.1068026E-03,0.1132981E-03,0.1201195E-03,          
     &0.1272710E-03,0.1347546E-03,0.1425691E-03,0.1507095E-03,          
     &0.1591665E-03,0.1679252E-03,0.1769645E-03,0.1862562E-03,          
     &0.1957635E-03,0.2054399E-03,0.2152283E-03,0.2250594E-03,          
     &0.2348504E-03,0.2445040E-03,0.2539071E-03,0.2629295E-03,          
     &0.2714227E-03,0.2792191E-03,0.2861300E-03,0.2919448E-03,          
     &0.2964286E-03,0.2993203E-03,0.3003304E-03,0.2991393E-03,          
     &0.2953982E-03,0.2887348E-03,0.2787684E-03,0.2651410E-03,          
     &0.2475695E-03,0.2259278E-03,0.2003554E-03,0.1713837E-03,          
     &0.1400487E-03,0.1079361E-03,0.7709197E-04,0.4974156E-04,          
     &0.2782361E-04,0.1246843E-04,0.3673345E-05,0.0000000E+00/          
      data fgd22/                                                       
     &0.2965667E-05,0.3177641E-05,0.3404454E-05,0.3647117E-05,          
     &0.3906709E-05,0.4184380E-05,0.4481352E-05,0.4798932E-05,          
     &0.5138510E-05,0.5501566E-05,0.5889676E-05,0.6304519E-05,          
     &0.6747880E-05,0.7221660E-05,0.7727883E-05,0.8268699E-05,          
     &0.8846397E-05,0.9463409E-05,0.1012232E-04,0.1082589E-04,          
     &0.1157702E-04,0.1237883E-04,0.1323460E-04,0.1414785E-04,          
     &0.1512227E-04,0.1616181E-04,0.1727065E-04,0.1845322E-04,          
     &0.1971421E-04,0.2105859E-04,0.2249163E-04,0.2401890E-04,          
     &0.2564630E-04,0.2738006E-04,0.2922676E-04,0.3119334E-04,          
     &0.3328712E-04,0.3551583E-04,0.3788758E-04,0.4041092E-04,          
     &0.4309479E-04,0.4594860E-04,0.4898217E-04,0.5220575E-04,          
     &0.5563002E-04,0.5926610E-04,0.6312547E-04,0.6721998E-04,          
     &0.7156183E-04,0.7616346E-04,0.8103752E-04,0.8619678E-04,          
     &0.9165396E-04,0.9742169E-04,0.1035122E-03,0.1099373E-03,          
     &0.1167078E-03,0.1238337E-03,0.1313232E-03,0.1391829E-03,          
     &0.1474167E-03,0.1560259E-03,0.1650077E-03,0.1743552E-03,          
     &0.1840561E-03,0.1940918E-03,0.2044365E-03,0.2150556E-03,          
     &0.2259050E-03,0.2369294E-03,0.2480611E-03,0.2592185E-03,          
     &0.2703046E-03,0.2812058E-03,0.2917904E-03,0.3019076E-03,          
     &0.3113858E-03,0.3200318E-03,0.3276289E-03,0.3339357E-03,          
     &0.3386840E-03,0.3415767E-03,0.3422853E-03,0.3404489E-03,          
     &0.3356758E-03,0.3275503E-03,0.3156509E-03,0.2995862E-03,          
     &0.2790553E-03,0.2539399E-03,0.2244287E-03,0.1911592E-03,          
     &0.1553460E-03,0.1188325E-03,0.8398823E-04,0.5338175E-04,          
     &0.2922545E-04,0.1272602E-04,0.3639504E-05,0.0000000E+00/          
      data fgd23/                                                       
     &0.3405092E-05,0.3647976E-05,0.3907828E-05,0.4185806E-05,          
     &0.4483139E-05,0.4801139E-05,0.5141203E-05,0.5504820E-05,          
     &0.5893578E-05,0.6309163E-05,0.6753376E-05,0.7228129E-05,          
     &0.7735459E-05,0.8277534E-05,0.8856661E-05,0.9475291E-05,          
     &0.1013603E-04,0.1084166E-04,0.1159512E-04,0.1239955E-04,          
     &0.1325826E-04,0.1417480E-04,0.1515292E-04,0.1619660E-04,          
     &0.1731007E-04,0.1849781E-04,0.1976457E-04,0.2111540E-04,          
     &0.2255563E-04,0.2409091E-04,0.2572724E-04,0.2747094E-04,          
     &0.2932870E-04,0.3130760E-04,0.3341511E-04,0.3565910E-04,          
     &0.3804788E-04,0.4059018E-04,0.4329521E-04,0.4617263E-04,          
     &0.4923255E-04,0.5248560E-04,0.5594286E-04,0.5961589E-04,          
     &0.6351673E-04,0.6765786E-04,0.7205219E-04,0.7671301E-04,          
     &0.8165397E-04,0.8688896E-04,0.9243208E-04,0.9829750E-04,          
     &0.1044993E-03,0.1110515E-03,0.1179674E-03,0.1252598E-03,          
     &0.1329406E-03,0.1410202E-03,0.1495073E-03,0.1584084E-03,          
     &0.1677272E-03,0.1774638E-03,0.1876141E-03,0.1981689E-03,          
     &0.2091129E-03,0.2204235E-03,0.2320699E-03,0.2440114E-03,          
     &0.2561962E-03,0.2685600E-03,0.2810244E-03,0.2934953E-03,          
     &0.3058613E-03,0.3179924E-03,0.3297383E-03,0.3409274E-03,          
     &0.3513649E-03,0.3608319E-03,0.3690839E-03,0.3758489E-03,          
     &0.3808256E-03,0.3836809E-03,0.3840483E-03,0.3815262E-03,          
     &0.3756809E-03,0.3660548E-03,0.3521876E-03,0.3336572E-03,          
     &0.3101475E-03,0.2815519E-03,0.2481111E-03,0.2105718E-03,          
     &0.1703282E-03,0.1294790E-03,0.9071060E-04,0.5692365E-04,          
     &0.3058998E-04,0.1298040E-04,0.3607952E-05,0.0000000E+00/          
      data fgd24/                                                       
     &0.3851182E-05,0.4125399E-05,0.4418743E-05,0.4732513E-05,          
     &0.5068095E-05,0.5426964E-05,0.5810691E-05,0.6220953E-05,          
     &0.6659533E-05,0.7128330E-05,0.7629368E-05,0.8164797E-05,          
     &0.8736908E-05,0.9348138E-05,0.1000108E-04,0.1069849E-04,          
     &0.1144329E-04,0.1223861E-04,0.1308776E-04,0.1399425E-04,          
     &0.1496182E-04,0.1599445E-04,0.1709633E-04,0.1827195E-04,          
     &0.1952605E-04,0.2086365E-04,0.2229010E-04,0.2381104E-04,          
     &0.2543246E-04,0.2716070E-04,0.2900247E-04,0.3096485E-04,          
     &0.3305536E-04,0.3528189E-04,0.3765282E-04,0.4017696E-04,          
     &0.4286358E-04,0.4572246E-04,0.4876388E-04,0.5199860E-04,          
     &0.5543793E-04,0.5909371E-04,0.6297826E-04,0.6710446E-04,          
     &0.7148569E-04,0.7613582E-04,0.8106913E-04,0.8630037E-04,          
     &0.9184460E-04,0.9771717E-04,0.1039336E-03,0.1105094E-03,          
     &0.1174601E-03,0.1248008E-03,0.1325461E-03,0.1407098E-03,          
     &0.1493044E-03,0.1583411E-03,0.1678289E-03,0.1777741E-03,          
     &0.1881799E-03,0.1990454E-03,0.2103650E-03,0.2221270E-03,          
     &0.2343131E-03,0.2468967E-03,0.2598416E-03,0.2731008E-03,          
     &0.2866150E-03,0.3003106E-03,0.3140983E-03,0.3278713E-03,          
     &0.3415038E-03,0.3548492E-03,0.3677387E-03,0.3799794E-03,          
     &0.3913536E-03,0.4016170E-03,0.4104968E-03,0.4176906E-03,          
     &0.4228643E-03,0.4256493E-03,0.4256412E-03,0.4223987E-03,          
     &0.4154469E-03,0.4042876E-03,0.3884235E-03,0.3674037E-03,          
     &0.3408996E-03,0.3088191E-03,0.2714581E-03,0.2296745E-03,          
     &0.1850425E-03,0.1399143E-03,0.9728736E-04,0.6038471E-04,          
     &0.3192553E-04,0.1323446E-04,0.3580656E-05,0.0000000E+00/          
      data fgd25/                                                       
     &0.6160539E-05,0.6596443E-05,0.7062567E-05,0.7560951E-05,          
     &0.8093770E-05,0.8663341E-05,0.9272127E-05,0.9922757E-05,          
     &0.1061803E-04,0.1136092E-04,0.1215459E-04,0.1300241E-04,          
     &0.1390797E-04,0.1487508E-04,0.1590779E-04,0.1701040E-04,          
     &0.1818751E-04,0.1944395E-04,0.2078492E-04,0.2221589E-04,          
     &0.2374268E-04,0.2537147E-04,0.2710882E-04,0.2896169E-04,          
     &0.3093743E-04,0.3304388E-04,0.3528929E-04,0.3768242E-04,          
     &0.4023255E-04,0.4294947E-04,0.4584355E-04,0.4892573E-04,          
     &0.5220756E-04,0.5570122E-04,0.5941955E-04,0.6337606E-04,          
     &0.6758497E-04,0.7206119E-04,0.7682039E-04,0.8187895E-04,          
     &0.8725400E-04,0.9296344E-04,0.9902586E-04,0.1054606E-03,          
     &0.1122877E-03,0.1195277E-03,0.1272019E-03,0.1353320E-03,          
     &0.1439400E-03,0.1530483E-03,0.1626791E-03,0.1728548E-03,          
     &0.1835969E-03,0.1949265E-03,0.2068634E-03,0.2194259E-03,          
     &0.2326299E-03,0.2464887E-03,0.2610119E-03,0.2762045E-03,          
     &0.2920664E-03,0.3085904E-03,0.3257616E-03,0.3435556E-03,          
     &0.3619369E-03,0.3808569E-03,0.4002523E-03,0.4200429E-03,          
     &0.4401289E-03,0.4603892E-03,0.4806787E-03,0.5008261E-03,          
     &0.5206315E-03,0.5398643E-03,0.5582612E-03,0.5755244E-03,          
     &0.5913197E-03,0.6052750E-03,0.6169789E-03,0.6259783E-03,          
     &0.6317768E-03,0.6338327E-03,0.6315582E-03,0.6243209E-03,          
     &0.6114517E-03,0.5922643E-03,0.5660956E-03,0.5323755E-03,          
     &0.4907422E-03,0.4412074E-03,0.3843735E-03,0.3216769E-03,          
     &0.2555977E-03,0.1897285E-03,0.1285551E-03,0.7680212E-04,          
     &0.3829072E-04,0.1450474E-04,0.3492088E-05,0.0000000E+00/          
      data fgd26/                                                       
     &0.8567631E-05,0.9171411E-05,0.9816879E-05,0.1050684E-04,          
     &0.1124428E-04,0.1203239E-04,0.1287454E-04,0.1377433E-04,          
     &0.1473562E-04,0.1576247E-04,0.1685924E-04,0.1803053E-04,          
     &0.1928126E-04,0.2061665E-04,0.2204225E-04,0.2356395E-04,          
     &0.2518802E-04,0.2692110E-04,0.2877026E-04,0.3074300E-04,          
     &0.3284726E-04,0.3509149E-04,0.3748462E-04,0.4003615E-04,          
     &0.4275611E-04,0.4565514E-04,0.4874450E-04,0.5203611E-04,          
     &0.5554256E-04,0.5927717E-04,0.6325400E-04,0.6748787E-04,          
     &0.7199444E-04,0.7679017E-04,0.8189245E-04,0.8731948E-04,          
     &0.9309043E-04,0.9922539E-04,0.1057454E-03,0.1126724E-03,          
     &0.1200295E-03,0.1278404E-03,0.1361300E-03,0.1449240E-03,          
     &0.1542489E-03,0.1641320E-03,0.1746013E-03,0.1856852E-03,          
     &0.1974126E-03,0.2098124E-03,0.2229133E-03,0.2367440E-03,          
     &0.2513318E-03,0.2667031E-03,0.2828823E-03,0.2998914E-03,          
     &0.3177490E-03,0.3364696E-03,0.3560625E-03,0.3765303E-03,          
     &0.3978681E-03,0.4200614E-03,0.4430845E-03,0.4668986E-03,          
     &0.4914494E-03,0.5166648E-03,0.5424526E-03,0.5686969E-03,          
     &0.5952563E-03,0.6219600E-03,0.6486055E-03,0.6749550E-03,          
     &0.7007330E-03,0.7256238E-03,0.7492686E-03,0.7712636E-03,          
     &0.7911585E-03,0.8084540E-03,0.8226009E-03,0.8329978E-03,          
     &0.8389899E-03,0.8398677E-03,0.8348672E-03,0.8231753E-03,          
     &0.8039425E-03,0.7763130E-03,0.7394806E-03,0.6927857E-03,          
     &0.6358664E-03,0.5688742E-03,0.4927521E-03,0.4095379E-03,          
     &0.3226187E-03,0.2367930E-03,0.1579537E-03,0.9219818E-04,          
     &0.4429619E-04,0.1577093E-04,0.3455960E-05,0.0000000E+00/          
      data fgd27/                                                       
     &0.8689506E-05,0.9301772E-05,0.9956307E-05,0.1065595E-04,          
     &0.1140374E-04,0.1220288E-04,0.1305682E-04,0.1396921E-04,          
     &0.1494393E-04,0.1598512E-04,0.1709720E-04,0.1828482E-04,          
     &0.1955298E-04,0.2090697E-04,0.2235239E-04,0.2389525E-04,          
     &0.2554187E-04,0.2729900E-04,0.2917381E-04,0.3117387E-04,          
     &0.3330726E-04,0.3558253E-04,0.3800873E-04,0.4059548E-04,          
     &0.4335296E-04,0.4629194E-04,0.4942383E-04,0.5276072E-04,          
     &0.5631535E-04,0.6010122E-04,0.6413258E-04,0.6842444E-04,          
     &0.7299267E-04,0.7785395E-04,0.8302587E-04,0.8852690E-04,          
     &0.9437643E-04,0.1005948E-03,0.1072034E-03,0.1142243E-03,          
     &0.1216810E-03,0.1295975E-03,0.1379990E-03,0.1469115E-03,          
     &0.1563618E-03,0.1663776E-03,0.1769872E-03,0.1882193E-03,          
     &0.2001030E-03,0.2126678E-03,0.2259427E-03,0.2399563E-03,          
     &0.2547367E-03,0.2703103E-03,0.2867017E-03,0.3039332E-03,          
     &0.3220233E-03,0.3409868E-03,0.3608326E-03,0.3815636E-03,          
     &0.4031744E-03,0.4256502E-03,0.4489646E-03,0.4730781E-03,          
     &0.4979355E-03,0.5234634E-03,0.5495682E-03,0.5761322E-03,          
     &0.6030118E-03,0.6300338E-03,0.6569927E-03,0.6836474E-03,          
     &0.7097187E-03,0.7348865E-03,0.7587873E-03,0.7810120E-03,          
     &0.8011045E-03,0.8185592E-03,0.8328200E-03,0.8432783E-03,          
     &0.8492715E-03,0.8500816E-03,0.8449364E-03,0.8330136E-03,          
     &0.8134552E-03,0.7853973E-03,0.7480272E-03,0.7006812E-03,          
     &0.6429980E-03,0.5751370E-03,0.4980586E-03,0.4138311E-03,          
     &0.3258864E-03,0.2390827E-03,0.1593811E-03,0.9294490E-04,          
     &0.4458812E-04,0.1583373E-04,0.3455089E-05,0.0000000E+00/          
      data fgd28/                                                       
     &0.8689926E-05,0.9302223E-05,0.9956789E-05,0.1065647E-04,          
     &0.1140429E-04,0.1220347E-04,0.1305745E-04,0.1396988E-04,          
     &0.1494465E-04,0.1598590E-04,0.1709803E-04,0.1828571E-04,          
     &0.1955393E-04,0.2090798E-04,0.2235349E-04,0.2389641E-04,          
     &0.2554312E-04,0.2730034E-04,0.2917523E-04,0.3117540E-04,          
     &0.3330890E-04,0.3558427E-04,0.3801060E-04,0.4059748E-04,          
     &0.4335509E-04,0.4629422E-04,0.4942627E-04,0.5276332E-04,          
     &0.5631813E-04,0.6010419E-04,0.6413574E-04,0.6842783E-04,          
     &0.7299628E-04,0.7785781E-04,0.8302999E-04,0.8853129E-04,          
     &0.9438112E-04,0.1005998E-03,0.1072087E-03,0.1142300E-03,          
     &0.1216871E-03,0.1296040E-03,0.1380059E-03,0.1469188E-03,          
     &0.1563696E-03,0.1663859E-03,0.1769960E-03,0.1882287E-03,          
     &0.2001131E-03,0.2126785E-03,0.2259540E-03,0.2399684E-03,          
     &0.2547496E-03,0.2703239E-03,0.2867162E-03,0.3039485E-03,          
     &0.3220396E-03,0.3410040E-03,0.3608509E-03,0.3815830E-03,          
     &0.4031949E-03,0.4256718E-03,0.4489874E-03,0.4731021E-03,          
     &0.4979608E-03,0.5234901E-03,0.5495962E-03,0.5761615E-03,          
     &0.6030425E-03,0.6300660E-03,0.6570262E-03,0.6836823E-03,          
     &0.7097549E-03,0.7349240E-03,0.7588260E-03,0.7810519E-03,          
     &0.8011453E-03,0.8186009E-03,0.8328624E-03,0.8433212E-03,          
     &0.8493147E-03,0.8501248E-03,0.8449793E-03,0.8330558E-03,          
     &0.8134963E-03,0.7854369E-03,0.7480648E-03,0.7007164E-03,          
     &0.6430302E-03,0.5751657E-03,0.4980832E-03,0.4138514E-03,          
     &0.3259022E-03,0.2390941E-03,0.1593885E-03,0.9294891E-04,          
     &0.4458982E-04,0.1583419E-04,0.3455131E-05,0.0000000E+00/          
      data fgd29/                                                       
     &0.8690348E-05,0.9302674E-05,0.9957273E-05,0.1065699E-04,          
     &0.1140484E-04,0.1220407E-04,0.1305809E-04,0.1397056E-04,          
     &0.1494538E-04,0.1598668E-04,0.1709886E-04,0.1828661E-04,          
     &0.1955489E-04,0.2090901E-04,0.2235458E-04,0.2389758E-04,          
     &0.2554437E-04,0.2730168E-04,0.2917666E-04,0.3117693E-04,          
     &0.3331053E-04,0.3558602E-04,0.3801247E-04,0.4059947E-04,          
     &0.4335722E-04,0.4629650E-04,0.4942871E-04,0.5276592E-04,          
     &0.5632091E-04,0.6010716E-04,0.6413891E-04,0.6843121E-04,          
     &0.7299990E-04,0.7786167E-04,0.8303411E-04,0.8853569E-04,          
     &0.9438581E-04,0.1006048E-03,0.1072140E-03,0.1142357E-03,          
     &0.1216931E-03,0.1296104E-03,0.1380128E-03,0.1469262E-03,          
     &0.1563775E-03,0.1663943E-03,0.1770049E-03,0.1882381E-03,          
     &0.2001231E-03,0.2126892E-03,0.2259654E-03,0.2399805E-03,          
     &0.2547624E-03,0.2703376E-03,0.2867307E-03,0.3039639E-03,          
     &0.3220559E-03,0.3410213E-03,0.3608692E-03,0.3816024E-03,          
     &0.4032154E-03,0.4256934E-03,0.4490102E-03,0.4731262E-03,          
     &0.4979861E-03,0.5235167E-03,0.5496241E-03,0.5761909E-03,          
     &0.6030732E-03,0.6300980E-03,0.6570597E-03,0.6837171E-03,          
     &0.7097911E-03,0.7349614E-03,0.7588646E-03,0.7810916E-03,          
     &0.8011861E-03,0.8186425E-03,0.8329047E-03,0.8433640E-03,          
     &0.8493577E-03,0.8501679E-03,0.8450220E-03,0.8330979E-03,          
     &0.8135375E-03,0.7854765E-03,0.7481025E-03,0.7007516E-03,          
     &0.6430623E-03,0.5751944E-03,0.4981079E-03,0.4138717E-03,          
     &0.3259181E-03,0.2391055E-03,0.1593958E-03,0.9295294E-04,          
     &0.4459154E-04,0.1583465E-04,0.3455175E-05,0.0000000E+00/          
      data fgd30/                                                       
     &0.1105044E-04,0.1182674E-04,0.1265647E-04,0.1354321E-04,          
     &0.1449078E-04,0.1550322E-04,0.1658487E-04,0.1774032E-04,          
     &0.1897446E-04,0.2029251E-04,0.2170000E-04,0.2320280E-04,          
     &0.2480719E-04,0.2651980E-04,0.2834771E-04,0.3029841E-04,          
     &0.3237987E-04,0.3460057E-04,0.3696948E-04,0.3949611E-04,          
     &0.4219059E-04,0.4506363E-04,0.4812657E-04,0.5139146E-04,          
     &0.5487103E-04,0.5857877E-04,0.6252894E-04,0.6673664E-04,          
     &0.7121780E-04,0.7598926E-04,0.8106879E-04,0.8647513E-04,          
     &0.9222802E-04,0.9834824E-04,0.1048576E-03,0.1117792E-03,          
     &0.1191370E-03,0.1269562E-03,0.1352633E-03,0.1440858E-03,          
     &0.1534523E-03,0.1633928E-03,0.1739382E-03,0.1851204E-03,          
     &0.1969724E-03,0.2095281E-03,0.2228217E-03,0.2368886E-03,          
     &0.2517640E-03,0.2674832E-03,0.2840813E-03,0.3015926E-03,          
     &0.3200502E-03,0.3394853E-03,0.3599264E-03,0.3813987E-03,          
     &0.4039229E-03,0.4275142E-03,0.4521808E-03,0.4779225E-03,          
     &0.5047286E-03,0.5325763E-03,0.5614287E-03,0.5912312E-03,          
     &0.6219102E-03,0.6533689E-03,0.6854849E-03,0.7181064E-03,          
     &0.7510489E-03,0.7840911E-03,0.8169722E-03,0.8493875E-03,          
     &0.8809854E-03,0.9113645E-03,0.9400706E-03,0.9665944E-03,          
     &0.9903698E-03,0.1010772E-02,0.1027114E-02,0.1038651E-02,          
     &0.1044572E-02,0.1044003E-02,0.1036010E-02,0.1019607E-02,          
     &0.9937725E-03,0.9574936E-03,0.9098352E-03,0.8500645E-03,          
     &0.7778378E-03,0.6934654E-03,0.5982459E-03,0.4948269E-03,          
     &0.3874959E-03,0.2822308E-03,0.1862784E-03,0.1070317E-03,          
     &0.5012258E-04,0.1705252E-04,0.3456526E-05,0.0000000E+00/          
      data fgd31/                                                       
     &0.1359030E-04,0.1454268E-04,0.1556043E-04,0.1664793E-04,          
     &0.1780983E-04,0.1905108E-04,0.2037695E-04,0.2179306E-04,          
     &0.2330535E-04,0.2492019E-04,0.2664431E-04,0.2848487E-04,          
     &0.3044951E-04,0.3254632E-04,0.3478389E-04,0.3717136E-04,          
     &0.3971843E-04,0.4243538E-04,0.4533314E-04,0.4842328E-04,          
     &0.5171808E-04,0.5523055E-04,0.5897450E-04,0.6296451E-04,          
     &0.6721605E-04,0.7174547E-04,0.7657007E-04,0.8170812E-04,          
     &0.8717895E-04,0.9300291E-04,0.9920151E-04,0.1057974E-03,          
     &0.1128145E-03,0.1202777E-03,0.1282137E-03,0.1366498E-03,          
     &0.1456153E-03,0.1551405E-03,0.1652570E-03,0.1759980E-03,          
     &0.1873979E-03,0.1994925E-03,0.2123187E-03,0.2259148E-03,          
     &0.2403200E-03,0.2555745E-03,0.2717193E-03,0.2887960E-03,          
     &0.3068461E-03,0.3259114E-03,0.3460329E-03,0.3672505E-03,          
     &0.3896024E-03,0.4131246E-03,0.4378493E-03,0.4638046E-03,          
     &0.4910128E-03,0.5194892E-03,0.5492405E-03,0.5802627E-03,          
     &0.6125392E-03,0.6460383E-03,0.6807102E-03,0.7164849E-03,          
     &0.7532677E-03,0.7909367E-03,0.8293384E-03,0.8682840E-03,          
     &0.9075449E-03,0.9468489E-03,0.9858756E-03,0.1024253E-02,          
     &0.1061552E-02,0.1097286E-02,0.1130905E-02,0.1161794E-02,          
     &0.1189271E-02,0.1212585E-02,0.1230917E-02,0.1243375E-02,          
     &0.1248996E-02,0.1246747E-02,0.1235526E-02,0.1214181E-02,          
     &0.1181526E-02,0.1136401E-02,0.1077755E-02,0.1004795E-02,          
     &0.9172143E-03,0.8154974E-03,0.7013135E-03,0.5779286E-03,          
     &0.4505271E-03,0.3262446E-03,0.2136382E-03,0.1213323E-03,          
     &0.5574854E-04,0.1831413E-04,0.3474916E-05,0.0000000E+00/          
      data fgd32/                                                       
     &0.1617633E-04,0.1730765E-04,0.1851646E-04,0.1980794E-04,          
     &0.2118758E-04,0.2266125E-04,0.2423516E-04,0.2591596E-04,          
     &0.2771067E-04,0.2962680E-04,0.3167232E-04,0.3385570E-04,          
     &0.3618592E-04,0.3867254E-04,0.4132571E-04,0.4415622E-04,          
     &0.4717549E-04,0.5039565E-04,0.5382959E-04,0.5749096E-04,          
     &0.6139422E-04,0.6555470E-04,0.6998864E-04,0.7471324E-04,          
     &0.7974668E-04,0.8510821E-04,0.9081816E-04,0.9689804E-04,          
     &0.1033705E-03,0.1102595E-03,0.1175903E-03,0.1253895E-03,          
     &0.1336850E-03,0.1425063E-03,0.1518841E-03,0.1618510E-03,          
     &0.1724409E-03,0.1836893E-03,0.1956331E-03,0.2083111E-03,          
     &0.2217633E-03,0.2360314E-03,0.2511583E-03,0.2671886E-03,          
     &0.2841676E-03,0.3021419E-03,0.3211590E-03,0.3412665E-03,          
     &0.3625125E-03,0.3849447E-03,0.4086100E-03,0.4335537E-03,          
     &0.4598190E-03,0.4874462E-03,0.5164710E-03,0.5469241E-03,          
     &0.5788291E-03,0.6122010E-03,0.6470444E-03,0.6833513E-03,          
     &0.7210984E-03,0.7602443E-03,0.8007265E-03,0.8424579E-03,          
     &0.8853230E-03,0.9291735E-03,0.9738244E-03,0.1019049E-02,          
     &0.1064574E-02,0.1110075E-02,0.1155173E-02,0.1199426E-02,          
     &0.1242329E-02,0.1283308E-02,0.1321717E-02,0.1356836E-02,          
     &0.1387868E-02,0.1413938E-02,0.1434091E-02,0.1447294E-02,          
     &0.1452431E-02,0.1448313E-02,0.1433677E-02,0.1407205E-02,          
     &0.1367558E-02,0.1313433E-02,0.1243673E-02,0.1157441E-02,          
     &0.1054475E-02,0.9354505E-03,0.8024178E-03,0.6592663E-03,          
     &0.5120742E-03,0.3691162E-03,0.2402248E-03,0.1352046E-03,          
     &0.6121018E-04,0.1955535E-04,0.3505303E-05,0.0000000E+00/          
      data fgd33/                                                       
     &0.1880113E-04,0.2011378E-04,0.2151620E-04,0.2301434E-04,          
     &0.2461458E-04,0.2632368E-04,0.2814882E-04,0.3009767E-04,          
     &0.3217837E-04,0.3439957E-04,0.3677047E-04,0.3930086E-04,          
     &0.4200109E-04,0.4488222E-04,0.4795594E-04,0.5123469E-04,          
     &0.5473166E-04,0.5846084E-04,0.6243707E-04,0.6667608E-04,          
     &0.7119455E-04,0.7601015E-04,0.8114156E-04,0.8660858E-04,          
     &0.9243216E-04,0.9863445E-04,0.1052388E-03,0.1122700E-03,          
     &0.1197541E-03,0.1277185E-03,0.1361923E-03,0.1452061E-03,          
     &0.1547918E-03,0.1649833E-03,0.1758159E-03,0.1873267E-03,          
     &0.1995547E-03,0.2125404E-03,0.2263262E-03,0.2409562E-03,          
     &0.2564761E-03,0.2729336E-03,0.2903775E-03,0.3088583E-03,          
     &0.3284279E-03,0.3491390E-03,0.3710452E-03,0.3942006E-03,          
     &0.4186593E-03,0.4444750E-03,0.4717002E-03,0.5003856E-03,          
     &0.5305792E-03,0.5623252E-03,0.5956629E-03,0.6306249E-03,          
     &0.6672359E-03,0.7055104E-03,0.7454506E-03,0.7870438E-03,          
     &0.8302598E-03,0.8750470E-03,0.9213296E-03,0.9690031E-03,          
     &0.1017930E-02,0.1067936E-02,0.1118803E-02,0.1170267E-02,          
     &0.1222008E-02,0.1273650E-02,0.1324754E-02,0.1374808E-02,          
     &0.1423231E-02,0.1469361E-02,0.1512458E-02,0.1551694E-02,          
     &0.1586158E-02,0.1614850E-02,0.1636684E-02,0.1650483E-02,          
     &0.1654985E-02,0.1648842E-02,0.1630635E-02,0.1598887E-02,          
     &0.1552107E-02,0.1488859E-02,0.1407888E-02,0.1308320E-02,          
     &0.1189952E-02,0.1053658E-02,0.9018796E-03,0.7391340E-03,          
     &0.5723886E-03,0.4110422E-03,0.2661724E-03,0.1487223E-03,          
     &0.6653410E-04,0.2077716E-04,0.3544204E-05,0.0000000E+00/          
      data fgd34/                                                       
     &0.2145917E-04,0.2295522E-04,0.2455341E-04,0.2626053E-04,          
     &0.2808379E-04,0.3003089E-04,0.3210998E-04,0.3432977E-04,          
     &0.3669950E-04,0.3922898E-04,0.4192867E-04,0.4480964E-04,          
     &0.4788368E-04,0.5116331E-04,0.5466179E-04,0.5839323E-04,          
     &0.6237257E-04,0.6661569E-04,0.7113940E-04,0.7596153E-04,          
     &0.8110096E-04,0.8657770E-04,0.9241293E-04,0.9862905E-04,          
     &0.1052498E-03,0.1123001E-03,0.1198066E-03,0.1277971E-03,          
     &0.1363011E-03,0.1453498E-03,0.1549758E-03,0.1652136E-03,          
     &0.1760995E-03,0.1876715E-03,0.1999696E-03,0.2130355E-03,          
     &0.2269130E-03,0.2416480E-03,0.2572879E-03,0.2738825E-03,          
     &0.2914832E-03,0.3101431E-03,0.3299175E-03,0.3508627E-03,          
     &0.3730366E-03,0.3964984E-03,0.4213077E-03,0.4475249E-03,          
     &0.4752102E-03,0.5044228E-03,0.5352211E-03,0.5676607E-03,          
     &0.6017944E-03,0.6376702E-03,0.6753305E-03,0.7148099E-03,          
     &0.7561337E-03,0.7993157E-03,0.8443553E-03,0.8912350E-03,          
     &0.9399169E-03,0.9903392E-03,0.1042412E-02,0.1096014E-02,          
     &0.1150984E-02,0.1207121E-02,0.1264174E-02,0.1321841E-02,          
     &0.1379756E-02,0.1437489E-02,0.1494541E-02,0.1550332E-02,          
     &0.1604201E-02,0.1655401E-02,0.1703094E-02,0.1746348E-02,          
     &0.1784138E-02,0.1815340E-02,0.1838733E-02,0.1853003E-02,          
     &0.1856739E-02,0.1848441E-02,0.1826532E-02,0.1789381E-02,          
     &0.1735351E-02,0.1662879E-02,0.1570618E-02,0.1457665E-02,          
     &0.1323885E-02,0.1170361E-02,0.9999314E-03,0.8177438E-03,          
     &0.6316516E-03,0.4521634E-03,0.2915770E-03,0.1619384E-03,          
     &0.7173962E-04,0.2198067E-04,0.3589323E-05,0.0000000E+00/          
      data fgd35/                                                       
     &0.2414621E-04,0.2582744E-04,0.2762329E-04,0.2954138E-04,          
     &0.3158979E-04,0.3377712E-04,0.3611253E-04,0.3860576E-04,          
     &0.4126715E-04,0.4410771E-04,0.4713912E-04,0.5037380E-04,          
     &0.5382493E-04,0.5750651E-04,0.6143341E-04,0.6562137E-04,          
     &0.7008715E-04,0.7484847E-04,0.7992415E-04,0.8533411E-04,          
     &0.9109947E-04,0.9724257E-04,0.1037871E-03,0.1107580E-03,          
     &0.1181819E-03,0.1260866E-03,0.1345018E-03,0.1434585E-03,          
     &0.1529898E-03,0.1631302E-03,0.1739162E-03,0.1853864E-03,          
     &0.1975809E-03,0.2105423E-03,0.2243150E-03,0.2389454E-03,          
     &0.2544824E-03,0.2709767E-03,0.2884813E-03,0.3070512E-03,          
     &0.3267435E-03,0.3476172E-03,0.3697333E-03,0.3931544E-03,          
     &0.4179445E-03,0.4441686E-03,0.4718929E-03,0.5011836E-03,          
     &0.5321067E-03,0.5647275E-03,0.5991096E-03,0.6353137E-03,          
     &0.6733971E-03,0.7134114E-03,0.7554019E-03,0.7994052E-03,          
     &0.8454468E-03,0.8935396E-03,0.9436798E-03,0.9958448E-03,          
     &0.1049989E-02,0.1106040E-02,0.1163893E-02,0.1223409E-02,          
     &0.1284404E-02,0.1346649E-02,0.1409862E-02,0.1473698E-02,          
     &0.1537748E-02,0.1601528E-02,0.1664476E-02,0.1725945E-02,          
     &0.1785195E-02,0.1841392E-02,0.1893602E-02,0.1940788E-02,          
     &0.1981810E-02,0.2015421E-02,0.2040269E-02,0.2054900E-02,          
     &0.2057757E-02,0.2047189E-02,0.2021466E-02,0.1978806E-02,          
     &0.1917427E-02,0.1835645E-02,0.1732028E-02,0.1605653E-02,          
     &0.1456458E-02,0.1285743E-02,0.1096748E-02,0.8952550E-03,          
     &0.6899988E-03,0.4925854E-03,0.3165104E-03,0.1748926E-03,          
     &0.7684142E-04,0.2316695E-04,0.3639094E-05,0.0000000E+00/          
      data fgd36/                                                       
     &0.2685886E-04,0.2872684E-04,0.3072203E-04,0.3285284E-04,          
     &0.3512825E-04,0.3755779E-04,0.4015160E-04,0.4292046E-04,          
     &0.4587585E-04,0.4902994E-04,0.5239566E-04,0.5598677E-04,          
     &0.5981787E-04,0.6390444E-04,0.6826295E-04,0.7291082E-04,          
     &0.7786658E-04,0.8314985E-04,0.8878143E-04,0.9478336E-04,          
     &0.1011790E-03,0.1079930E-03,0.1152516E-03,0.1229824E-03,          
     &0.1312147E-03,0.1399793E-03,0.1493089E-03,0.1592379E-03,          
     &0.1698027E-03,0.1810414E-03,0.1929943E-03,0.2057038E-03,          
     &0.2192145E-03,0.2335729E-03,0.2488281E-03,0.2650314E-03,          
     &0.2822363E-03,0.3004987E-03,0.3198769E-03,0.3404313E-03,          
     &0.3622247E-03,0.3853219E-03,0.4097896E-03,0.4356965E-03,          
     &0.4631126E-03,0.4921092E-03,0.5227582E-03,0.5551322E-03,          
     &0.5893029E-03,0.6253413E-03,0.6633161E-03,0.7032932E-03,          
     &0.7453340E-03,0.7894939E-03,0.8358208E-03,0.8843528E-03,          
     &0.9351159E-03,0.9881213E-03,0.1043362E-02,0.1100811E-02,          
     &0.1160413E-02,0.1222085E-02,0.1285709E-02,0.1351125E-02,          
     &0.1418128E-02,0.1486461E-02,0.1555807E-02,0.1625782E-02,          
     &0.1695931E-02,0.1765717E-02,0.1834515E-02,0.1901609E-02,          
     &0.1966181E-02,0.2027310E-02,0.2083966E-02,0.2135006E-02,          
     &0.2179176E-02,0.2215107E-02,0.2241317E-02,0.2256212E-02,          
     &0.2258091E-02,0.2245154E-02,0.2215519E-02,0.2167255E-02,          
     &0.2098442E-02,0.2007277E-02,0.1892251E-02,0.1752422E-02,          
     &0.1587814E-02,0.1399945E-02,0.1192466E-02,0.9717917E-03,          
     &0.7475356E-03,0.5323899E-03,0.3410284E-03,0.1876156E-03,          
     &0.8185106E-04,0.2433705E-04,0.3692405E-05,0.0000000E+00/          
      data fgd37/                                                       
     &0.2959437E-04,0.3165050E-04,0.3384649E-04,0.3619160E-04,          
     &0.3869566E-04,0.4136917E-04,0.4422322E-04,0.4726967E-04,          
     &0.5052111E-04,0.5399090E-04,0.5769324E-04,0.6164321E-04,          
     &0.6585683E-04,0.7035110E-04,0.7514405E-04,0.8025482E-04,          
     &0.8570371E-04,0.9151223E-04,0.9770320E-04,0.1043008E-03,          
     &0.1113305E-03,0.1188195E-03,0.1267964E-03,0.1352915E-03,          
     &0.1443368E-03,0.1539662E-03,0.1642153E-03,0.1751219E-03,          
     &0.1867257E-03,0.1990685E-03,0.2121943E-03,0.2261495E-03,          
     &0.2409827E-03,0.2567450E-03,0.2734897E-03,0.2912730E-03,          
     &0.3101533E-03,0.3301915E-03,0.3514511E-03,0.3739981E-03,          
     &0.3979008E-03,0.4232297E-03,0.4500576E-03,0.4784588E-03,          
     &0.5085095E-03,0.5402871E-03,0.5738695E-03,0.6093351E-03,          
     &0.6467616E-03,0.6862254E-03,0.7278006E-03,0.7715577E-03,          
     &0.8175624E-03,0.8658735E-03,0.9165415E-03,0.9696059E-03,          
     &0.1025093E-02,0.1083012E-02,0.1143353E-02,0.1206082E-02,          
     &0.1271138E-02,0.1338424E-02,0.1407808E-02,0.1479111E-02,          
     &0.1552106E-02,0.1626507E-02,0.1701962E-02,0.1778049E-02,          
     &0.1854264E-02,0.1930017E-02,0.2004622E-02,0.2077293E-02,          
     &0.2147134E-02,0.2213135E-02,0.2274171E-02,0.2328996E-02,          
     &0.2376239E-02,0.2414411E-02,0.2441899E-02,0.2456971E-02,          
     &0.2457783E-02,0.2442388E-02,0.2408754E-02,0.2354804E-02,          
     &0.2278482E-02,0.2177872E-02,0.2051390E-02,0.1898085E-02,          
     &0.1718067E-02,0.1513082E-02,0.1287194E-02,0.1047453E-02,          
     &0.8043459E-03,0.5716421E-03,0.3651752E-03,0.2001321E-03,          
     &0.8677783E-04,0.2549196E-04,0.3748454E-05,0.0000000E+00/          
      data fgd38/                                                       
     &0.3235044E-04,0.3459597E-04,0.3699410E-04,0.3955491E-04,          
     &0.4228912E-04,0.4520815E-04,0.4832410E-04,0.5164990E-04,          
     &0.5519923E-04,0.5898668E-04,0.6302768E-04,0.6733869E-04,          
     &0.7193712E-04,0.7684148E-04,0.8207142E-04,0.8764776E-04,          
     &0.9359259E-04,0.9992933E-04,0.1066828E-03,0.1138792E-03,          
     &0.1215465E-03,0.1297141E-03,0.1384130E-03,0.1476764E-03,          
     &0.1575389E-03,0.1680374E-03,0.1792106E-03,0.1910995E-03,          
     &0.2037472E-03,0.2171992E-03,0.2315033E-03,0.2467096E-03,          
     &0.2628712E-03,0.2800432E-03,0.2982837E-03,0.3176533E-03,          
     &0.3382155E-03,0.3600362E-03,0.3831842E-03,0.4077309E-03,          
     &0.4337501E-03,0.4613181E-03,0.4905133E-03,0.5214164E-03,          
     &0.5541092E-03,0.5886752E-03,0.6251984E-03,0.6637628E-03,          
     &0.7044521E-03,0.7473481E-03,0.7925300E-03,0.8400730E-03,          
     &0.8900468E-03,0.9425138E-03,0.9975266E-03,0.1055126E-02,          
     &0.1115339E-02,0.1178172E-02,0.1243612E-02,0.1311618E-02,          
     &0.1382122E-02,0.1455015E-02,0.1530149E-02,0.1607328E-02,          
     &0.1686299E-02,0.1766747E-02,0.1848289E-02,0.1930460E-02,          
     &0.2012711E-02,0.2094396E-02,0.2174769E-02,0.2252972E-02,          
     &0.2328031E-02,0.2398851E-02,0.2464209E-02,0.2522753E-02,          
     &0.2573002E-02,0.2613342E-02,0.2642032E-02,0.2657203E-02,          
     &0.2656869E-02,0.2638936E-02,0.2601225E-02,0.2541516E-02,          
     &0.2457620E-02,0.2347510E-02,0.2209533E-02,0.2042732E-02,          
     &0.1847311E-02,0.1625248E-02,0.1381021E-02,0.1122319E-02,          
     &0.8604983E-03,0.6103948E-03,0.3889869E-03,0.2124620E-03,          
     &0.9162939E-04,0.2663258E-04,0.3806640E-05,0.0000000E+00/          
      data fgd39/                                                       
     &0.3512515E-04,0.3756123E-04,0.4016269E-04,0.4294046E-04,          
     &0.4590615E-04,0.4907212E-04,0.5245148E-04,0.5605819E-04,          
     &0.5990710E-04,0.6401396E-04,0.6839549E-04,0.7306947E-04,          
     &0.7805478E-04,0.8337141E-04,0.8904063E-04,0.9508494E-04,          
     &0.1015282E-03,0.1083959E-03,0.1157146E-03,0.1235129E-03,          
     &0.1318208E-03,0.1406701E-03,0.1500945E-03,0.1601297E-03,          
     &0.1708131E-03,0.1821845E-03,0.1942859E-03,0.2071613E-03,          
     &0.2208574E-03,0.2354231E-03,0.2509102E-03,0.2673728E-03,          
     &0.2848677E-03,0.3034548E-03,0.3231965E-03,0.3441582E-03,          
     &0.3664080E-03,0.3900172E-03,0.4150597E-03,0.4416123E-03,          
     &0.4697544E-03,0.4995679E-03,0.5311372E-03,0.5645485E-03,          
     &0.5998900E-03,0.6372509E-03,0.6767211E-03,0.7183907E-03,          
     &0.7623488E-03,0.8086827E-03,0.8574767E-03,0.9088105E-03,          
     &0.9627578E-03,0.1019384E-02,0.1078745E-02,0.1140881E-02,          
     &0.1205820E-02,0.1273567E-02,0.1344103E-02,0.1417385E-02,          
     &0.1493331E-02,0.1571823E-02,0.1652698E-02,0.1735739E-02,          
     &0.1820670E-02,0.1907149E-02,0.1994756E-02,0.2082987E-02,          
     &0.2171244E-02,0.2258829E-02,0.2344932E-02,0.2428626E-02,          
     &0.2508858E-02,0.2584446E-02,0.2654070E-02,0.2716276E-02,          
     &0.2769467E-02,0.2811910E-02,0.2841732E-02,0.2856931E-02,          
     &0.2855379E-02,0.2834836E-02,0.2792979E-02,0.2727445E-02,          
     &0.2635916E-02,0.2516259E-02,0.2366753E-02,0.2186441E-02,          
     &0.1975625E-02,0.1736520E-02,0.1474022E-02,0.1196457E-02,          
     &0.9160493E-03,0.6486920E-03,0.4124932E-03,0.2246220E-03,          
     &0.9641216E-04,0.2775973E-04,0.3866509E-05,0.0000000E+00/          
      data fgd40/                                                       
     &0.3791684E-04,0.4054449E-04,0.4335038E-04,0.4634627E-04,          
     &0.4954467E-04,0.5295887E-04,0.5660298E-04,0.6049205E-04,          
     &0.6464204E-04,0.6906990E-04,0.7379364E-04,0.7883239E-04,          
     &0.8420643E-04,0.8993730E-04,0.9604786E-04,0.1025623E-03,          
     &0.1095064E-03,0.1169073E-03,0.1247938E-03,0.1331966E-03,          
     &0.1421479E-03,0.1516819E-03,0.1618349E-03,0.1726450E-03,          
     &0.1841527E-03,0.1964006E-03,0.2094336E-03,0.2232994E-03,          
     &0.2380478E-03,0.2537315E-03,0.2704058E-03,0.2881290E-03,          
     &0.3069620E-03,0.3269689E-03,0.3482167E-03,0.3707754E-03,          
     &0.3947182E-03,0.4201212E-03,0.4470637E-03,0.4756277E-03,          
     &0.5058983E-03,0.5379630E-03,0.5719120E-03,0.6078375E-03,          
     &0.6458333E-03,0.6859948E-03,0.7284177E-03,0.7731979E-03,          
     &0.8204299E-03,0.8702066E-03,0.9226172E-03,0.9777459E-03,          
     &0.1035670E-02,0.1096459E-02,0.1160170E-02,0.1226845E-02,          
     &0.1296510E-02,0.1369169E-02,0.1444800E-02,0.1523352E-02,          
     &0.1604735E-02,0.1688819E-02,0.1775424E-02,0.1864316E-02,          
     &0.1955194E-02,0.2047685E-02,0.2141336E-02,0.2235603E-02,          
     &0.2329839E-02,0.2423293E-02,0.2515091E-02,0.2604238E-02,          
     &0.2689600E-02,0.2769909E-02,0.2843750E-02,0.2909562E-02,          
     &0.2965638E-02,0.3010122E-02,0.3041014E-02,0.3056176E-02,          
     &0.3053339E-02,0.3030121E-02,0.2984054E-02,0.2912637E-02,          
     &0.2813422E-02,0.2684174E-02,0.2523111E-02,0.2329277E-02,          
     &0.2103076E-02,0.1846964E-02,0.1566259E-02,0.1269924E-02,          
     &0.9710467E-03,0.6865705E-03,0.4357192E-03,0.2366260E-03,          
     &0.1011315E-03,0.2887416E-04,0.3927713E-05,0.0000000E+00/          
      data fgd41/                                                       
     &0.4072410E-04,0.4354427E-04,0.4655558E-04,0.4977065E-04,          
     &0.5320285E-04,0.5686645E-04,0.6077657E-04,0.6494929E-04,          
     &0.6940174E-04,0.7415207E-04,0.7921956E-04,0.8462468E-04,          
     &0.9038916E-04,0.9653607E-04,0.1030898E-03,0.1100765E-03,          
     &0.1175234E-03,0.1254597E-03,0.1339164E-03,0.1429260E-03,          
     &0.1525233E-03,0.1627447E-03,0.1736289E-03,0.1852169E-03,          
     &0.1975519E-03,0.2106794E-03,0.2246475E-03,0.2395070E-03,          
     &0.2553113E-03,0.2721167E-03,0.2899821E-03,0.3089699E-03,          
     &0.3291451E-03,0.3505761E-03,0.3733344E-03,0.3974947E-03,          
     &0.4231351E-03,0.4503367E-03,0.4791840E-03,0.5097644E-03,          
     &0.5421685E-03,0.5764895E-03,0.6128234E-03,0.6512680E-03,          
     &0.6919233E-03,0.7348903E-03,0.7802708E-03,0.8281662E-03,          
     &0.8786768E-03,0.9319005E-03,0.9879315E-03,0.1046858E-02,          
     &0.1108763E-02,0.1173716E-02,0.1241778E-02,0.1312992E-02,          
     &0.1387383E-02,0.1464954E-02,0.1545677E-02,0.1629494E-02,          
     &0.1716309E-02,0.1805977E-02,0.1898304E-02,0.1993035E-02,          
     &0.2089844E-02,0.2188331E-02,0.2288007E-02,0.2388286E-02,          
     &0.2488477E-02,0.2587769E-02,0.2685231E-02,0.2779793E-02,          
     &0.2870246E-02,0.2955232E-02,0.3033242E-02,0.3102611E-02,          
     &0.3161517E-02,0.3207986E-02,0.3239888E-02,0.3254953E-02,          
     &0.3250771E-02,0.3224818E-02,0.3174484E-02,0.3097129E-02,          
     &0.2990182E-02,0.2851306E-02,0.2678659E-02,0.2471294E-02,          
     &0.2229720E-02,0.1956637E-02,0.1657785E-02,0.1342767E-02,          
     &0.1025531E-02,0.7240616E-03,0.4586863E-03,0.2484859E-03,          
     &0.1057922E-03,0.2997657E-04,0.3989979E-05,0.0000000E+00/          
      data fgd42/                                                       
     &0.4354569E-04,0.4655923E-04,0.4977688E-04,0.5321208E-04,          
     &0.5687913E-04,0.6079321E-04,0.6497045E-04,0.6942804E-04,          
     &0.7418421E-04,0.7925833E-04,0.8467096E-04,0.9044394E-04,          
     &0.9660042E-04,0.1031650E-03,0.1101637E-03,0.1176243E-03,          
     &0.1255760E-03,0.1340498E-03,0.1430787E-03,0.1526974E-03,          
     &0.1629429E-03,0.1738540E-03,0.1854721E-03,0.1978406E-03,          
     &0.2110056E-03,0.2250156E-03,0.2399218E-03,0.2557782E-03,          
     &0.2726416E-03,0.2905720E-03,0.3096321E-03,0.3298880E-03,          
     &0.3514092E-03,0.3742682E-03,0.3985410E-03,0.4243070E-03,          
     &0.4516492E-03,0.4806537E-03,0.5114101E-03,0.5440114E-03,          
     &0.5785535E-03,0.6151354E-03,0.6538585E-03,0.6948269E-03,          
     &0.7381461E-03,0.7839231E-03,0.8322654E-03,0.8832801E-03,          
     &0.9370730E-03,0.9937473E-03,0.1053402E-02,0.1116130E-02,          
     &0.1182017E-02,0.1251137E-02,0.1323551E-02,0.1399304E-02,          
     &0.1478421E-02,0.1560900E-02,0.1646712E-02,0.1735792E-02,          
     &0.1828031E-02,0.1923276E-02,0.2021315E-02,0.2121873E-02,          
     &0.2224601E-02,0.2329067E-02,0.2434749E-02,0.2541020E-02,          
     &0.2647139E-02,0.2752243E-02,0.2855336E-02,0.2955280E-02,          
     &0.3050785E-02,0.3140408E-02,0.3222543E-02,0.3295421E-02,          
     &0.3357108E-02,0.3405508E-02,0.3438367E-02,0.3453279E-02,          
     &0.3447696E-02,0.3418953E-02,0.3364298E-02,0.3280956E-02,          
     &0.3166234E-02,0.3017696E-02,0.2833444E-02,0.2612541E-02,          
     &0.2355606E-02,0.2065586E-02,0.1748647E-02,0.1415029E-02,          
     &0.1079538E-02,0.7611924E-03,0.4814127E-03,0.2602120E-03,          
     &0.1103982E-03,0.3106757E-04,0.4053088E-05,0.0000000E+00/          
      data fgd43/                                                       
     &0.4638049E-04,0.4958822E-04,0.5301305E-04,0.5666927E-04,          
     &0.6057209E-04,0.6473764E-04,0.6918306E-04,0.7392661E-04,          
     &0.7898767E-04,0.8438681E-04,0.9014588E-04,0.9628806E-04,          
     &0.1028380E-03,0.1098217E-03,0.1172670E-03,0.1252032E-03,          
     &0.1336613E-03,0.1426744E-03,0.1522774E-03,0.1625073E-03,          
     &0.1734031E-03,0.1850062E-03,0.1973604E-03,0.2105119E-03,          
     &0.2245094E-03,0.2394045E-03,0.2552515E-03,0.2721077E-03,          
     &0.2900332E-03,0.3090916E-03,0.3293496E-03,0.3508771E-03,          
     &0.3737476E-03,0.3980380E-03,0.4238289E-03,0.4512044E-03,          
     &0.4802521E-03,0.5110633E-03,0.5437328E-03,0.5783589E-03,          
     &0.6150431E-03,0.6538898E-03,0.6950065E-03,0.7385025E-03,          
     &0.7844896E-03,0.8330804E-03,0.8843882E-03,0.9385258E-03,          
     &0.9956044E-03,0.1055732E-02,0.1119014E-02,0.1185545E-02,          
     &0.1255416E-02,0.1328703E-02,0.1405471E-02,0.1485763E-02,          
     &0.1569604E-02,0.1656990E-02,0.1747888E-02,0.1842225E-02,          
     &0.1939884E-02,0.2040697E-02,0.2144439E-02,0.2250812E-02,          
     &0.2359445E-02,0.2469876E-02,0.2581545E-02,0.2693786E-02,          
     &0.2805810E-02,0.2916700E-02,0.3025395E-02,0.3130688E-02,          
     &0.3231210E-02,0.3325431E-02,0.3411649E-02,0.3487991E-02,          
     &0.3552412E-02,0.3602695E-02,0.3636460E-02,0.3651166E-02,          
     &0.3644131E-02,0.3612546E-02,0.3553522E-02,0.3464149E-02,          
     &0.3341613E-02,0.3183382E-02,0.2987506E-02,0.2753061E-02,          
     &0.2480778E-02,0.2173855E-02,0.1838884E-02,0.1486745E-02,          
     &0.1133097E-02,0.7979863E-03,0.5039144E-03,0.2718131E-03,          
     &0.1149531E-03,0.3214773E-04,0.4116867E-05,0.0000000E+00/          
      data fgd44/                                                       
     &0.4922756E-04,0.5263020E-04,0.5626298E-04,0.6014105E-04,          
     &0.6428051E-04,0.6869844E-04,0.7341301E-04,0.7844354E-04,          
     &0.8381056E-04,0.8953585E-04,0.9564254E-04,0.1021552E-03,          
     &0.1090998E-03,0.1165041E-03,0.1243974E-03,0.1328107E-03,          
     &0.1417770E-03,0.1513311E-03,0.1615100E-03,0.1723528E-03,          
     &0.1839009E-03,0.1961980E-03,0.2092904E-03,0.2232270E-03,          
     &0.2380594E-03,0.2538421E-03,0.2706324E-03,0.2884908E-03,          
     &0.3074812E-03,0.3276705E-03,0.3491292E-03,0.3719312E-03,          
     &0.3961541E-03,0.4218792E-03,0.4491915E-03,0.4781797E-03,          
     &0.5089364E-03,0.5415578E-03,0.5761441E-03,0.6127986E-03,          
     &0.6516284E-03,0.6927436E-03,0.7362572E-03,0.7822846E-03,          
     &0.8309431E-03,0.8823511E-03,0.9366277E-03,0.9938913E-03,          
     &0.1054259E-02,0.1117843E-02,0.1184752E-02,0.1255089E-02,          
     &0.1328946E-02,0.1406402E-02,0.1487522E-02,0.1572353E-02,          
     &0.1660916E-02,0.1753208E-02,0.1849188E-02,0.1948777E-02,          
     &0.2051849E-02,0.2158224E-02,0.2267659E-02,0.2379837E-02,          
     &0.2494361E-02,0.2610740E-02,0.2728380E-02,0.2846572E-02,          
     &0.2964479E-02,0.3081128E-02,0.3195397E-02,0.3306008E-02,          
     &0.3411514E-02,0.3510296E-02,0.3600558E-02,0.3680323E-02,          
     &0.3747433E-02,0.3799553E-02,0.3834175E-02,0.3848628E-02,          
     &0.3840091E-02,0.3805618E-02,0.3742179E-02,0.3646734E-02,          
     &0.3516348E-02,0.3348397E-02,0.3140880E-02,0.2892890E-02,          
     &0.2605274E-02,0.2281480E-02,0.1928532E-02,0.1557947E-02,          
     &0.1186235E-02,0.8344640E-03,0.5262053E-03,0.2832972E-03,          
     &0.1194600E-03,0.3321758E-04,0.4181177E-05,0.0000000E+00/          
      data fgd45/                                                       
     &0.5208602E-04,0.5568425E-04,0.5952571E-04,0.6362639E-04,          
     &0.6800328E-04,0.7267445E-04,0.7765905E-04,0.8297750E-04,          
     &0.8865147E-04,0.9470394E-04,0.1011594E-03,0.1080436E-03,          
     &0.1153842E-03,0.1232104E-03,0.1315530E-03,0.1404448E-03,          
     &0.1499207E-03,0.1600173E-03,0.1707737E-03,0.1822312E-03,          
     &0.1944333E-03,0.2074263E-03,0.2212590E-03,0.2359828E-03,          
     &0.2516521E-03,0.2683245E-03,0.2860604E-03,0.3049236E-03,          
     &0.3249812E-03,0.3463040E-03,0.3689660E-03,0.3930453E-03,          
     &0.4186235E-03,0.4457861E-03,0.4746228E-03,0.5052268E-03,          
     &0.5376956E-03,0.5721304E-03,0.6086365E-03,0.6473227E-03,          
     &0.6883015E-03,0.7316884E-03,0.7776023E-03,0.8261641E-03,          
     &0.8774970E-03,0.9317253E-03,0.9889735E-03,0.1049366E-02,          
     &0.1113024E-02,0.1180067E-02,0.1250607E-02,0.1324751E-02,          
     &0.1402593E-02,0.1484218E-02,0.1569691E-02,0.1659060E-02,          
     &0.1752345E-02,0.1849538E-02,0.1950596E-02,0.2055433E-02,          
     &0.2163913E-02,0.2275842E-02,0.2390960E-02,0.2508932E-02,          
     &0.2629336E-02,0.2751648E-02,0.2875242E-02,0.2999364E-02,          
     &0.3123132E-02,0.3245516E-02,0.3365333E-02,0.3481233E-02,          
     &0.3591690E-02,0.3694998E-02,0.3789267E-02,0.3872414E-02,          
     &0.3942172E-02,0.3996086E-02,0.4031522E-02,0.4045676E-02,          
     &0.4035592E-02,0.3998186E-02,0.3930290E-02,0.3828734E-02,          
     &0.3690466E-02,0.3512770E-02,0.3293599E-02,0.3032062E-02,          
     &0.2729126E-02,0.2388495E-02,0.2017623E-02,0.1628663E-02,          
     &0.1238976E-02,0.8706436E-03,0.5482980E-03,0.2946710E-03,          
     &0.1239216E-03,0.3427759E-04,0.4245902E-05,0.0000000E+00/          
      data fgd46/                                                       
     &0.8115656E-04,0.8673949E-04,0.9269806E-04,0.9905681E-04,          
     &0.1058418E-03,0.1130808E-03,0.1208032E-03,0.1290403E-03,          
     &0.1378252E-03,0.1471932E-03,0.1571818E-03,0.1678304E-03,          
     &0.1791813E-03,0.1912789E-03,0.2041706E-03,0.2179063E-03,          
     &0.2325392E-03,0.2481253E-03,0.2647240E-03,0.2823981E-03,          
     &0.3012141E-03,0.3212420E-03,0.3425561E-03,0.3652346E-03,          
     &0.3893599E-03,0.4150191E-03,0.4423037E-03,0.4713103E-03,          
     &0.5021401E-03,0.5348999E-03,0.5697014E-03,0.6066619E-03,          
     &0.6459042E-03,0.6875566E-03,0.7317531E-03,0.7786336E-03,          
     &0.8283433E-03,0.8810333E-03,0.9368596E-03,0.9959840E-03,          
     &0.1058572E-02,0.1124796E-02,0.1194828E-02,0.1268847E-02,          
     &0.1347031E-02,0.1429562E-02,0.1516619E-02,0.1608380E-02,          
     &0.1705018E-02,0.1806700E-02,0.1913583E-02,0.2025811E-02,          
     &0.2143512E-02,0.2266793E-02,0.2395733E-02,0.2530378E-02,          
     &0.2670737E-02,0.2816770E-02,0.2968380E-02,0.3125407E-02,          
     &0.3287611E-02,0.3454664E-02,0.3626137E-02,0.3801482E-02,          
     &0.3980022E-02,0.4160930E-02,0.4343216E-02,0.4525708E-02,          
     &0.4707035E-02,0.4885613E-02,0.5059628E-02,0.5227023E-02,          
     &0.5385487E-02,0.5532448E-02,0.5665063E-02,0.5780227E-02,          
     &0.5874567E-02,0.5944455E-02,0.5986021E-02,0.5995173E-02,          
     &0.5967631E-02,0.5898974E-02,0.5784722E-02,0.5620458E-02,          
     &0.5402048E-02,0.5125960E-02,0.4789778E-02,0.4392926E-02,          
     &0.3937671E-02,0.3430368E-02,0.2882835E-02,0.2313575E-02,          
     &0.1748290E-02,0.1218922E-02,0.7602643E-03,0.4034424E-03,          
     &0.1664904E-03,0.4441823E-04,0.4901315E-05,0.0000000E+00/          
      data fgd47/                                                       
     &0.1108192E-03,0.1184210E-03,0.1265326E-03,0.1351873E-03,          
     &0.1444203E-03,0.1542691E-03,0.1647732E-03,0.1759751E-03,          
     &0.1879195E-03,0.2006540E-03,0.2142290E-03,0.2286980E-03,          
     &0.2441176E-03,0.2605480E-03,0.2780527E-03,0.2966992E-03,          
     &0.3165589E-03,0.3377072E-03,0.3602239E-03,0.3841936E-03,          
     &0.4097053E-03,0.4368533E-03,0.4657371E-03,0.4964615E-03,          
     &0.5291371E-03,0.5638804E-03,0.6008140E-03,0.6400669E-03,          
     &0.6817746E-03,0.7260795E-03,0.7731306E-03,0.8230843E-03,          
     &0.8761041E-03,0.9323606E-03,0.9920321E-03,0.1055304E-02,          
     &0.1122369E-02,0.1193426E-02,0.1268682E-02,0.1348351E-02,          
     &0.1432651E-02,0.1521805E-02,0.1616044E-02,0.1715597E-02,          
     &0.1820700E-02,0.1931586E-02,0.2048489E-02,0.2171636E-02,          
     &0.2301249E-02,0.2437540E-02,0.2580706E-02,0.2730927E-02,          
     &0.2888358E-02,0.3053122E-02,0.3225308E-02,0.3404957E-02,          
     &0.3592057E-02,0.3786531E-02,0.3988222E-02,0.4196887E-02,          
     &0.4412177E-02,0.4633620E-02,0.4860610E-02,0.5092381E-02,          
     &0.5327991E-02,0.5566303E-02,0.5805958E-02,0.6045357E-02,          
     &0.6282640E-02,0.6515662E-02,0.6741980E-02,0.6958830E-02,          
     &0.7163120E-02,0.7351416E-02,0.7519942E-02,0.7664579E-02,          
     &0.7780874E-02,0.7864053E-02,0.7909046E-02,0.7910517E-02,          
     &0.7862915E-02,0.7760551E-02,0.7597708E-02,0.7368827E-02,          
     &0.7068799E-02,0.6693414E-02,0.6240033E-02,0.5708552E-02,          
     &0.5102689E-02,0.4431566E-02,0.3711419E-02,0.2967035E-02,          
     &0.2232236E-02,0.1548394E-02,0.9598459E-03,0.5053774E-03,          
     &0.2062338E-03,0.5390212E-04,0.5550688E-05,0.0000000E+00/          
      data fgd48/                                                       
     &0.1408224E-03,0.1504618E-03,0.1607461E-03,0.1717172E-03,          
     &0.1834196E-03,0.1959004E-03,0.2092098E-03,0.2234009E-03,          
     &0.2385303E-03,0.2546577E-03,0.2718468E-03,0.2901648E-03,          
     &0.3096830E-03,0.3304771E-03,0.3526270E-03,0.3762175E-03,          
     &0.4013382E-03,0.4280841E-03,0.4565553E-03,0.4868580E-03,          
     &0.5191038E-03,0.5534113E-03,0.5899047E-03,0.6287158E-03,          
     &0.6699831E-03,0.7138524E-03,0.7604770E-03,0.8100184E-03,          
     &0.8626459E-03,0.9185372E-03,0.9778786E-03,0.1040865E-02,          
     &0.1107700E-02,0.1178597E-02,0.1253777E-02,0.1333470E-02,          
     &0.1417917E-02,0.1507364E-02,0.1602067E-02,0.1702290E-02,          
     &0.1808304E-02,0.1920384E-02,0.2038812E-02,0.2163874E-02,          
     &0.2295855E-02,0.2435042E-02,0.2581718E-02,0.2736161E-02,          
     &0.2898637E-02,0.3069402E-02,0.3248691E-02,0.3436713E-02,          
     &0.3633647E-02,0.3839634E-02,0.4054764E-02,0.4279071E-02,          
     &0.4512519E-02,0.4754985E-02,0.5006252E-02,0.5265988E-02,          
     &0.5533727E-02,0.5808854E-02,0.6090575E-02,0.6377904E-02,          
     &0.6669633E-02,0.6964304E-02,0.7260191E-02,0.7555265E-02,          
     &0.7847172E-02,0.8133210E-02,0.8410307E-02,0.8674996E-02,          
     &0.8923409E-02,0.9151260E-02,0.9353851E-02,0.9526066E-02,          
     &0.9662390E-02,0.9756927E-02,0.9803438E-02,0.9795377E-02,          
     &0.9725968E-02,0.9588303E-02,0.9375491E-02,0.9080904E-02,          
     &0.8698541E-02,0.8223607E-02,0.7653347E-02,0.6988231E-02,          
     &0.6233524E-02,0.5401185E-02,0.4511879E-02,0.3596605E-02,          
     &0.2697109E-02,0.1863864E-02,0.1150288E-02,0.6022999E-03,          
     &0.2439058E-03,0.6289032E-04,0.6184030E-05,0.0000000E+00/          
      data fgd49/                                                       
     &0.1710209E-03,0.1827074E-03,0.1951744E-03,0.2084724E-03,          
     &0.2226549E-03,0.2377790E-03,0.2539050E-03,0.2710973E-03,          
     &0.2894238E-03,0.3089568E-03,0.3297728E-03,0.3519529E-03,          
     &0.3755831E-03,0.4007545E-03,0.4275634E-03,0.4561118E-03,          
     &0.4865077E-03,0.5188651E-03,0.5533049E-03,0.5899542E-03,          
     &0.6289479E-03,0.6704277E-03,0.7145437E-03,0.7614536E-03,          
     &0.8113238E-03,0.8643292E-03,0.9206539E-03,0.9804913E-03,          
     &0.1044044E-02,0.1111526E-02,0.1183159E-02,0.1259177E-02,          
     &0.1339823E-02,0.1425352E-02,0.1516028E-02,0.1612126E-02,          
     &0.1713932E-02,0.1821740E-02,0.1935854E-02,0.2056589E-02,          
     &0.2184265E-02,0.2319209E-02,0.2461755E-02,0.2612240E-02,          
     &0.2771000E-02,0.2938374E-02,0.3114694E-02,0.3300283E-02,          
     &0.3495454E-02,0.3700501E-02,0.3915694E-02,0.4141273E-02,          
     &0.4377437E-02,0.4624339E-02,0.4882072E-02,0.5150656E-02,          
     &0.5430026E-02,0.5720017E-02,0.6020342E-02,0.6330580E-02,          
     &0.6650144E-02,0.6978269E-02,0.7313976E-02,0.7656053E-02,          
     &0.8003020E-02,0.8353103E-02,0.8704200E-02,0.9053856E-02,          
     &0.9399223E-02,0.9737045E-02,0.1006362E-01,0.1037478E-01,          
     &0.1066590E-01,0.1093184E-01,0.1116700E-01,0.1136527E-01,          
     &0.1152010E-01,0.1162449E-01,0.1167106E-01,0.1165209E-01,          
     &0.1155961E-01,0.1138554E-01,0.1112185E-01,0.1076092E-01,          
     &0.1029592E-01,0.9721533E-02,0.9034974E-02,0.8237361E-02,          
     &0.7335574E-02,0.6344449E-02,0.5289071E-02,0.4206578E-02,          
     &0.3146467E-02,0.2168034E-02,0.1333409E-02,0.6952319E-03,          
     &0.2799323E-03,0.7147936E-04,0.6799569E-05,0.0000000E+00/          
      data fgd50/                                                       
     &0.2013200E-03,0.2150577E-03,0.2297114E-03,0.2453401E-03,          
     &0.2620067E-03,0.2797779E-03,0.2987245E-03,0.3189217E-03,          
     &0.3404490E-03,0.3633911E-03,0.3878374E-03,0.4138827E-03,          
     &0.4416278E-03,0.4711789E-03,0.5026488E-03,0.5361567E-03,          
     &0.5718287E-03,0.6097981E-03,0.6502058E-03,0.6932007E-03,          
     &0.7389397E-03,0.7875887E-03,0.8393223E-03,0.8943248E-03,          
     &0.9527899E-03,0.1014922E-02,0.1080934E-02,0.1151053E-02,          
     &0.1225515E-02,0.1304567E-02,0.1388468E-02,0.1477491E-02,          
     &0.1571917E-02,0.1672042E-02,0.1778173E-02,0.1890628E-02,          
     &0.2009740E-02,0.2135848E-02,0.2269306E-02,0.2410476E-02,          
     &0.2559727E-02,0.2717439E-02,0.2883995E-02,0.3059782E-02,          
     &0.3245188E-02,0.3440599E-02,0.3646396E-02,0.3862948E-02,          
     &0.4090609E-02,0.4329711E-02,0.4580559E-02,0.4843419E-02,          
     &0.5118510E-02,0.5405995E-02,0.5705965E-02,0.6018425E-02,          
     &0.6343281E-02,0.6680319E-02,0.7029183E-02,0.7389356E-02,          
     &0.7760133E-02,0.8140593E-02,0.8529570E-02,0.8925625E-02,          
     &0.9327006E-02,0.9731618E-02,0.1013699E-01,0.1054023E-01,          
     &0.1093801E-01,0.1132651E-01,0.1170141E-01,0.1205785E-01,          
     &0.1239044E-01,0.1269322E-01,0.1295967E-01,0.1318272E-01,          
     &0.1335480E-01,0.1346783E-01,0.1351330E-01,0.1348234E-01,          
     &0.1336583E-01,0.1315454E-01,0.1283939E-01,0.1241175E-01,          
     &0.1186406E-01,0.1119053E-01,0.1038840E-01,0.9459508E-02,          
     &0.8412384E-02,0.7264768E-02,0.6046152E-02,0.4799730E-02,          
     &0.3582600E-02,0.2462638E-02,0.1510371E-02,0.7848256E-03,          
     &0.3145867E-03,0.7973317E-04,0.7397639E-05,0.0000000E+00/          
      data fgd51/                                                       
     &0.2316542E-03,0.2474430E-03,0.2642829E-03,0.2822418E-03,          
     &0.3013918E-03,0.3218091E-03,0.3435749E-03,0.3667751E-03,          
     &0.3915011E-03,0.4178495E-03,0.4459228E-03,0.4758297E-03,          
     &0.5076851E-03,0.5416108E-03,0.5777357E-03,0.6161961E-03,          
     &0.6571363E-03,0.7007085E-03,0.7470740E-03,0.7964026E-03,          
     &0.8488738E-03,0.9046770E-03,0.9640115E-03,0.1027088E-02,          
     &0.1094126E-02,0.1165361E-02,0.1241036E-02,0.1321407E-02,          
     &0.1406744E-02,0.1497330E-02,0.1593460E-02,0.1695441E-02,          
     &0.1803598E-02,0.1918264E-02,0.2039789E-02,0.2168535E-02,          
     &0.2304879E-02,0.2449207E-02,0.2601918E-02,0.2763423E-02,          
     &0.2934142E-02,0.3114502E-02,0.3304936E-02,0.3505881E-02,          
     &0.3717774E-02,0.3941050E-02,0.4176134E-02,0.4423440E-02,          
     &0.4683364E-02,0.4956275E-02,0.5242507E-02,0.5542354E-02,          
     &0.5856052E-02,0.6183771E-02,0.6525599E-02,0.6881525E-02,          
     &0.7251423E-02,0.7635027E-02,0.8031910E-02,0.8441460E-02,          
     &0.8862848E-02,0.9295000E-02,0.9736558E-02,0.1018585E-01,          
     &0.1064087E-01,0.1109918E-01,0.1155794E-01,0.1201385E-01,          
     &0.1246307E-01,0.1290125E-01,0.1332343E-01,0.1372408E-01,          
     &0.1409705E-01,0.1443555E-01,0.1473218E-01,0.1497892E-01,          
     &0.1516717E-01,0.1528781E-01,0.1533122E-01,0.1528741E-01,          
     &0.1514613E-01,0.1489704E-01,0.1453001E-01,0.1403552E-01,          
     &0.1340524E-01,0.1263302E-01,0.1171615E-01,0.1065723E-01,          
     &0.9466481E-02,0.8164564E-02,0.6785350E-02,0.5378016E-02,          
     &0.4007114E-02,0.2748886E-02,0.1681983E-02,0.8715340E-03,          
     &0.3480591E-03,0.8769708E-04,0.7979149E-05,0.0000000E+00/          
      data fgd52/                                                       
     &0.2619756E-03,0.2798123E-03,0.2988352E-03,0.3191206E-03,          
     &0.3407496E-03,0.3638084E-03,0.3883880E-03,0.4145855E-03,          
     &0.4425036E-03,0.4722512E-03,0.5039437E-03,0.5377032E-03,          
     &0.5736591E-03,0.6119487E-03,0.6527167E-03,0.6961166E-03,          
     &0.7423105E-03,0.7914698E-03,0.8437755E-03,0.8994188E-03,          
     &0.9586011E-03,0.1021535E-02,0.1088445E-02,0.1159567E-02,          
     &0.1235150E-02,0.1315453E-02,0.1400753E-02,0.1491337E-02,          
     &0.1587506E-02,0.1689578E-02,0.1797883E-02,0.1912767E-02,          
     &0.2034591E-02,0.2163730E-02,0.2300575E-02,0.2445531E-02,          
     &0.2599018E-02,0.2761468E-02,0.2933328E-02,0.3115055E-02,          
     &0.3307116E-02,0.3509988E-02,0.3724152E-02,0.3950095E-02,          
     &0.4188302E-02,0.4439251E-02,0.4703417E-02,0.4981255E-02,          
     &0.5273200E-02,0.5579657E-02,0.5900991E-02,0.6237518E-02,          
     &0.6589491E-02,0.6957086E-02,0.7340386E-02,0.7739363E-02,          
     &0.8153855E-02,0.8583545E-02,0.9027933E-02,0.9486309E-02,          
     &0.9957720E-02,0.1044093E-01,0.1093441E-01,0.1143624E-01,          
     &0.1194413E-01,0.1245535E-01,0.1296669E-01,0.1347439E-01,          
     &0.1397416E-01,0.1446107E-01,0.1492958E-01,0.1537347E-01,          
     &0.1578582E-01,0.1615905E-01,0.1648487E-01,0.1675433E-01,          
     &0.1695782E-01,0.1708519E-01,0.1712573E-01,0.1706835E-01,          
     &0.1690171E-01,0.1661438E-01,0.1619524E-01,0.1563385E-01,          
     &0.1492124E-01,0.1405086E-01,0.1302014E-01,0.1183246E-01,          
     &0.1049977E-01,0.9045657E-02,0.7508335E-02,0.5942891E-02,          
     &0.4421198E-02,0.3027671E-02,0.1848841E-02,0.9556903E-03,          
     &0.3804894E-03,0.9540495E-04,0.8545121E-05,0.0000000E+00/          
      data fgd53/                                                       
     &0.2922479E-03,0.3121275E-03,0.3333276E-03,0.3559332E-03,          
     &0.3800345E-03,0.4057272E-03,0.4331126E-03,0.4622986E-03,          
     &0.4933992E-03,0.5265354E-03,0.5618354E-03,0.5994350E-03,          
     &0.6394780E-03,0.6821164E-03,0.7275114E-03,0.7758331E-03,          
     &0.8272616E-03,0.8819870E-03,0.9402103E-03,0.1002143E-02,          
     &0.1068010E-02,0.1138046E-02,0.1212500E-02,0.1291633E-02,          
     &0.1375722E-02,0.1465054E-02,0.1559935E-02,0.1660682E-02,          
     &0.1767632E-02,0.1881134E-02,0.2001553E-02,0.2129273E-02,          
     &0.2264693E-02,0.2408227E-02,0.2560307E-02,0.2721381E-02,          
     &0.2891912E-02,0.3072378E-02,0.3263269E-02,0.3465091E-02,          
     &0.3678359E-02,0.3903596E-02,0.4141332E-02,0.4392100E-02,          
     &0.4656433E-02,0.4934857E-02,0.5227888E-02,0.5536024E-02,          
     &0.5859738E-02,0.6199469E-02,0.6555612E-02,0.6928505E-02,          
     &0.7318414E-02,0.7725522E-02,0.8149905E-02,0.8591515E-02,          
     &0.9050154E-02,0.9525452E-02,0.1001684E-01,0.1052350E-01,          
     &0.1104435E-01,0.1157802E-01,0.1212275E-01,0.1267644E-01,          
     &0.1323649E-01,0.1379987E-01,0.1436299E-01,0.1492167E-01,          
     &0.1547114E-01,0.1600592E-01,0.1651986E-01,0.1700607E-01,          
     &0.1745690E-01,0.1786395E-01,0.1821807E-01,0.1850937E-01,          
     &0.1872729E-01,0.1886061E-01,0.1889759E-01,0.1882606E-01,          
     &0.1863358E-01,0.1830770E-01,0.1783630E-01,0.1720809E-01,          
     &0.1641345E-01,0.1544553E-01,0.1430188E-01,0.1298673E-01,          
     &0.1151376E-01,0.9909471E-02,0.8216407E-02,0.6495487E-02,          
     &0.4825778E-02,0.3299685E-02,0.2011405E-02,0.1037550E-02,          
     &0.4119851E-03,0.1028830E-03,0.9096545E-05,0.0000000E+00/          
      data fgd54/                                                       
     &0.3224432E-03,0.3443587E-03,0.3677286E-03,0.3926464E-03,          
     &0.4192112E-03,0.4475283E-03,0.4777092E-03,0.5098723E-03,          
     &0.5441433E-03,0.5806551E-03,0.6195484E-03,0.6609728E-03,          
     &0.7050860E-03,0.7520554E-03,0.8020577E-03,0.8552801E-03,          
     &0.9119203E-03,0.9721871E-03,0.1036301E-02,0.1104495E-02,          
     &0.1177015E-02,0.1254119E-02,0.1336080E-02,0.1423185E-02,          
     &0.1515737E-02,0.1614052E-02,0.1718463E-02,0.1829322E-02,          
     &0.1946993E-02,0.2071861E-02,0.2204328E-02,0.2344810E-02,          
     &0.2493747E-02,0.2651591E-02,0.2818814E-02,0.2995907E-02,          
     &0.3183375E-02,0.3381741E-02,0.3591540E-02,0.3813323E-02,          
     &0.4047653E-02,0.4295099E-02,0.4556239E-02,0.4831652E-02,          
     &0.5121918E-02,0.5427607E-02,0.5749279E-02,0.6087471E-02,          
     &0.6442695E-02,0.6815423E-02,0.7206077E-02,0.7615015E-02,          
     &0.8042520E-02,0.8488774E-02,0.8953849E-02,0.9437674E-02,          
     &0.9940015E-02,0.1046045E-01,0.1099832E-01,0.1155273E-01,          
     &0.1212247E-01,0.1270598E-01,0.1330136E-01,0.1390623E-01,          
     &0.1451776E-01,0.1513257E-01,0.1574671E-01,0.1635559E-01,          
     &0.1695395E-01,0.1753578E-01,0.1809432E-01,0.1862201E-01,          
     &0.1911047E-01,0.1955050E-01,0.1993210E-01,0.2024447E-01,          
     &0.2047606E-01,0.2061466E-01,0.2064749E-01,0.2056130E-01,          
     &0.2034261E-01,0.1997794E-01,0.1945422E-01,0.1875935E-01,          
     &0.1788307E-01,0.1681826E-01,0.1556264E-01,0.1412129E-01,          
     &0.1250967E-01,0.1075716E-01,0.8910619E-02,0.7036713E-02,          
     &0.5221590E-02,0.3565479E-02,0.2170039E-02,0.1117317E-02,          
     &0.4426314E-03,0.1101522E-03,0.9634327E-05,0.0000000E+00/          
      data fgd55/                                                       
     &0.3525394E-03,0.3764826E-03,0.4020135E-03,0.4292338E-03,          
     &0.4582518E-03,0.4891822E-03,0.5221465E-03,0.5572739E-03,          
     &0.5947012E-03,0.6345733E-03,0.6770437E-03,0.7222752E-03,          
     &0.7704397E-03,0.8217195E-03,0.8763071E-03,0.9344064E-03,          
     &0.9962325E-03,0.1062013E-02,0.1131988E-02,0.1206411E-02,          
     &0.1285549E-02,0.1369683E-02,0.1459111E-02,0.1554145E-02,          
     &0.1655113E-02,0.1762360E-02,0.1876249E-02,0.1997159E-02,          
     &0.2125490E-02,0.2261657E-02,0.2406097E-02,0.2559264E-02,          
     &0.2721633E-02,0.2893695E-02,0.3075965E-02,0.3268972E-02,          
     &0.3473264E-02,0.3689407E-02,0.3917984E-02,0.4159588E-02,          
     &0.4414829E-02,0.4684323E-02,0.4968693E-02,0.5268565E-02,          
     &0.5584564E-02,0.5917304E-02,0.6267386E-02,0.6635389E-02,          
     &0.7021860E-02,0.7427303E-02,0.7852165E-02,0.8296828E-02,          
     &0.8761583E-02,0.9246618E-02,0.9751992E-02,0.1027762E-01,          
     &0.1082322E-01,0.1138831E-01,0.1197218E-01,0.1257381E-01,          
     &0.1319187E-01,0.1382466E-01,0.1447006E-01,0.1512547E-01,          
     &0.1578780E-01,0.1645334E-01,0.1711779E-01,0.1777613E-01,          
     &0.1842261E-01,0.1905071E-01,0.1965305E-01,0.2022142E-01,          
     &0.2074672E-01,0.2121897E-01,0.2162729E-01,0.2196000E-01,          
     &0.2220460E-01,0.2234788E-01,0.2237602E-01,0.2227475E-01,          
     &0.2202955E-01,0.2162593E-01,0.2104990E-01,0.2028857E-01,          
     &0.1933110E-01,0.1817008E-01,0.1680347E-01,0.1523720E-01,          
     &0.1348851E-01,0.1158969E-01,0.9591837E-02,0.7567320E-02,          
     &0.5609243E-02,0.3825505E-02,0.2325041E-02,0.1195157E-02,          
     &0.4724978E-03,0.1172297E-03,0.1015929E-04,0.0000000E+00/          
      data fgd56/                                                       
     &0.3825188E-03,0.4084806E-03,0.4361623E-03,0.4656745E-03,          
     &0.4971342E-03,0.5306654E-03,0.5663997E-03,0.6044769E-03,          
     &0.6450450E-03,0.6882608E-03,0.7342903E-03,0.7833094E-03,          
     &0.8355043E-03,0.8910720E-03,0.9502209E-03,0.1013171E-02,          
     &0.1080155E-02,0.1151419E-02,0.1227223E-02,0.1307840E-02,          
     &0.1393558E-02,0.1484683E-02,0.1581535E-02,0.1684451E-02,          
     &0.1793785E-02,0.1909911E-02,0.2033219E-02,0.2164119E-02,          
     &0.2303042E-02,0.2450438E-02,0.2606774E-02,0.2772544E-02,          
     &0.2948256E-02,0.3134443E-02,0.3331656E-02,0.3540467E-02,          
     &0.3761466E-02,0.3995263E-02,0.4242481E-02,0.4503762E-02,          
     &0.4779759E-02,0.5071134E-02,0.5378556E-02,0.5702697E-02,          
     &0.6044224E-02,0.6403797E-02,0.6782056E-02,0.7179621E-02,          
     &0.7597072E-02,0.8034944E-02,0.8493712E-02,0.8973775E-02,          
     &0.9475436E-02,0.9998884E-02,0.1054417E-01,0.1111118E-01,          
     &0.1169960E-01,0.1230890E-01,0.1293827E-01,0.1358661E-01,          
     &0.1425245E-01,0.1493393E-01,0.1562875E-01,0.1633408E-01,          
     &0.1704655E-01,0.1776216E-01,0.1847621E-01,0.1918329E-01,          
     &0.1987717E-01,0.2055078E-01,0.2119618E-01,0.2180449E-01,          
     &0.2236588E-01,0.2286961E-01,0.2330396E-01,0.2365635E-01,          
     &0.2391334E-01,0.2406075E-01,0.2408374E-01,0.2396703E-01,          
     &0.2369506E-01,0.2325240E-01,0.2262412E-01,0.2179659E-01,          
     &0.2075839E-01,0.1950188E-01,0.1802526E-01,0.1633536E-01,          
     &0.1445116E-01,0.1240787E-01,0.1026080E-01,0.8087941E-02,          
     &0.5989247E-02,0.4080140E-02,0.2476662E-02,0.1271206E-02,          
     &0.5016418E-03,0.1241297E-03,0.1067216E-04,0.0000000E+00/          
      data fgd57/                                                       
     &0.4123672E-03,0.4403373E-03,0.4701593E-03,0.5019516E-03,          
     &0.5358403E-03,0.5719589E-03,0.6104488E-03,0.6514602E-03,          
     &0.6951523E-03,0.7416937E-03,0.7912630E-03,0.8440490E-03,          
     &0.9002521E-03,0.9600837E-03,0.1023768E-02,0.1091541E-02,          
     &0.1163654E-02,0.1240370E-02,0.1321967E-02,0.1408741E-02,          
     &0.1501002E-02,0.1599075E-02,0.1703305E-02,0.1814054E-02,          
     &0.1931702E-02,0.2056650E-02,0.2189317E-02,0.2330143E-02,          
     &0.2479589E-02,0.2638138E-02,0.2806292E-02,0.2984578E-02,          
     &0.3173542E-02,0.3373755E-02,0.3585807E-02,0.3810309E-02,          
     &0.4047895E-02,0.4299214E-02,0.4564937E-02,0.4845746E-02,          
     &0.5142341E-02,0.5455428E-02,0.5785721E-02,0.6133937E-02,          
     &0.6500786E-02,0.6886969E-02,0.7293171E-02,0.7720044E-02,          
     &0.8168207E-02,0.8638224E-02,0.9130593E-02,0.9645732E-02,          
     &0.1018396E-01,0.1074545E-01,0.1133026E-01,0.1193824E-01,          
     &0.1256905E-01,0.1322210E-01,0.1389649E-01,0.1459102E-01,          
     &0.1530410E-01,0.1603372E-01,0.1677738E-01,0.1753202E-01,          
     &0.1829401E-01,0.1905901E-01,0.1982200E-01,0.2057712E-01,          
     &0.2131769E-01,0.2203611E-01,0.2272385E-01,0.2337138E-01,          
     &0.2396817E-01,0.2450269E-01,0.2496241E-01,0.2533387E-01,          
     &0.2560269E-01,0.2575373E-01,0.2577116E-01,0.2563868E-01,          
     &0.2533977E-01,0.2485800E-01,0.2417759E-01,0.2328414E-01,          
     &0.2216572E-01,0.2081446E-01,0.1922882E-01,0.1741653E-01,          
     &0.1539836E-01,0.1321240E-01,0.1091814E-01,0.8599115E-02,          
     &0.6362036E-02,0.4329706E-02,0.2625111E-02,0.1345583E-02,          
     &0.5301124E-03,0.1308644E-03,0.1117360E-04,0.0000000E+00/          
      data fgd58/                                                       
     &0.4420729E-03,0.4720407E-03,0.5039911E-03,0.5380513E-03,          
     &0.5743558E-03,0.6130473E-03,0.6542773E-03,0.6982065E-03,          
     &0.7450050E-03,0.7948530E-03,0.8479415E-03,0.9044727E-03,          
     &0.9646603E-03,0.1028731E-02,0.1096923E-02,0.1169491E-02,          
     &0.1246701E-02,0.1328835E-02,0.1416191E-02,0.1509084E-02,          
     &0.1607844E-02,0.1712821E-02,0.1824382E-02,0.1942914E-02,          
     &0.2068822E-02,0.2202534E-02,0.2344498E-02,0.2495183E-02,          
     &0.2655081E-02,0.2824705E-02,0.3004595E-02,0.3195309E-02,          
     &0.3397432E-02,0.3611570E-02,0.3838353E-02,0.4078432E-02,          
     &0.4332480E-02,0.4601192E-02,0.4885277E-02,0.5185465E-02,          
     &0.5502496E-02,0.5837123E-02,0.6190104E-02,0.6562199E-02,          
     &0.6954161E-02,0.7366734E-02,0.7800640E-02,0.8256570E-02,          
     &0.8735175E-02,0.9237050E-02,0.9762716E-02,0.1031261E-01,          
     &0.1088705E-01,0.1148623E-01,0.1211018E-01,0.1275873E-01,          
     &0.1343150E-01,0.1412783E-01,0.1484676E-01,0.1558699E-01,          
     &0.1634680E-01,0.1712400E-01,0.1791592E-01,0.1871928E-01,          
     &0.1953016E-01,0.2034394E-01,0.2115520E-01,0.2195770E-01,          
     &0.2274428E-01,0.2350683E-01,0.2423622E-01,0.2492229E-01,          
     &0.2555380E-01,0.2611847E-01,0.2660295E-01,0.2699290E-01,          
     &0.2727303E-01,0.2742725E-01,0.2743875E-01,0.2729024E-01,          
     &0.2696422E-01,0.2644333E-01,0.2571093E-01,0.2475189E-01,          
     &0.2355377E-01,0.2210852E-01,0.2041485E-01,0.1848142E-01,          
     &0.1633078E-01,0.1400390E-01,0.1156440E-01,0.9101314E-02,          
     &0.6727990E-02,0.4574481E-02,0.2770572E-02,0.1418386E-02,          
     &0.5579514E-03,0.1374442E-03,0.1166421E-04,0.0000000E+00/          
      data fgd59/                                                       
     &0.4716264E-03,0.5035804E-03,0.5376473E-03,0.5739622E-03,          
     &0.6126685E-03,0.6539181E-03,0.6978721E-03,0.7447018E-03,          
     &0.7945881E-03,0.8477229E-03,0.9043095E-03,0.9645629E-03,          
     &0.1028711E-02,0.1096994E-02,0.1169666E-02,0.1246998E-02,          
     &0.1329273E-02,0.1416791E-02,0.1509869E-02,0.1608841E-02,          
     &0.1714059E-02,0.1825894E-02,0.1944738E-02,0.2070999E-02,          
     &0.2205112E-02,0.2347528E-02,0.2498725E-02,0.2659200E-02,          
     &0.2829476E-02,0.3010099E-02,0.3201640E-02,0.3404694E-02,          
     &0.3619879E-02,0.3847840E-02,0.4089244E-02,0.4344783E-02,          
     &0.4615169E-02,0.4901139E-02,0.5203445E-02,0.5522858E-02,          
     &0.5860164E-02,0.6216158E-02,0.6591642E-02,0.6987419E-02,          
     &0.7404284E-02,0.7843022E-02,0.8304395E-02,0.8789129E-02,          
     &0.9297907E-02,0.9831354E-02,0.1039001E-01,0.1097434E-01,          
     &0.1158466E-01,0.1222116E-01,0.1288387E-01,0.1357259E-01,          
     &0.1428689E-01,0.1502606E-01,0.1578907E-01,0.1657450E-01,          
     &0.1738051E-01,0.1820476E-01,0.1904439E-01,0.1989588E-01,          
     &0.2075506E-01,0.2161698E-01,0.2247589E-01,0.2332512E-01,          
     &0.2415705E-01,0.2496307E-01,0.2573345E-01,0.2645741E-01,          
     &0.2712301E-01,0.2771722E-01,0.2822587E-01,0.2863377E-01,          
     &0.2892474E-01,0.2908172E-01,0.2908695E-01,0.2892219E-01,          
     &0.2856894E-01,0.2800895E-01,0.2722473E-01,0.2620045E-01,          
     &0.2492317E-01,0.2338467E-01,0.2158397E-01,0.1953064E-01,          
     &0.1724901E-01,0.1478291E-01,0.1220008E-01,0.9594955E-02,          
     &0.7087440E-02,0.4814710E-02,0.2913203E-02,0.1489704E-02,          
     &0.5851953E-03,0.1438782E-03,0.1214451E-04,0.0000000E+00/          
      data fgd60/                                                       
     &0.5010198E-03,0.5349484E-03,0.5711191E-03,0.6096752E-03,          
     &0.6507686E-03,0.6945608E-03,0.7412223E-03,0.7909345E-03,          
     &0.8438895E-03,0.9002907E-03,0.9603534E-03,0.1024305E-02,          
     &0.1092388E-02,0.1164857E-02,0.1241981E-02,0.1324046E-02,          
     &0.1411352E-02,0.1504219E-02,0.1602980E-02,0.1707991E-02,          
     &0.1819623E-02,0.1938271E-02,0.2064346E-02,0.2198285E-02,          
     &0.2340545E-02,0.2491605E-02,0.2651969E-02,0.2822164E-02,          
     &0.3002744E-02,0.3194286E-02,0.3397394E-02,0.3612695E-02,          
     &0.3840846E-02,0.4082526E-02,0.4338440E-02,0.4609320E-02,          
     &0.4895919E-02,0.5199011E-02,0.5519394E-02,0.5857880E-02,          
     &0.6215297E-02,0.6592484E-02,0.6990285E-02,0.7409546E-02,          
     &0.7851104E-02,0.8315785E-02,0.8804386E-02,0.9317670E-02,          
     &0.9856354E-02,0.1042109E-01,0.1101244E-01,0.1163088E-01,          
     &0.1227674E-01,0.1295021E-01,0.1365129E-01,0.1437977E-01,          
     &0.1513519E-01,0.1591676E-01,0.1672338E-01,0.1755353E-01,          
     &0.1840523E-01,0.1927601E-01,0.2016279E-01,0.2106185E-01,          
     &0.2196874E-01,0.2287821E-01,0.2378414E-01,0.2467948E-01,          
     &0.2555614E-01,0.2640498E-01,0.2721572E-01,0.2797694E-01,          
     &0.2867603E-01,0.2929918E-01,0.2983146E-01,0.3025681E-01,          
     &0.3055815E-01,0.3071752E-01,0.3071619E-01,0.3053495E-01,          
     &0.3015440E-01,0.2955535E-01,0.2871951E-01,0.2763035E-01,          
     &0.2627447E-01,0.2464350E-01,0.2273675E-01,0.2056474E-01,          
     &0.1815358E-01,0.1554993E-01,0.1282561E-01,0.1008041E-01,          
     &0.7440680E-02,0.5050608E-02,0.3053145E-02,0.1559614E-02,          
     &0.6118760E-03,0.1501744E-03,0.1261500E-04,0.0000000E+00/          
      data fgd61/                                                       
     &0.5302465E-03,0.5661376E-03,0.6043991E-03,0.6451825E-03,          
     &0.6886483E-03,0.7349670E-03,0.7843188E-03,0.8368953E-03,          
     &0.8928995E-03,0.9525459E-03,0.1016062E-02,0.1083689E-02,          
     &0.1155681E-02,0.1232307E-02,0.1313853E-02,0.1400620E-02,          
     &0.1492924E-02,0.1591103E-02,0.1695509E-02,0.1806517E-02,          
     &0.1924519E-02,0.2049931E-02,0.2183189E-02,0.2324751E-02,          
     &0.2475099E-02,0.2634741E-02,0.2804206E-02,0.2984052E-02,          
     &0.3174860E-02,0.3377240E-02,0.3591828E-02,0.3819285E-02,          
     &0.4060303E-02,0.4315597E-02,0.4585911E-02,0.4872013E-02,          
     &0.5174696E-02,0.5494776E-02,0.5833091E-02,0.6190495E-02,          
     &0.6567860E-02,0.6966064E-02,0.7385997E-02,0.7828545E-02,          
     &0.8294586E-02,0.8784984E-02,0.9300576E-02,0.9842160E-02,          
     &0.1041048E-01,0.1100622E-01,0.1162996E-01,0.1228219E-01,          
     &0.1296326E-01,0.1367334E-01,0.1441243E-01,0.1518028E-01,          
     &0.1597640E-01,0.1679993E-01,0.1764971E-01,0.1852410E-01,          
     &0.1942100E-01,0.2033779E-01,0.2127119E-01,0.2221725E-01,          
     &0.2317128E-01,0.2412771E-01,0.2508007E-01,0.2602090E-01,          
     &0.2694167E-01,0.2783272E-01,0.2868321E-01,0.2948110E-01,          
     &0.3021308E-01,0.3086463E-01,0.3142001E-01,0.3186232E-01,          
     &0.3217362E-01,0.3233501E-01,0.3232685E-01,0.3212898E-01,          
     &0.3172106E-01,0.3108302E-01,0.3019577E-01,0.2904212E-01,          
     &0.2760821E-01,0.2588554E-01,0.2387372E-01,0.2158423E-01,          
     &0.1904497E-01,0.1630540E-01,0.1344138E-01,0.1055800E-01,          
     &0.7787975E-02,0.5282369E-02,0.3190523E-02,0.1628185E-02,          
     &0.6380222E-03,0.1563400E-03,0.1307610E-04,0.0000000E+00/          
      data fgd62/                                                       
     &0.5593014E-03,0.5971425E-03,0.6374815E-03,0.6804779E-03,          
     &0.7263009E-03,0.7751298E-03,0.8271543E-03,0.8825765E-03,          
     &0.9416096E-03,0.1004480E-02,0.1071427E-02,0.1142704E-02,          
     &0.1218579E-02,0.1299335E-02,0.1385273E-02,0.1476708E-02,          
     &0.1573977E-02,0.1677430E-02,0.1787442E-02,0.1904405E-02,          
     &0.2028733E-02,0.2160861E-02,0.2301249E-02,0.2450379E-02,          
     &0.2608758E-02,0.2776919E-02,0.2955419E-02,0.3144843E-02,          
     &0.3345804E-02,0.3558940E-02,0.3784921E-02,0.4024443E-02,          
     &0.4278229E-02,0.4547032E-02,0.4831632E-02,0.5132836E-02,          
     &0.5451476E-02,0.5788408E-02,0.6144510E-02,0.6520678E-02,          
     &0.6917825E-02,0.7336874E-02,0.7778752E-02,0.8244389E-02,          
     &0.8734703E-02,0.9250596E-02,0.9792943E-02,0.1036257E-01,          
     &0.1096027E-01,0.1158673E-01,0.1224256E-01,0.1292827E-01,          
     &0.1364421E-01,0.1439055E-01,0.1516727E-01,0.1597411E-01,          
     &0.1681051E-01,0.1767559E-01,0.1856807E-01,0.1948623E-01,          
     &0.2042785E-01,0.2139013E-01,0.2236962E-01,0.2336215E-01,          
     &0.2436275E-01,0.2536557E-01,0.2636378E-01,0.2734951E-01,          
     &0.2831379E-01,0.2924645E-01,0.3013610E-01,0.3097007E-01,          
     &0.3173439E-01,0.3241380E-01,0.3299178E-01,0.3345061E-01,          
     &0.3377147E-01,0.3393456E-01,0.3391932E-01,0.3370466E-01,          
     &0.3326933E-01,0.3259239E-01,0.3165397E-01,0.3043623E-01,          
     &0.2892486E-01,0.2711125E-01,0.2499534E-01,0.2258957E-01,          
     &0.1992360E-01,0.1704972E-01,0.1404776E-01,0.1102804E-01,          
     &0.8129562E-02,0.5510164E-02,0.3325450E-02,0.1695476E-02,          
     &0.6636592E-03,0.1623811E-03,0.1352823E-04,0.0000000E+00/          
      data fgd63/                                                       
     &0.5881800E-03,0.6279584E-03,0.6703614E-03,0.7155564E-03,          
     &0.7637209E-03,0.8150433E-03,0.8697230E-03,0.9279717E-03,          
     &0.9900135E-03,0.1056086E-02,0.1126440E-02,0.1201342E-02,          
     &0.1281073E-02,0.1365931E-02,0.1456230E-02,0.1552303E-02,          
     &0.1654500E-02,0.1763192E-02,0.1878769E-02,0.2001645E-02,          
     &0.2132252E-02,0.2271048E-02,0.2418515E-02,0.2575158E-02,          
     &0.2741509E-02,0.2918125E-02,0.3105592E-02,0.3304523E-02,          
     &0.3515559E-02,0.3739371E-02,0.3976658E-02,0.4228150E-02,          
     &0.4494605E-02,0.4776812E-02,0.5075586E-02,0.5391771E-02,          
     &0.5726241E-02,0.6079888E-02,0.6453632E-02,0.6848411E-02,          
     &0.7265176E-02,0.7704894E-02,0.8168533E-02,0.8657061E-02,          
     &0.9171437E-02,0.9712604E-02,0.1028147E-01,0.1087890E-01,          
     &0.1150570E-01,0.1216260E-01,0.1285024E-01,0.1356911E-01,          
     &0.1431959E-01,0.1510184E-01,0.1591583E-01,0.1676127E-01,          
     &0.1763755E-01,0.1854374E-01,0.1947848E-01,0.2043995E-01,          
     &0.2142581E-01,0.2243308E-01,0.2345815E-01,0.2449662E-01,          
     &0.2554325E-01,0.2659189E-01,0.2763537E-01,0.2866543E-01,          
     &0.2967264E-01,0.3064634E-01,0.3157458E-01,0.3244407E-01,          
     &0.3324019E-01,0.3394694E-01,0.3454705E-01,0.3502196E-01,          
     &0.3535201E-01,0.3551649E-01,0.3549395E-01,0.3526238E-01,          
     &0.3479961E-01,0.3408389E-01,0.3309454E-01,0.3181311E-01,          
     &0.3022487E-01,0.2832109E-01,0.2610207E-01,0.2358119E-01,          
     &0.2078990E-01,0.1778325E-01,0.1464505E-01,0.1149079E-01,          
     &0.8465659E-02,0.5734153E-02,0.3458027E-02,0.1761545E-02,          
     &0.6888098E-03,0.1683036E-03,0.1397175E-04,0.0000000E+00/          
      data fgd64/                                                       
     &0.8667532E-03,0.9251835E-03,0.9874546E-03,0.1053810E-02,          
     &0.1124508E-02,0.1199824E-02,0.1280046E-02,0.1365484E-02,          
     &0.1456462E-02,0.1553325E-02,0.1656439E-02,0.1766189E-02,          
     &0.1882984E-02,0.2007255E-02,0.2139457E-02,0.2280072E-02,          
     &0.2429608E-02,0.2588601E-02,0.2757615E-02,0.2937247E-02,          
     &0.3128122E-02,0.3330901E-02,0.3546277E-02,0.3774979E-02,          
     &0.4017772E-02,0.4275458E-02,0.4548878E-02,0.4838912E-02,          
     &0.5146479E-02,0.5472540E-02,0.5818096E-02,0.6184189E-02,          
     &0.6571901E-02,0.6982355E-02,0.7416714E-02,0.7876175E-02,          
     &0.8361973E-02,0.8875376E-02,0.9417678E-02,0.9990202E-02,          
     &0.1059429E-01,0.1123128E-01,0.1190253E-01,0.1260939E-01,          
     &0.1335317E-01,0.1413519E-01,0.1495666E-01,0.1581877E-01,          
     &0.1672258E-01,0.1766905E-01,0.1865899E-01,0.1969302E-01,          
     &0.2077152E-01,0.2189462E-01,0.2306211E-01,0.2427341E-01,          
     &0.2552750E-01,0.2682283E-01,0.2815725E-01,0.2952797E-01,          
     &0.3093138E-01,0.3236301E-01,0.3381743E-01,0.3528809E-01,          
     &0.3676726E-01,0.3824587E-01,0.3971342E-01,0.4115788E-01,          
     &0.4256554E-01,0.4392099E-01,0.4520699E-01,0.4640447E-01,          
     &0.4749247E-01,0.4844823E-01,0.4924718E-01,0.4986307E-01,          
     &0.5026820E-01,0.5043355E-01,0.5032920E-01,0.4992469E-01,          
     &0.4918960E-01,0.4809437E-01,0.4661143E-01,0.4471674E-01,          
     &0.4239211E-01,0.3962836E-01,0.3642964E-01,0.3281903E-01,          
     &0.2884534E-01,0.2459042E-01,0.2017568E-01,0.1576521E-01,          
     &0.1156184E-01,0.7791492E-02,0.4671803E-02,0.2364285E-02,          
     &0.9174102E-03,0.2219616E-03,0.1799787E-04,0.0000000E+00/          
      data fgd65/                                                       
     &0.1126423E-02,0.1202191E-02,0.1282927E-02,0.1368944E-02,          
     &0.1460575E-02,0.1558175E-02,0.1662115E-02,0.1772794E-02,          
     &0.1890629E-02,0.2016064E-02,0.2149570E-02,0.2291642E-02,          
     &0.2442805E-02,0.2603614E-02,0.2774653E-02,0.2956541E-02,          
     &0.3149929E-02,0.3355506E-02,0.3573995E-02,0.3806161E-02,          
     &0.4052804E-02,0.4314772E-02,0.4592951E-02,0.4888273E-02,          
     &0.5201717E-02,0.5534308E-02,0.5887119E-02,0.6261273E-02,          
     &0.6657942E-02,0.7078351E-02,0.7523772E-02,0.7995532E-02,          
     &0.8495007E-02,0.9023620E-02,0.9582845E-02,0.1017420E-01,          
     &0.1079925E-01,0.1145959E-01,0.1215686E-01,0.1289272E-01,          
     &0.1366884E-01,0.1448693E-01,0.1534867E-01,0.1625573E-01,          
     &0.1720977E-01,0.1821238E-01,0.1926508E-01,0.2036930E-01,          
     &0.2152635E-01,0.2273734E-01,0.2400324E-01,0.2532471E-01,          
     &0.2670216E-01,0.2813561E-01,0.2962469E-01,0.3116850E-01,          
     &0.3276559E-01,0.3441383E-01,0.3611031E-01,0.3785126E-01,          
     &0.3963191E-01,0.4144637E-01,0.4328749E-01,0.4514673E-01,          
     &0.4701402E-01,0.4887760E-01,0.5072391E-01,0.5253740E-01,          
     &0.5430049E-01,0.5599339E-01,0.5759405E-01,0.5907814E-01,          
     &0.6041899E-01,0.6158768E-01,0.6255311E-01,0.6328213E-01,          
     &0.6373986E-01,0.6388989E-01,0.6369483E-01,0.6311678E-01,          
     &0.6211817E-01,0.6066277E-01,0.5871718E-01,0.5625287E-01,          
     &0.5324914E-01,0.4969713E-01,0.4560529E-01,0.4100632E-01,          
     &0.3596548E-01,0.3058947E-01,0.2503393E-01,0.1950657E-01,          
     &0.1426123E-01,0.9577369E-02,0.5720370E-02,0.2882254E-02,          
     &0.1112770E-02,0.2675879E-03,0.2142611E-04,0.0000000E+00/          
      data fgd66/                                                       
     &0.1367935E-02,0.1459795E-02,0.1557664E-02,0.1661924E-02,          
     &0.1772975E-02,0.1891243E-02,0.2017179E-02,0.2151260E-02,          
     &0.2293993E-02,0.2445912E-02,0.2607583E-02,0.2779603E-02,          
     &0.2962605E-02,0.3157255E-02,0.3364259E-02,0.3584360E-02,          
     &0.3818342E-02,0.4067032E-02,0.4331301E-02,0.4612065E-02,          
     &0.4910291E-02,0.5226991E-02,0.5563232E-02,0.5920131E-02,          
     &0.6298863E-02,0.6700655E-02,0.7126794E-02,0.7578623E-02,          
     &0.8057548E-02,0.8565031E-02,0.9102594E-02,0.9671821E-02,          
     &0.1027435E-01,0.1091189E-01,0.1158619E-01,0.1229906E-01,          
     &0.1305236E-01,0.1384798E-01,0.1468787E-01,0.1557400E-01,          
     &0.1650834E-01,0.1749291E-01,0.1852970E-01,0.1962066E-01,          
     &0.2076774E-01,0.2197280E-01,0.2323760E-01,0.2456380E-01,          
     &0.2595289E-01,0.2740615E-01,0.2892463E-01,0.3050906E-01,          
     &0.3215981E-01,0.3387681E-01,0.3565948E-01,0.3750663E-01,          
     &0.3941639E-01,0.4138605E-01,0.4341198E-01,0.4548951E-01,          
     &0.4761274E-01,0.4977445E-01,0.5196591E-01,0.5417670E-01,          
     &0.5639459E-01,0.5860534E-01,0.6079253E-01,0.6293742E-01,          
     &0.6501883E-01,0.6701299E-01,0.6889345E-01,0.7063106E-01,          
     &0.7219397E-01,0.7354768E-01,0.7465515E-01,0.7547703E-01,          
     &0.7597197E-01,0.7609694E-01,0.7580789E-01,0.7506033E-01,          
     &0.7381038E-01,0.7201599E-01,0.6963877E-01,0.6664652E-01,          
     &0.6301666E-01,0.5874116E-01,0.5383288E-01,0.4833383E-01,          
     &0.4232476E-01,0.3593532E-01,0.2935240E-01,0.2282310E-01,          
     &0.1664683E-01,0.1115035E-01,0.6640505E-02,0.3334924E-02,          
     &0.1282759E-02,0.3071278E-03,0.2439703E-04,0.0000000E+00/          
      data fgd67/                                                       
     &0.1592615E-02,0.1699419E-02,0.1813199E-02,0.1934396E-02,          
     &0.2063475E-02,0.2200928E-02,0.2347277E-02,0.2503077E-02,          
     &0.2668911E-02,0.2845399E-02,0.3033195E-02,0.3232990E-02,          
     &0.3445516E-02,0.3671543E-02,0.3911887E-02,0.4167406E-02,          
     &0.4439007E-02,0.4727645E-02,0.5034324E-02,0.5360105E-02,          
     &0.5706099E-02,0.6073478E-02,0.6463470E-02,0.6877365E-02,          
     &0.7316513E-02,0.7782333E-02,0.8276302E-02,0.8799971E-02,          
     &0.9354954E-02,0.9942931E-02,0.1056566E-01,0.1122495E-01,          
     &0.1192269E-01,0.1266083E-01,0.1344138E-01,0.1426642E-01,          
     &0.1513807E-01,0.1605851E-01,0.1702994E-01,0.1805462E-01,          
     &0.1913482E-01,0.2027280E-01,0.2147083E-01,0.2273114E-01,          
     &0.2405592E-01,0.2544727E-01,0.2690717E-01,0.2843747E-01,          
     &0.3003982E-01,0.3171564E-01,0.3346604E-01,0.3529180E-01,          
     &0.3719324E-01,0.3917019E-01,0.4122187E-01,0.4334679E-01,          
     &0.4554267E-01,0.4780625E-01,0.5013323E-01,0.5251806E-01,          
     &0.5495381E-01,0.5743200E-01,0.5994242E-01,0.6247291E-01,          
     &0.6500924E-01,0.6753484E-01,0.7003070E-01,0.7247511E-01,          
     &0.7484356E-01,0.7710864E-01,0.7923985E-01,0.8120367E-01,          
     &0.8296348E-01,0.8447970E-01,0.8570990E-01,0.8660910E-01,          
     &0.8713008E-01,0.8722387E-01,0.8684038E-01,0.8592928E-01,          
     &0.8444105E-01,0.8232855E-01,0.7954907E-01,0.7606728E-01,          
     &0.7185929E-01,0.6691811E-01,0.6126110E-01,0.5493914E-01,          
     &0.4804751E-01,0.4073707E-01,0.3322334E-01,0.2578917E-01,          
     &0.1877497E-01,0.1254965E-01,0.7456511E-02,0.3734997E-02,          
     &0.1432446E-02,0.3418251E-03,0.2700274E-04,0.0000000E+00/          
      data fgd68/                                                       
     &0.1801900E-02,0.1922603E-02,0.2051182E-02,0.2188129E-02,          
     &0.2333970E-02,0.2489259E-02,0.2654586E-02,0.2830572E-02,          
     &0.3017876E-02,0.3217195E-02,0.3429265E-02,0.3654864E-02,          
     &0.3894815E-02,0.4149985E-02,0.4421291E-02,0.4709698E-02,          
     &0.5016225E-02,0.5341946E-02,0.5687989E-02,0.6055546E-02,          
     &0.6445864E-02,0.6860259E-02,0.7300111E-02,0.7766866E-02,          
     &0.8262039E-02,0.8787220E-02,0.9344068E-02,0.9934318E-02,          
     &0.1055978E-01,0.1122233E-01,0.1192394E-01,0.1266664E-01,          
     &0.1345254E-01,0.1428381E-01,0.1516271E-01,0.1609154E-01,          
     &0.1707268E-01,0.1810855E-01,0.1920162E-01,0.2035439E-01,          
     &0.2156937E-01,0.2284910E-01,0.2419607E-01,0.2561275E-01,          
     &0.2710157E-01,0.2866482E-01,0.3030470E-01,0.3202322E-01,          
     &0.3382217E-01,0.3570307E-01,0.3766711E-01,0.3971507E-01,          
     &0.4184723E-01,0.4406330E-01,0.4636230E-01,0.4874248E-01,          
     &0.5120113E-01,0.5373450E-01,0.5633762E-01,0.5900414E-01,          
     &0.6172615E-01,0.6449398E-01,0.6729605E-01,0.7011859E-01,          
     &0.7294548E-01,0.7575804E-01,0.7853479E-01,0.8125132E-01,          
     &0.8388007E-01,0.8639021E-01,0.8874758E-01,0.9091460E-01,          
     &0.9285030E-01,0.9451043E-01,0.9584767E-01,0.9681187E-01,          
     &0.9735049E-01,0.9740916E-01,0.9693238E-01,0.9586450E-01,          
     &0.9415099E-01,0.9174017E-01,0.8858557E-01,0.8464924E-01,          
     &0.7990625E-01,0.7435095E-01,0.6800507E-01,0.6092798E-01,          
     &0.5322853E-01,0.4507726E-01,0.3671597E-01,0.2846008E-01,          
     &0.2068717E-01,0.1380392E-01,0.8185969E-02,0.4091573E-02,          
     &0.1565432E-02,0.3725560E-03,0.2930887E-04,0.0000000E+00/          
      data fgd69/                                                       
     &0.1997178E-02,0.2130835E-02,0.2273201E-02,0.2424822E-02,          
     &0.2586279E-02,0.2758184E-02,0.2941186E-02,0.3135972E-02,          
     &0.3343269E-02,0.3563847E-02,0.3798517E-02,0.4048138E-02,          
     &0.4313617E-02,0.4595911E-02,0.4896030E-02,0.5215039E-02,          
     &0.5554060E-02,0.5914278E-02,0.6296936E-02,0.6703345E-02,          
     &0.7134881E-02,0.7592991E-02,0.8079195E-02,0.8595084E-02,          
     &0.9142327E-02,0.9722670E-02,0.1033794E-01,0.1099004E-01,          
     &0.1168096E-01,0.1241278E-01,0.1318763E-01,0.1400776E-01,          
     &0.1487548E-01,0.1579318E-01,0.1676332E-01,0.1778844E-01,          
     &0.1887112E-01,0.2001404E-01,0.2121987E-01,0.2249136E-01,          
     &0.2383124E-01,0.2524228E-01,0.2672719E-01,0.2828867E-01,          
     &0.2992933E-01,0.3165168E-01,0.3345806E-01,0.3535065E-01,          
     &0.3733137E-01,0.3940182E-01,0.4156324E-01,0.4381642E-01,          
     &0.4616158E-01,0.4859832E-01,0.5112547E-01,0.5374099E-01,          
     &0.5644180E-01,0.5922365E-01,0.6208096E-01,0.6500662E-01,          
     &0.6799179E-01,0.7102572E-01,0.7409551E-01,0.7718590E-01,          
     &0.8027902E-01,0.8335419E-01,0.8638770E-01,0.8935259E-01,          
     &0.9221849E-01,0.9495144E-01,0.9751385E-01,0.9986442E-01,          
     &0.1019582E+00,0.1037466E+00,0.1051779E+00,0.1061971E+00,          
     &0.1067469E+00,0.1067680E+00,0.1061999E+00,0.1049822E+00,          
     &0.1030559E+00,0.1003652E+00,0.9686038E-01,0.9250116E-01,          
     &0.8726197E-01,0.8113854E-01,0.7415693E-01,0.6638451E-01,          
     &0.5794290E-01,0.4902086E-01,0.3988442E-01,0.3087885E-01,          
     &0.2241547E-01,0.1493511E-01,0.8842264E-02,0.4411529E-02,          
     &0.1684416E-02,0.3999742E-03,0.3136465E-04,0.0000000E+00/          
      data fgd70/                                                       
     &0.2179732E-02,0.2325484E-02,0.2480724E-02,0.2646046E-02,          
     &0.2822081E-02,0.3009495E-02,0.3208994E-02,0.3421325E-02,          
     &0.3647280E-02,0.3887694E-02,0.4143450E-02,0.4415481E-02,          
     &0.4704773E-02,0.5012366E-02,0.5339357E-02,0.5686903E-02,          
     &0.6056224E-02,0.6448604E-02,0.6865394E-02,0.7308017E-02,          
     &0.7777968E-02,0.8276816E-02,0.8806209E-02,0.9367875E-02,          
     &0.9963621E-02,0.1059534E-01,0.1126502E-01,0.1197471E-01,          
     &0.1272658E-01,0.1352286E-01,0.1436589E-01,0.1525808E-01,          
     &0.1620193E-01,0.1720003E-01,0.1825504E-01,0.1936970E-01,          
     &0.2054681E-01,0.2178922E-01,0.2309987E-01,0.2448167E-01,          
     &0.2593759E-01,0.2747059E-01,0.2908361E-01,0.3077952E-01,          
     &0.3256112E-01,0.3443109E-01,0.3639195E-01,0.3844599E-01,          
     &0.4059523E-01,0.4284138E-01,0.4518569E-01,0.4762896E-01,          
     &0.5017135E-01,0.5281235E-01,0.5555058E-01,0.5838376E-01,          
     &0.6130842E-01,0.6431987E-01,0.6741194E-01,0.7057678E-01,          
     &0.7380471E-01,0.7708393E-01,0.8040033E-01,0.8373725E-01,          
     &0.8707520E-01,0.9039164E-01,0.9366076E-01,0.9685324E-01,          
     &0.9993610E-01,0.1028725E+00,0.1056216E+00,0.1081388E+00,          
     &0.1103753E+00,0.1122788E+00,0.1137931E+00,0.1148592E+00,          
     &0.1154151E+00,0.1153971E+00,0.1147402E+00,0.1133797E+00,          
     &0.1112523E+00,0.1082988E+00,0.1044664E+00,0.9971298E-01,          
     &0.9401243E-01,0.8736203E-01,0.7979196E-01,0.7137727E-01,          
     &0.6225147E-01,0.5262032E-01,0.4277221E-01,0.3307985E-01,          
     &0.2398538E-01,0.1596061E-01,0.9435927E-02,0.4700243E-02,          
     &0.1791496E-02,0.4245855E-03,0.3320828E-04,0.0000000E+00/          
      data fgd71/                                                       
     &0.2350726E-02,0.2507795E-02,0.2675080E-02,0.2853219E-02,          
     &0.3042891E-02,0.3244813E-02,0.3459742E-02,0.3688483E-02,          
     &0.3931885E-02,0.4190848E-02,0.4466319E-02,0.4759301E-02,          
     &0.5070854E-02,0.5402095E-02,0.5754202E-02,0.6128417E-02,          
     &0.6526052E-02,0.6948483E-02,0.7397162E-02,0.7873616E-02,          
     &0.8379449E-02,0.8916345E-02,0.9486072E-02,0.1009048E-01,          
     &0.1073151E-01,0.1141120E-01,0.1213166E-01,0.1289510E-01,          
     &0.1370384E-01,0.1456028E-01,0.1546691E-01,0.1642631E-01,          
     &0.1744116E-01,0.1851424E-01,0.1964838E-01,0.2084650E-01,          
     &0.2211162E-01,0.2344677E-01,0.2485506E-01,0.2633963E-01,          
     &0.2790363E-01,0.2955021E-01,0.3128248E-01,0.3310352E-01,          
     &0.3501628E-01,0.3702360E-01,0.3912814E-01,0.4133230E-01,          
     &0.4363823E-01,0.4604766E-01,0.4856191E-01,0.5118174E-01,          
     &0.5390726E-01,0.5673785E-01,0.5967196E-01,0.6270701E-01,          
     &0.6583922E-01,0.6906345E-01,0.7237296E-01,0.7575924E-01,          
     &0.7921179E-01,0.8271784E-01,0.8626214E-01,0.8982673E-01,          
     &0.9339056E-01,0.9692940E-01,0.1004155E+00,0.1038173E+00,          
     &0.1070994E+00,0.1102222E+00,0.1131421E+00,0.1158111E+00,          
     &0.1181772E+00,0.1201842E+00,0.1217724E+00,0.1228784E+00,          
     &0.1234365E+00,0.1233785E+00,0.1226356E+00,0.1211389E+00,          
     &0.1188215E+00,0.1156208E+00,0.1114816E+00,0.1063599E+00,          
     &0.1002294E+00,0.9308896E-01,0.8497272E-01,0.7596298E-01,          
     &0.6620447E-01,0.5591876E-01,0.4541499E-01,0.3509114E-01,          
     &0.2541763E-01,0.1689447E-01,0.9975435E-02,0.4962022E-02,          
     &0.1888346E-02,0.4467912E-03,0.3487015E-04,0.0000000E+00/          
      data fgd72/                                                       
     &0.2511203E-02,0.2678883E-02,0.2857461E-02,0.3047616E-02,          
     &0.3250071E-02,0.3465590E-02,0.3694981E-02,0.3939101E-02,          
     &0.4198853E-02,0.4475196E-02,0.4769139E-02,0.5081751E-02,          
     &0.5414158E-02,0.5767549E-02,0.6143181E-02,0.6542373E-02,          
     &0.6966521E-02,0.7417092E-02,0.7895629E-02,0.8403756E-02,          
     &0.8943178E-02,0.9515687E-02,0.1012316E-01,0.1076757E-01,          
     &0.1145098E-01,0.1217554E-01,0.1294350E-01,0.1375723E-01,          
     &0.1461916E-01,0.1553185E-01,0.1649794E-01,0.1752018E-01,          
     &0.1860141E-01,0.1974456E-01,0.2095264E-01,0.2222877E-01,          
     &0.2357609E-01,0.2499786E-01,0.2649735E-01,0.2807788E-01,          
     &0.2974278E-01,0.3149537E-01,0.3333895E-01,0.3527674E-01,          
     &0.3731185E-01,0.3944728E-01,0.4168579E-01,0.4402991E-01,          
     &0.4648186E-01,0.4904343E-01,0.5171597E-01,0.5450023E-01,          
     &0.5739625E-01,0.6040328E-01,0.6351960E-01,0.6674241E-01,          
     &0.7006757E-01,0.7348952E-01,0.7700101E-01,0.8059288E-01,          
     &0.8425386E-01,0.8797028E-01,0.9172583E-01,0.9550126E-01,          
     &0.9927417E-01,0.1030187E+00,0.1067051E+00,0.1103001E+00,          
     &0.1137657E+00,0.1170601E+00,0.1201367E+00,0.1229446E+00,          
     &0.1254287E+00,0.1275294E+00,0.1291833E+00,0.1303236E+00,          
     &0.1308806E+00,0.1307824E+00,0.1299562E+00,0.1283297E+00,          
     &0.1258326E+00,0.1223992E+00,0.1179720E+00,0.1125056E+00,          
     &0.1059735E+00,0.9837621E-01,0.8975170E-01,0.8018916E-01,          
     &0.6984385E-01,0.5895212E-01,0.4784237E-01,0.3693595E-01,          
     &0.2672931E-01,0.1774825E-01,0.1046774E-01,0.5200384E-02,          
     &0.1976326E-02,0.4669166E-03,0.3637487E-04,0.0000000E+00/          
      data fgd73/                                                       
     &0.2662097E-02,0.2839747E-02,0.3028932E-02,0.3230373E-02,          
     &0.3444835E-02,0.3673126E-02,0.3916098E-02,0.4174659E-02,          
     &0.4449764E-02,0.4742425E-02,0.5053711E-02,0.5384750E-02,          
     &0.5736732E-02,0.6110915E-02,0.6508625E-02,0.6931258E-02,          
     &0.7380287E-02,0.7857260E-02,0.8363810E-02,0.8901649E-02,          
     &0.9472580E-02,0.1007849E-01,0.1072137E-01,0.1140329E-01,          
     &0.1212643E-01,0.1289306E-01,0.1370556E-01,0.1456642E-01,          
     &0.1547821E-01,0.1644361E-01,0.1746543E-01,0.1854655E-01,          
     &0.1968995E-01,0.2089874E-01,0.2217608E-01,0.2352524E-01,          
     &0.2494954E-01,0.2645240E-01,0.2803725E-01,0.2970759E-01,          
     &0.3146690E-01,0.3331867E-01,0.3526636E-01,0.3731333E-01,          
     &0.3946285E-01,0.4171803E-01,0.4408176E-01,0.4655666E-01,          
     &0.4914502E-01,0.5184871E-01,0.5466905E-01,0.5760679E-01,          
     &0.6066193E-01,0.6383357E-01,0.6711985E-01,0.7051770E-01,          
     &0.7402270E-01,0.7762886E-01,0.8132844E-01,0.8511169E-01,          
     &0.8896660E-01,0.9287864E-01,0.9683050E-01,0.1008018E+00,          
     &0.1047687E+00,0.1087039E+00,0.1125761E+00,0.1163497E+00,          
     &0.1199850E+00,0.1234376E+00,0.1266584E+00,0.1295939E+00,          
     &0.1321858E+00,0.1343716E+00,0.1360844E+00,0.1372541E+00,          
     &0.1378073E+00,0.1376688E+00,0.1367624E+00,0.1350121E+00,          
     &0.1323447E+00,0.1286919E+00,0.1239939E+00,0.1182043E+00,          
     &0.1112963E+00,0.1032721E+00,0.9417345E-01,0.8409605E-01,          
     &0.7320507E-01,0.6175067E-01,0.5007923E-01,0.3863377E-01,          
     &0.2793473E-01,0.1853160E-01,0.1091860E-01,0.5418237E-02,          
     &0.2056557E-02,0.4852285E-03,0.3774268E-04,0.0000000E+00/          
      data fgd74/                                                       
     &0.2804243E-02,0.2991275E-02,0.3190444E-02,0.3402507E-02,          
     &0.3628268E-02,0.3868576E-02,0.4124328E-02,0.4396475E-02,          
     &0.4686025E-02,0.4994037E-02,0.5321636E-02,0.5670007E-02,          
     &0.6040401E-02,0.6434137E-02,0.6852609E-02,0.7297284E-02,          
     &0.7769706E-02,0.8271502E-02,0.8804386E-02,0.9370156E-02,          
     &0.9970701E-02,0.1060801E-01,0.1128415E-01,0.1200132E-01,          
     &0.1276179E-01,0.1356795E-01,0.1442229E-01,0.1532741E-01,          
     &0.1628602E-01,0.1730094E-01,0.1837508E-01,0.1951147E-01,          
     &0.2071325E-01,0.2198365E-01,0.2332599E-01,0.2474368E-01,          
     &0.2624021E-01,0.2781913E-01,0.2948406E-01,0.3123862E-01,          
     &0.3308646E-01,0.3503123E-01,0.3707650E-01,0.3922581E-01,          
     &0.4148253E-01,0.4384991E-01,0.4633093E-01,0.4892831E-01,          
     &0.5164440E-01,0.5448110E-01,0.5743977E-01,0.6052113E-01,          
     &0.6372508E-01,0.6705067E-01,0.7049583E-01,0.7405727E-01,          
     &0.7773026E-01,0.8150845E-01,0.8538363E-01,0.8934546E-01,          
     &0.9338124E-01,0.9747565E-01,0.1016104E+00,0.1057640E+00,          
     &0.1099115E+00,0.1140240E+00,0.1180687E+00,0.1220081E+00,          
     &0.1258006E+00,0.1293996E+00,0.1327537E+00,0.1358066E+00,          
     &0.1384974E+00,0.1407606E+00,0.1425263E+00,0.1437211E+00,          
     &0.1442686E+00,0.1440901E+00,0.1431061E+00,0.1412379E+00,          
     &0.1384091E+00,0.1345490E+00,0.1295960E+00,0.1235025E+00,          
     &0.1162420E+00,0.1078180E+00,0.9827607E-01,0.8771799E-01,          
     &0.7631831E-01,0.6434017E-01,0.5214671E-01,0.4020108E-01,          
     &0.2904596E-01,0.1925261E-01,0.1133286E-01,0.5618017E-02,          
     &0.2129974E-02,0.5019494E-03,0.3899042E-04,0.0000000E+00/          
      data fgd75/                                                       
     &0.2938384E-02,0.3134264E-02,0.3342846E-02,0.3564924E-02,          
     &0.3801337E-02,0.4052974E-02,0.4320772E-02,0.4605727E-02,          
     &0.4908890E-02,0.5231371E-02,0.5574344E-02,0.5939047E-02,          
     &0.6326790E-02,0.6738950E-02,0.7176982E-02,0.7642421E-02,          
     &0.8136880E-02,0.8662058E-02,0.9219744E-02,0.9811818E-02,          
     &0.1044025E-01,0.1110712E-01,0.1181459E-01,0.1256494E-01,          
     &0.1336055E-01,0.1420392E-01,0.1509764E-01,0.1604442E-01,          
     &0.1704709E-01,0.1810858E-01,0.1923195E-01,0.2042034E-01,          
     &0.2167702E-01,0.2300536E-01,0.2440883E-01,0.2589096E-01,          
     &0.2745539E-01,0.2910583E-01,0.3084601E-01,0.3267972E-01,          
     &0.3461075E-01,0.3664287E-01,0.3877982E-01,0.4102523E-01,          
     &0.4338262E-01,0.4585532E-01,0.4844644E-01,0.5115876E-01,          
     &0.5399469E-01,0.5695618E-01,0.6004458E-01,0.6326059E-01,          
     &0.6660406E-01,0.7007390E-01,0.7366791E-01,0.7738256E-01,          
     &0.8121286E-01,0.8515207E-01,0.8919153E-01,0.9332037E-01,          
     &0.9752524E-01,0.1017900E+00,0.1060956E+00,0.1104195E+00,          
     &0.1147353E+00,0.1190131E+00,0.1232184E+00,0.1273121E+00,          
     &0.1312507E+00,0.1349855E+00,0.1384629E+00,0.1416242E+00,          
     &0.1444059E+00,0.1467398E+00,0.1485532E+00,0.1497696E+00,          
     &0.1503096E+00,0.1500915E+00,0.1490328E+00,0.1470519E+00,          
     &0.1440699E+00,0.1400138E+00,0.1348202E+00,0.1284406E+00,          
     &0.1208488E+00,0.1120497E+00,0.1020923E+00,0.9108449E-01,          
     &0.7920949E-01,0.6674267E-01,0.5406285E-01,0.4165195E-01,          
     &0.3007326E-01,0.1991818E-01,0.1171464E-01,0.5801781E-02,          
     &0.2197365E-02,0.5172660E-03,0.4013225E-04,0.0000000E+00/          
      data fgd76/                                                       
     &0.3065184E-02,0.3269420E-02,0.3486893E-02,0.3718430E-02,          
     &0.3964903E-02,0.4227238E-02,0.4506411E-02,0.4803459E-02,          
     &0.5119475E-02,0.5455616E-02,0.5813102E-02,0.6193224E-02,          
     &0.6597342E-02,0.7026891E-02,0.7483386E-02,0.7968420E-02,          
     &0.8483673E-02,0.9030915E-02,0.9612003E-02,0.1022889E-01,          
     &0.1088364E-01,0.1157839E-01,0.1231540E-01,0.1309705E-01,          
     &0.1392581E-01,0.1480426E-01,0.1573511E-01,0.1672117E-01,          
     &0.1776537E-01,0.1887077E-01,0.2004054E-01,0.2127793E-01,          
     &0.2258635E-01,0.2396929E-01,0.2543033E-01,0.2697317E-01,          
     &0.2860156E-01,0.3031934E-01,0.3213039E-01,0.3403862E-01,          
     &0.3604796E-01,0.3816231E-01,0.4038553E-01,0.4272138E-01,          
     &0.4517347E-01,0.4774526E-01,0.5043992E-01,0.5326032E-01,          
     &0.5620892E-01,0.5928769E-01,0.6249800E-01,0.6584052E-01,          
     &0.6931503E-01,0.7292034E-01,0.7665408E-01,0.8051253E-01,          
     &0.8449040E-01,0.8858064E-01,0.9277413E-01,0.9705950E-01,          
     &0.1014228E+00,0.1058472E+00,0.1103126E+00,0.1147957E+00,          
     &0.1192690E+00,0.1237011E+00,0.1280563E+00,0.1322939E+00,          
     &0.1363685E+00,0.1402296E+00,0.1438214E+00,0.1470831E+00,          
     &0.1499487E+00,0.1523474E+00,0.1542037E+00,0.1554386E+00,          
     &0.1559697E+00,0.1557126E+00,0.1545819E+00,0.1524934E+00,          
     &0.1493658E+00,0.1451239E+00,0.1397030E+00,0.1330537E+00,          
     &0.1251499E+00,0.1159981E+00,0.1056508E+00,0.9422119E-01,          
     &0.8190110E-01,0.6897728E-01,0.5584328E-01,0.4299853E-01,          
     &0.3102553E-01,0.2053426E-01,0.1206745E-01,0.5971296E-02,          
     &0.2259406E-02,0.5313383E-03,0.4118029E-04,0.0000000E+00/          
      data fgd77/                                                       
     &0.3185243E-02,0.3397386E-02,0.3623272E-02,0.3863756E-02,          
     &0.4119747E-02,0.4392202E-02,0.4682135E-02,0.4990621E-02,          
     &0.5318794E-02,0.5667853E-02,0.6039065E-02,0.6433766E-02,          
     &0.6853368E-02,0.7299359E-02,0.7773308E-02,0.8276867E-02,          
     &0.8811779E-02,0.9379875E-02,0.9983082E-02,0.1062343E-01,          
     &0.1130303E-01,0.1202413E-01,0.1278907E-01,0.1360029E-01,          
     &0.1446035E-01,0.1537194E-01,0.1633786E-01,0.1736102E-01,          
     &0.1844445E-01,0.1959132E-01,0.2080489E-01,0.2208855E-01,          
     &0.2344581E-01,0.2488029E-01,0.2639568E-01,0.2799580E-01,          
     &0.2968455E-01,0.3146586E-01,0.3334376E-01,0.3532229E-01,          
     &0.3740548E-01,0.3959737E-01,0.4190193E-01,0.4432303E-01,          
     &0.4686439E-01,0.4952955E-01,0.5232178E-01,0.5524399E-01,          
     &0.5829871E-01,0.6148794E-01,0.6481303E-01,0.6827462E-01,          
     &0.7187246E-01,0.7560522E-01,0.7947040E-01,0.8346407E-01,          
     &0.8758068E-01,0.9181284E-01,0.9615104E-01,0.1005834E+00,          
     &0.1050954E+00,0.1096695E+00,0.1142849E+00,0.1189172E+00,          
     &0.1235379E+00,0.1281146E+00,0.1326100E+00,0.1369820E+00,          
     &0.1411836E+00,0.1451624E+00,0.1488608E+00,0.1522156E+00,          
     &0.1551587E+00,0.1576167E+00,0.1595120E+00,0.1607627E+00,          
     &0.1612837E+00,0.1609882E+00,0.1597881E+00,0.1575967E+00,          
     &0.1543304E+00,0.1499125E+00,0.1442764E+00,0.1373723E+00,          
     &0.1291741E+00,0.1196901E+00,0.1089759E+00,0.9715013E-01,          
     &0.8441242E-01,0.7106037E-01,0.5750133E-01,0.4425118E-01,          
     &0.3191026E-01,0.2110584E-01,0.1239426E-01,0.6128042E-02,          
     &0.2316661E-02,0.5442988E-03,0.4214457E-04,0.0000000E+00/          
      data fgd78/                                                       
     &0.3299094E-02,0.3518730E-02,0.3752587E-02,0.4001550E-02,          
     &0.4266558E-02,0.4548601E-02,0.4848728E-02,0.5168049E-02,          
     &0.5507738E-02,0.5869034E-02,0.6253246E-02,0.6661756E-02,          
     &0.7096022E-02,0.7557583E-02,0.8048059E-02,0.8569160E-02,          
     &0.9122685E-02,0.9710525E-02,0.1033467E-01,0.1099722E-01,          
     &0.1170036E-01,0.1244640E-01,0.1323775E-01,0.1407696E-01,          
     &0.1496665E-01,0.1590960E-01,0.1690870E-01,0.1796695E-01,          
     &0.1908749E-01,0.2027358E-01,0.2152858E-01,0.2285600E-01,          
     &0.2425944E-01,0.2574264E-01,0.2730941E-01,0.2896369E-01,          
     &0.3070948E-01,0.3255084E-01,0.3449191E-01,0.3653685E-01,          
     &0.3868982E-01,0.4095496E-01,0.4333634E-01,0.4583794E-01,          
     &0.4846359E-01,0.5121690E-01,0.5410121E-01,0.5711951E-01,          
     &0.6027436E-01,0.6356778E-01,0.6700113E-01,0.7057501E-01,          
     &0.7428911E-01,0.7814200E-01,0.8213104E-01,0.8625209E-01,          
     &0.9049936E-01,0.9486514E-01,0.9933954E-01,0.1039102E+00,          
     &0.1085621E+00,0.1132769E+00,0.1180332E+00,0.1228056E+00,          
     &0.1275648E+00,0.1322770E+00,0.1369038E+00,0.1414017E+00,          
     &0.1457221E+00,0.1498109E+00,0.1536085E+00,0.1570499E+00,          
     &0.1600647E+00,0.1625775E+00,0.1645080E+00,0.1657721E+00,          
     &0.1662822E+00,0.1659489E+00,0.1646819E+00,0.1623920E+00,          
     &0.1589938E+00,0.1544084E+00,0.1485684E+00,0.1414231E+00,          
     &0.1329469E+00,0.1231495E+00,0.1120896E+00,0.9989087E-01,          
     &0.8676054E-01,0.7300642E-01,0.5904885E-01,0.4541906E-01,          
     &0.3273413E-01,0.2163739E-01,0.1269772E-01,0.6273334E-02,          
     &0.2369630E-02,0.5562656E-03,0.4303403E-04,0.0000000E+00/          
      data fgd79/                                                       
     &0.3407216E-02,0.3633963E-02,0.3875385E-02,0.4132395E-02,          
     &0.4405959E-02,0.4697100E-02,0.5006899E-02,0.5336501E-02,          
     &0.5687115E-02,0.6060020E-02,0.6456564E-02,0.6878172E-02,          
     &0.7326347E-02,0.7802675E-02,0.8308827E-02,0.8846563E-02,          
     &0.9417737E-02,0.1002430E-01,0.1066830E-01,0.1135189E-01,          
     &0.1207735E-01,0.1284703E-01,0.1366343E-01,0.1452915E-01,          
     &0.1544692E-01,0.1641960E-01,0.1745014E-01,0.1854164E-01,          
     &0.1969734E-01,0.2092057E-01,0.2221482E-01,0.2358368E-01,          
     &0.2503087E-01,0.2656021E-01,0.2817564E-01,0.2988118E-01,          
     &0.3168097E-01,0.3357917E-01,0.3558004E-01,0.3768783E-01,          
     &0.3990683E-01,0.4224126E-01,0.4469532E-01,0.4727307E-01,          
     &0.4997843E-01,0.5281509E-01,0.5578646E-01,0.5889559E-01,          
     &0.6214507E-01,0.6553695E-01,0.6907258E-01,0.7275253E-01,          
     &0.7657642E-01,0.8054274E-01,0.8464868E-01,0.8888994E-01,          
     &0.9326048E-01,0.9775229E-01,0.1023551E+00,0.1070561E+00,          
     &0.1118397E+00,0.1166871E+00,0.1215760E+00,0.1264803E+00,          
     &0.1313697E+00,0.1362093E+00,0.1409595E+00,0.1455755E+00,          
     &0.1500071E+00,0.1541988E+00,0.1580891E+00,0.1616112E+00,          
     &0.1646927E+00,0.1672559E+00,0.1692184E+00,0.1704938E+00,          
     &0.1709923E+00,0.1706220E+00,0.1692903E+00,0.1669062E+00,          
     &0.1633820E+00,0.1586375E+00,0.1526039E+00,0.1452301E+00,          
     &0.1364907E+00,0.1263971E+00,0.1150108E+00,0.1024605E+00,          
     &0.8896040E-01,0.7482808E-01,0.6049609E-01,0.4651014E-01,          
     &0.3350293E-01,0.2213275E-01,0.1298010E-01,0.6408301E-02,          
     &0.2418741E-02,0.5673397E-03,0.4385629E-04,0.0000000E+00/          
      data fgd80/                                                       
     &0.3510043E-02,0.3743548E-02,0.3992159E-02,0.4256815E-02,          
     &0.4538510E-02,0.4838297E-02,0.5157286E-02,0.5496656E-02,          
     &0.5857650E-02,0.6241583E-02,0.6649842E-02,0.7083893E-02,          
     &0.7545281E-02,0.8035635E-02,0.8556674E-02,0.9110209E-02,          
     &0.9698143E-02,0.1032248E-01,0.1098534E-01,0.1168892E-01,          
     &0.1243555E-01,0.1322768E-01,0.1406785E-01,0.1495875E-01,          
     &0.1590317E-01,0.1690405E-01,0.1796443E-01,0.1908749E-01,          
     &0.2027654E-01,0.2153502E-01,0.2286651E-01,0.2427468E-01,          
     &0.2576336E-01,0.2733646E-01,0.2899802E-01,0.3075219E-01,          
     &0.3260317E-01,0.3455527E-01,0.3661281E-01,0.3878018E-01,          
     &0.4106174E-01,0.4346184E-01,0.4598476E-01,0.4863464E-01,          
     &0.5141550E-01,0.5433110E-01,0.5738492E-01,0.6058004E-01,          
     &0.6391910E-01,0.6740416E-01,0.7103658E-01,0.7481688E-01,          
     &0.7874461E-01,0.8281819E-01,0.8703467E-01,0.9138955E-01,          
     &0.9587657E-01,0.1004874E+00,0.1052115E+00,0.1100356E+00,          
     &0.1149436E+00,0.1199160E+00,0.1249300E+00,0.1299586E+00,          
     &0.1349705E+00,0.1399301E+00,0.1447963E+00,0.1495233E+00,          
     &0.1540594E+00,0.1583475E+00,0.1623247E+00,0.1659221E+00,          
     &0.1690655E+00,0.1716752E+00,0.1736669E+00,0.1749518E+00,          
     &0.1754380E+00,0.1750314E+00,0.1736375E+00,0.1711629E+00,          
     &0.1675185E+00,0.1626224E+00,0.1564048E+00,0.1488141E+00,          
     &0.1398253E+00,0.1294513E+00,0.1177564E+00,0.1048740E+00,          
     &0.9102517E-01,0.7653648E-01,0.6185213E-01,0.4753142E-01,          
     &0.3422173E-01,0.2259529E-01,0.1324338E-01,0.6533931E-02,          
     &0.2464369E-02,0.5776086E-03,0.4461802E-04,0.0000000E+00/          
      data fgd81/                                                       
     &0.3607963E-02,0.3847901E-02,0.4103354E-02,0.4375287E-02,          
     &0.4664720E-02,0.4972732E-02,0.5300466E-02,0.5649129E-02,          
     &0.6019999E-02,0.6414424E-02,0.6833828E-02,0.7279714E-02,          
     &0.7753668E-02,0.8257364E-02,0.8792562E-02,0.9361122E-02,          
     &0.9964995E-02,0.1060624E-01,0.1128702E-01,0.1200960E-01,          
     &0.1277637E-01,0.1358984E-01,0.1445261E-01,0.1536744E-01,          
     &0.1633720E-01,0.1736488E-01,0.1845361E-01,0.1960666E-01,          
     &0.2082740E-01,0.2211938E-01,0.2348624E-01,0.2493175E-01,          
     &0.2645984E-01,0.2807450E-01,0.2977989E-01,0.3158022E-01,          
     &0.3347982E-01,0.3548308E-01,0.3759443E-01,0.3981834E-01,          
     &0.4215929E-01,0.4462170E-01,0.4720995E-01,0.4992827E-01,          
     &0.5278075E-01,0.5577122E-01,0.5890322E-01,0.6217988E-01,          
     &0.6560387E-01,0.6917725E-01,0.7290138E-01,0.7677676E-01,          
     &0.8080287E-01,0.8497804E-01,0.8929917E-01,0.9376162E-01,          
     &0.9835889E-01,0.1030824E+00,0.1079212E+00,0.1128616E+00,          
     &0.1178871E+00,0.1229777E+00,0.1281098E+00,0.1332557E+00,          
     &0.1383834E+00,0.1434560E+00,0.1484316E+00,0.1532631E+00,          
     &0.1578975E+00,0.1622762E+00,0.1663346E+00,0.1700025E+00,          
     &0.1732036E+00,0.1758564E+00,0.1778746E+00,0.1791674E+00,          
     &0.1796408E+00,0.1791988E+00,0.1777447E+00,0.1751834E+00,          
     &0.1714240E+00,0.1663833E+00,0.1599905E+00,0.1521937E+00,          
     &0.1429683E+00,0.1323284E+00,0.1203414E+00,0.1071449E+00,          
     &0.9296647E-01,0.7814147E-01,0.6312495E-01,0.4848908E-01,          
     &0.3489499E-01,0.2302798E-01,0.1348931E-01,0.6651090E-02,          
     &0.2506842E-02,0.5871493E-03,0.4532500E-04,0.0000000E+00/          
      data fgd82/                                                       
     &0.4381272E-02,0.4671864E-02,0.4981186E-02,0.5310397E-02,          
     &0.5660723E-02,0.6033462E-02,0.6429983E-02,0.6851737E-02,          
     &0.7300256E-02,0.7777158E-02,0.8284149E-02,0.8823031E-02,          
     &0.9395703E-02,0.1000417E-01,0.1065053E-01,0.1133702E-01,          
     &0.1206597E-01,0.1283983E-01,0.1366119E-01,0.1453275E-01,          
     &0.1545737E-01,0.1643802E-01,0.1747782E-01,0.1858004E-01,          
     &0.1974809E-01,0.2098553E-01,0.2229608E-01,0.2368360E-01,          
     &0.2515212E-01,0.2670580E-01,0.2834895E-01,0.3008606E-01,          
     &0.3192171E-01,0.3386064E-01,0.3590772E-01,0.3806790E-01,          
     &0.4034625E-01,0.4274790E-01,0.4527803E-01,0.4794183E-01,          
     &0.5074448E-01,0.5369112E-01,0.5678676E-01,0.6003626E-01,          
     &0.6344425E-01,0.6701506E-01,0.7075263E-01,0.7466041E-01,          
     &0.7874123E-01,0.8299720E-01,0.8742955E-01,0.9203845E-01,          
     &0.9682284E-01,0.1017802E+00,0.1069064E+00,0.1121953E+00,          
     &0.1176385E+00,0.1232253E+00,0.1289420E+00,0.1347716E+00,          
     &0.1406939E+00,0.1466842E+00,0.1527139E+00,0.1587494E+00,          
     &0.1647519E+00,0.1706770E+00,0.1764746E+00,0.1820879E+00,          
     &0.1874539E+00,0.1925028E+00,0.1971579E+00,0.2013360E+00,          
     &0.2049472E+00,0.2078957E+00,0.2100799E+00,0.2113941E+00,          
     &0.2117288E+00,0.2109727E+00,0.2090146E+00,0.2057459E+00,          
     &0.2010637E+00,0.1948751E+00,0.1871034E+00,0.1776948E+00,          
     &0.1666296E+00,0.1539346E+00,0.1397001E+00,0.1240999E+00,          
     &0.1074122E+00,0.9003977E-01,0.7252128E-01,0.5552542E-01,          
     &0.3981532E-01,0.2617096E-01,0.1526329E-01,0.7489442E-02,          
     &0.2808027E-02,0.6541712E-03,0.5026553E-04,0.0000000E+00/          
      data fgd83/                                                       
     &0.4909653E-02,0.5234693E-02,0.5580636E-02,0.5948772E-02,          
     &0.6340464E-02,0.6757156E-02,0.7200371E-02,0.7671721E-02,          
     &0.8172908E-02,0.8705730E-02,0.9272082E-02,0.9873963E-02,          
     &0.1051348E-01,0.1119286E-01,0.1191444E-01,0.1268068E-01,          
     &0.1349417E-01,0.1435763E-01,0.1527393E-01,0.1624605E-01,          
     &0.1727716E-01,0.1837054E-01,0.1952964E-01,0.2075808E-01,          
     &0.2205962E-01,0.2343819E-01,0.2489790E-01,0.2644299E-01,          
     &0.2807790E-01,0.2980722E-01,0.3163570E-01,0.3356824E-01,          
     &0.3560990E-01,0.3776586E-01,0.4004147E-01,0.4244214E-01,          
     &0.4497340E-01,0.4764086E-01,0.5045015E-01,0.5340693E-01,          
     &0.5651681E-01,0.5978534E-01,0.6321795E-01,0.6681983E-01,          
     &0.7059596E-01,0.7455092E-01,0.7868886E-01,0.8301337E-01,          
     &0.8752733E-01,0.9223282E-01,0.9713086E-01,0.1022214E+00,          
     &0.1075028E+00,0.1129720E+00,0.1186239E+00,0.1244515E+00,          
     &0.1304450E+00,0.1365921E+00,0.1428771E+00,0.1492809E+00,          
     &0.1557803E+00,0.1623479E+00,0.1689515E+00,0.1755533E+00,          
     &0.1821102E+00,0.1885728E+00,0.1948851E+00,0.2009844E+00,          
     &0.2068008E+00,0.2122571E+00,0.2172690E+00,0.2217447E+00,          
     &0.2255855E+00,0.2286863E+00,0.2309364E+00,0.2322201E+00,          
     &0.2324185E+00,0.2314110E+00,0.2290775E+00,0.2253014E+00,          
     &0.2199731E+00,0.2129947E+00,0.2042868E+00,0.1937964E+00,          
     &0.1815083E+00,0.1674598E+00,0.1517581E+00,0.1346021E+00,          
     &0.1163048E+00,0.9731344E-01,0.7822045E-01,0.5975521E-01,          
     &0.4274300E-01,0.2801913E-01,0.1629221E-01,0.7967949E-02,          
     &0.2976773E-02,0.6909849E-03,0.5294773E-04,0.0000000E+00/          
      data fgd84/                                                       
     &0.5296598E-02,0.5646765E-02,0.6019413E-02,0.6415924E-02,          
     &0.6837762E-02,0.7286476E-02,0.7763696E-02,0.8271155E-02,          
     &0.8810675E-02,0.9384182E-02,0.9993709E-02,0.1064140E-01,          
     &0.1132950E-01,0.1206040E-01,0.1283661E-01,0.1366074E-01,          
     &0.1453559E-01,0.1546405E-01,0.1644918E-01,0.1749419E-01,          
     &0.1860245E-01,0.1977747E-01,0.2102293E-01,0.2234269E-01,          
     &0.2374076E-01,0.2522135E-01,0.2678881E-01,0.2844768E-01,          
     &0.3020269E-01,0.3205870E-01,0.3402077E-01,0.3609412E-01,          
     &0.3828412E-01,0.4059626E-01,0.4303621E-01,0.4560970E-01,          
     &0.4832260E-01,0.5118082E-01,0.5419031E-01,0.5735702E-01,          
     &0.6068688E-01,0.6418571E-01,0.6785917E-01,0.7171270E-01,          
     &0.7575148E-01,0.7998024E-01,0.8440325E-01,0.8902416E-01,          
     &0.9384584E-01,0.9887026E-01,0.1040983E+00,0.1095297E+00,          
     &0.1151623E+00,0.1209927E+00,0.1270150E+00,0.1332214E+00,          
     &0.1396012E+00,0.1461407E+00,0.1528229E+00,0.1596269E+00,          
     &0.1665278E+00,0.1734957E+00,0.1804957E+00,0.1874875E+00,          
     &0.1944245E+00,0.2012536E+00,0.2079149E+00,0.2143412E+00,          
     &0.2204579E+00,0.2261827E+00,0.2314255E+00,0.2360889E+00,          
     &0.2400679E+00,0.2432512E+00,0.2455214E+00,0.2467564E+00,          
     &0.2468308E+00,0.2456179E+00,0.2429917E+00,0.2388306E+00,          
     &0.2330207E+00,0.2254616E+00,0.2160728E+00,0.2048026E+00,          
     &0.1916405E+00,0.1766320E+00,0.1598975E+00,0.1416547E+00,          
     &0.1222417E+00,0.1021374E+00,0.8197172E-01,0.6251518E-01,          
     &0.4463408E-01,0.2919881E-01,0.1693974E-01,0.8264008E-02,          
     &0.3079080E-02,0.7128072E-03,0.5451533E-04,0.0000000E+00/          
      data fgd85/                                                       
     &0.5594126E-02,0.5963547E-02,0.6356651E-02,0.6774893E-02,          
     &0.7219812E-02,0.7693036E-02,0.8196278E-02,0.8731359E-02,          
     &0.9300194E-02,0.9904807E-02,0.1054733E-01,0.1123001E-01,          
     &0.1195523E-01,0.1272547E-01,0.1354337E-01,0.1441169E-01,          
     &0.1533333E-01,0.1631135E-01,0.1734896E-01,0.1844951E-01,          
     &0.1961652E-01,0.2085369E-01,0.2216488E-01,0.2355411E-01,          
     &0.2502560E-01,0.2658372E-01,0.2823305E-01,0.2997833E-01,          
     &0.3182448E-01,0.3377661E-01,0.3583999E-01,0.3802006E-01,          
     &0.4032241E-01,0.4275279E-01,0.4531708E-01,0.4802127E-01,          
     &0.5087142E-01,0.5387371E-01,0.5703429E-01,0.6035934E-01,          
     &0.6385498E-01,0.6752723E-01,0.7138193E-01,0.7542469E-01,          
     &0.7966077E-01,0.8409503E-01,0.8873180E-01,0.9357473E-01,          
     &0.9862668E-01,0.1038895E+00,0.1093640E+00,0.1150495E+00,          
     &0.1209437E+00,0.1270426E+00,0.1333400E+00,0.1398273E+00,          
     &0.1464929E+00,0.1533222E+00,0.1602972E+00,0.1673957E+00,          
     &0.1745910E+00,0.1818517E+00,0.1891410E+00,0.1964161E+00,          
     &0.2036281E+00,0.2107212E+00,0.2176323E+00,0.2242911E+00,          
     &0.2306193E+00,0.2365308E+00,0.2419313E+00,0.2467190E+00,          
     &0.2507848E+00,0.2540123E+00,0.2562797E+00,0.2574601E+00,          
     &0.2574235E+00,0.2560388E+00,0.2531762E+00,0.2487105E+00,          
     &0.2425254E+00,0.2345187E+00,0.2246098E+00,0.2127489E+00,          
     &0.1989294E+00,0.1832038E+00,0.1657031E+00,0.1466597E+00,          
     &0.1264307E+00,0.1055187E+00,0.8458110E-01,0.6441797E-01,          
     &0.4592417E-01,0.2999347E-01,0.1736925E-01,0.8456683E-02,          
     &0.3144105E-02,0.7263010E-03,0.5546716E-04,0.0000000E+00/          
      data fgd86/                                                       
     &0.5831307E-02,0.6216028E-02,0.6625385E-02,0.7060887E-02,          
     &0.7524135E-02,0.8016815E-02,0.8540711E-02,0.9097709E-02,          
     &0.9689799E-02,0.1031908E-01,0.1098776E-01,0.1169819E-01,          
     &0.1245281E-01,0.1325421E-01,0.1410513E-01,0.1500842E-01,          
     &0.1596710E-01,0.1698433E-01,0.1806344E-01,0.1920790E-01,          
     &0.2042136E-01,0.2170764E-01,0.2307073E-01,0.2451481E-01,          
     &0.2604422E-01,0.2766351E-01,0.2937740E-01,0.3119078E-01,          
     &0.3310875E-01,0.3513657E-01,0.3727969E-01,0.3954372E-01,          
     &0.4193443E-01,0.4445775E-01,0.4711972E-01,0.4992651E-01,          
     &0.5288437E-01,0.5599963E-01,0.5927863E-01,0.6272770E-01,          
     &0.6635311E-01,0.7016100E-01,0.7415736E-01,0.7834788E-01,          
     &0.8273795E-01,0.8733245E-01,0.9213575E-01,0.9715150E-01,          
     &0.1023825E+00,0.1078305E+00,0.1134962E+00,0.1193786E+00,          
     &0.1254753E+00,0.1317819E+00,0.1382916E+00,0.1449953E+00,          
     &0.1518808E+00,0.1589329E+00,0.1661323E+00,0.1734560E+00,          
     &0.1808760E+00,0.1883596E+00,0.1958683E+00,0.2033577E+00,          
     &0.2107768E+00,0.2180676E+00,0.2251649E+00,0.2319956E+00,          
     &0.2384787E+00,0.2445250E+00,0.2500372E+00,0.2549103E+00,          
     &0.2590313E+00,0.2622808E+00,0.2645331E+00,0.2656580E+00,          
     &0.2655221E+00,0.2639909E+00,0.2609320E+00,0.2562178E+00,          
     &0.2497302E+00,0.2413662E+00,0.2310456E+00,0.2187203E+00,          
     &0.2043874E+00,0.1881053E+00,0.1700138E+00,0.1503570E+00,          
     &0.1295071E+00,0.1079851E+00,0.8646946E-01,0.6578209E-01,          
     &0.4683864E-01,0.3054900E-01,0.1766434E-01,0.8586137E-02,          
     &0.3186547E-02,0.7348004E-03,0.5605183E-04,0.0000000E+00/          
      if(first) then                                                    
        first=.false.                                                   
        do i=1,n_bin_q2                                                 
          q2l_bin(i)=log(q2l_bin(i))                                    
        enddo                                                           
        do i=1,n_bin_x                                                  
          f(i,1)=fgd1(i)                                                
          f(i,2)=fgd2(i)                                                
          f(i,3)=fgd3(i)                                                
          f(i,4)=fgd4(i)                                                
          f(i,5)=fgd5(i)                                                
          f(i,6)=fgd6(i)                                                
          f(i,7)=fgd7(i)                                                
          f(i,8)=fgd8(i)                                                
          f(i,9)=fgd9(i)                                                
          f(i,10)=fgd10(i)                                              
          f(i,11)=fgd11(i)                                              
          f(i,12)=fgd12(i)                                              
          f(i,13)=fgd13(i)                                              
          f(i,14)=fgd14(i)                                              
          f(i,15)=fgd15(i)                                              
          f(i,16)=fgd16(i)                                              
          f(i,17)=fgd17(i)                                              
          f(i,18)=fgd18(i)                                              
          f(i,19)=fgd19(i)                                              
          f(i,20)=fgd20(i)                                              
          f(i,21)=fgd21(i)                                              
          f(i,22)=fgd22(i)                                              
          f(i,23)=fgd23(i)                                              
          f(i,24)=fgd24(i)                                              
          f(i,25)=fgd25(i)                                              
          f(i,26)=fgd26(i)                                              
          f(i,27)=fgd27(i)                                              
          f(i,28)=fgd28(i)                                              
          f(i,29)=fgd29(i)                                              
          f(i,30)=fgd30(i)                                              
          f(i,31)=fgd31(i)                                              
          f(i,32)=fgd32(i)                                              
          f(i,33)=fgd33(i)                                              
          f(i,34)=fgd34(i)                                              
          f(i,35)=fgd35(i)                                              
          f(i,36)=fgd36(i)                                              
          f(i,37)=fgd37(i)                                              
          f(i,38)=fgd38(i)                                              
          f(i,39)=fgd39(i)                                              
          f(i,40)=fgd40(i)                                              
          f(i,41)=fgd41(i)                                              
          f(i,42)=fgd42(i)                                              
          f(i,43)=fgd43(i)                                              
          f(i,44)=fgd44(i)                                              
          f(i,45)=fgd45(i)                                              
          f(i,46)=fgd46(i)                                              
          f(i,47)=fgd47(i)                                              
          f(i,48)=fgd48(i)                                              
          f(i,49)=fgd49(i)                                              
          f(i,50)=fgd50(i)                                              
          f(i,51)=fgd51(i)                                              
          f(i,52)=fgd52(i)                                              
          f(i,53)=fgd53(i)                                              
          f(i,54)=fgd54(i)                                              
          f(i,55)=fgd55(i)                                              
          f(i,56)=fgd56(i)                                              
          f(i,57)=fgd57(i)                                              
          f(i,58)=fgd58(i)                                              
          f(i,59)=fgd59(i)                                              
          f(i,60)=fgd60(i)                                              
          f(i,61)=fgd61(i)                                              
          f(i,62)=fgd62(i)                                              
          f(i,63)=fgd63(i)                                              
          f(i,64)=fgd64(i)                                              
          f(i,65)=fgd65(i)                                              
          f(i,66)=fgd66(i)                                              
          f(i,67)=fgd67(i)                                              
          f(i,68)=fgd68(i)                                              
          f(i,69)=fgd69(i)                                              
          f(i,70)=fgd70(i)                                              
          f(i,71)=fgd71(i)                                              
          f(i,72)=fgd72(i)                                              
          f(i,73)=fgd73(i)                                              
          f(i,74)=fgd74(i)                                              
          f(i,75)=fgd75(i)                                              
          f(i,76)=fgd76(i)                                              
          f(i,77)=fgd77(i)                                              
          f(i,78)=fgd78(i)                                              
          f(i,79)=fgd79(i)                                              
          f(i,80)=fgd80(i)                                              
          f(i,81)=fgd81(i)                                              
          f(i,82)=fgd82(i)                                              
          f(i,83)=fgd83(i)                                              
          f(i,84)=fgd84(i)                                              
          f(i,85)=fgd85(i)                                              
          f(i,86)=fgd86(i)                                              
        enddo                                                           
      endif                                                             

      if(q2in.gt.xin*cm_s) THEN                    
        f3nc00hb00=0.
        return                                       
      endif                                        
      x=log(xin)                                   
      y=log(q2in)                                  
      DO i=2,n_bin_x                               
        IF(x.LT.xl_bin(i))  goto 1                 
        IF(xl_bin(i).ge.0.)  goto 1                
      ENDDO                                        
      i=n_bin_x                                    
    1 i=i-1                                        
      DO j=2,n_bin_q2                              
        IF(y.LT.q2l_bin(j))  GOTO 2                
      ENDDO                                        
      j=n_bin_q2                                   
    2 j=j-1                                        
      dx=xl_bin(i+1)-xl_bin(i)                     
      xd=(x-xl_bin(i))/dx                          
      dy=q2l_bin(j+1)-q2l_bin(j)                   
      yd=(y-q2l_bin(j))/dy                         
      f3nc00hb00=f(i,j)+xd*(f(i+1,j)-f(i,j))
     &+yd*(f(i,j+1)-f(i,j))                        
     &+xd*yd*(f(i+1,j+1)+f(i,j)-f(i+1,j)-f(i,j+1)) 
      END