|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 85248 (0x14d00) Types: TextFile Names: »simp1625«
└─⟦00964e8f7⟧ Bits:30007478 RC8000 Dump tape fra HCØ. └─⟦b2ec5d50f⟧ └─⟦this⟧ »simp1625«
;ali time 5 0 mode list.yes lookup simproctxt clear user simproc simproc=set 25 disc3 scope user simproc lookup rydlist if ok.yes mode listing.yes simproc=algol details.8.8 81 08 09 17 01 28 2 A VIII 3p external real procedure simproc(t,maxdiagram,N,Ewritten,pvalue); value t,maxdiagram; real t; integer maxdiagram; integer array Ewritten; array N,pvalue; if t<-.5 then begin simproc:=case round (abs(t)) of ( 18.0 , 16.1 , 25.0000 , 7.5000 , 0.0000); end <*curstate, nsmax, brmin, tmax, Bmin*> else begin real E1 ,N1 ,E2 ,N2 ,E3 ,N3 ,E4 ,N4 ,E5 ,N5 ,E6 ,N6 ,E7 ,N7 ,E8 ,N8 , E9 ,N9 ,E10 ,N10 ,E11 ,N11 ,E12 ,N12 ,E13 ,N13 ,E14 ,N14 ,E15 ,N15 ,E16 ,N16 , E17 ,N17 ,E18 ,N18 ,E19 ,N19 ,E20 ,N20 ,E21 ,N21 ,E22 ,N22 ,E23 ,N23 ,E24 ,N24 , E25 ,N25 ,E26 ,N26 ,E27 ,N27 ,E28 ,N28 ,E29 ,N29 ,E30 ,N30 ,E31 ,N31 ,E32 ,N32 , E33 ,N33 ,E34 ,N34 ,E35 ,N35 ,E36 ,N36 ,E37 ,N37 ,E38 ,N38 ,E39 ,N39 ,E40 ,N40 , E41 ,N41 ,E42 ,N42 ,E43 ,N43 ,E44 ,N44 ,E45 ,N45 ,E46 ,N46 ,E47 ,N47 ,E48 ,N48 , E49 ,N49 ,E50 ,N50 ,E51 ,N51 ,E52 ,N52 ,E53 ,N53 ,E54 ,N54 ,E55 ,N55 ,E56 ,N56 , E57 ,N57 ,E58 ,N58 ,E59 ,N59 ,E60 ,N60 ,E61 ,N61 ,E62 ,N62 ,E63 ,N63 ,E64 ,N64 , E65 ,N65 ,E66 ,N66 ,E67 ,N67 ,E68 ,N68 ,E69 ,N69 ,E70 ,N70 ,E71 ,N71 ,E72 ,N72 , E73 ,N73 ,E74 ,N74 ,E75 ,N75 ,E76 ,N76 ,E77 ,N77 ,E78 ,N78 ,E79 ,N79 ,E80 ,N80 , E81 ,N81 ,E82 ,N82 ,E83 ,N83 ,E84 ,N84 ,E85 ,N85 ,E86 ,N86 ,E87 ,N87 ,E88 ,N88 , E89 ,N89 ,E90 ,N90 ,E91 ,N91 ,E92 ,N92 ,E93 ,N93 ,E94 ,N94 ,E95 ,N95 ,E96 ,N96 , E97 ,N97 ,E98 ,N98 ,E99 ,N99 ,E100,N100,E101,N101,E102,N102,E103,N103,E104,N104, E105,N105,E106,N106,E107,N107,E108,N108,E109,N109,E110,N110,E111,N111,E112,N112,r; r:=0; comment maxdiagram= 16 2 A VIII 3p delta t(slit) 0.0965 ns n* max 16.10 states in calculation 112 transitions 107 transitions dropped 1011 minimum branching ratio 25.00 minimum coefficient 1.00' -9 3s 2.464 = 0, 3p 2.631 = 1, 3d 2.919 = 2, 4s 3.476 = 3, 4p 3.648 = 4, 4d 3.909 = 5, 4f 3.994 = 6, 5s 4.514 = 7, 5p 4.653 = 8, 5d 4.905 = 9, 5f 4.992 = 10, 5g 5.000 = 11, 6s 5.485 = 12, 6p 5.649 = 13, 6d 5.903 = 14, 6f 5.994 = 15, 6g 6.000 = 16, 6h 6.000 = 17, 7s 6.485 = 18, 7p 6.649 = 19, 7d 6.901 = 20, 7f 6.994 = 21, 7i 7.000 = 22, 7h 7.000 = 23, 7g 7.000 = 24, 8s 7.485 = 25, 8p 7.649 = 26, 8d 7.900 = 27, 8f 7.994 = 28, 8i 8.000 = 29, 8k 8.000 = 30, 8h 8.000 = 31, 8g 8.000 = 32, 9s 8.485 = 33, 9p 8.649 = 34, 9d 8.900 = 35, 9f 8.994 = 36, 9h 9.000 = 37, 9l 9.000 = 38, 9i 9.000 = 39, 9k 9.000 = 40, 9g 9.000 = 41, 10s 9.485 = 42, 10p 9.649 = 43, 10d 9.899 = 44, 10f 9.994 = 45, 10g 10.000 = 46, 10k 10.000 = 47, 10m 10.000 = 48, 10i 10.000 = 49, 10h 10.000 = 50, 10l 10.000 = 51, 11s 10.485 = 52, 11p 10.649 = 53, 11d 10.899 = 54, 11f 10.994 = 55, 11g 11.000 = 56, 11i 11.000 = 57, 11k 11.000 = 58, 11h 11.000 = 59, 11l 11.000 = 60, 11n 11.000 = 61, 11m 11.000 = 62, 12s 11.485 = 63, 12p 11.649 = 64, 12d 11.898 = 65, 12f 11.994 = 66, 12n 12.000 = 67, 12l 12.000 = 68, 12h 12.000 = 69, 12o 12.000 = 70, 12m 12.000 = 71, 12k 12.000 = 72, 12i 12.000 = 73, 12g 12.000 = 74, 13s 12.485 = 75, 13p 12.649 = 76, 13d 12.898 = 77, 13f 12.994 = 78, 13n 13.000 = 79, 13i 13.000 = 80, 13g 13.000 = 81, 13l 13.000 = 82, 13k 13.000 = 83, 13h 13.000 = 84, 13m 13.000 = 85, 14s 13.485 = 86, 14p 13.649 = 87, 14d 13.898 = 88, 14f 13.994 = 89, 14m 14.000 = 90, 14l 14.000 = 91, 14k 14.000 = 92, 14i 14.000 = 93, 14g 14.000 = 94, 14h 14.000 = 95, 15s 14.485 = 96, 15p 14.649 = 97, 15d 14.898 = 98, 15f 14.994 = 99, 15g 15.000 =100, 15l 15.000 =101, 15k 15.000 =102, 15i 15.000 =103, 15h 15.000 =104, 16s 15.485 =105, 16p 15.649 =106, 16d 15.898 =107, 16f 15.994 =108, 16i 16.000 =109, 16g 16.000 =110, 16k 16.000 =111, 16h 16.000 =112; if Ewritten( 1)<=maxdiagram then E1 :=exp(-t/ 0.38459281)*1.0105307; N1 :=N(18); if Ewritten( 2)<=maxdiagram then E2 :=exp(-t/ 0.12954388)*1.0951272; N2 :=N(36); if Ewritten( 3)<=maxdiagram then E3 :=exp(-t/ 0.03243170)*3.2862757; N3 :=N( 1); if Ewritten( 4)<=maxdiagram then E4 :=exp(-t/ 0.05746631)*1.5411357; N4 :=N(19); if Ewritten( 5)<=maxdiagram then E5 :=exp(-t/ 0.05959986)*1.4981558; N5 :=N(37); if Ewritten( 6)<=maxdiagram then E6 :=exp(-t/ 0.01530833)*4.3406532'1; N6 :=N(54); if Ewritten( 7)<=maxdiagram then E7 :=exp(-t/ 0.05129475)*1.7038576; N7 :=N( 2); if Ewritten( 8)<=maxdiagram then E8 :=exp(-t/ 0.07402967)*1.3084012; N8 :=N(20); if Ewritten( 9)<=maxdiagram then E9 :=exp(-t/ 0.07125189)*1.3351631; N9 :=N(38); if Ewritten( 10)<=maxdiagram then E10:=exp(-t/ 0.02822207)*4.4645924; N10:=N(55); if Ewritten( 11)<=maxdiagram then E11:=exp(-t/ 0.05682945)*1.5550811; N11:=N(71); if Ewritten( 12)<=maxdiagram then E12:=exp(-t/ 0.06871133)*1.3628934; N12:=N( 3); if Ewritten( 13)<=maxdiagram then E13:=exp(-t/ 0.10036293)*1.1614382; N13:=N(21); if Ewritten( 14)<=maxdiagram then E14:=exp(-t/ 0.09897576)*1.1662115; N14:=N(39); if Ewritten( 15)<=maxdiagram then E15:=exp(-t/ 0.04715002)*1.8602678; N15:=N(56); if Ewritten( 16)<=maxdiagram then E16:=exp(-t/ 0.09699048)*1.1734253; N16:=N(72); if Ewritten( 17)<=maxdiagram then E17:=exp(-t/ 0.14833234)*1.0720792; N17:=N(87); if Ewritten( 18)<=maxdiagram then E18:=exp(-t/ 0.10217861)*1.1554989; N18:=N( 4); if Ewritten( 19)<=maxdiagram then E19:=exp(-t/ 0.14394037)*1.0766452; N19:=N(22); if Ewritten( 20)<=maxdiagram then E20:=exp(-t/ 0.13755421)*1.0841064; N20:=N(40); if Ewritten( 21)<=maxdiagram then E21:=exp(-t/ 0.07323754)*1.3156891; N21:=N(57); if Ewritten( 22)<=maxdiagram then E22:=exp(-t/ 0.32949519)*1.0143634; N22:=N(102); if Ewritten( 23)<=maxdiagram then E23:=exp(-t/ 0.23437034)*1.0285081; N23:=N(88); if Ewritten( 24)<=maxdiagram then E24:=exp(-t/ 0.15194442)*1.0686247; N24:=N(73); if Ewritten( 25)<=maxdiagram then E25:=exp(-t/ 0.14668224)*1.0737453; N25:=N( 5); if Ewritten( 26)<=maxdiagram then E26:=exp(-t/ 0.20170521)*1.0386037; N26:=N(23); if Ewritten( 27)<=maxdiagram then E27:=exp(-t/ 0.18843151)*1.0443078; N27:=N(41); if Ewritten( 28)<=maxdiagram then E28:=exp(-t/ 0.10736173)*1.1402576; N28:=N(58); if Ewritten( 29)<=maxdiagram then E29:=exp(-t/ 0.48976919)*1.0064856; N29:=N(103); if Ewritten( 30)<=maxdiagram then E30:=exp(-t/ 0.65497766)*1.0036233; N30:=N(116); if Ewritten( 31)<=maxdiagram then E31:=exp(-t/ 0.34794214)*1.0128750; N31:=N(89); if Ewritten( 32)<=maxdiagram then E32:=exp(-t/ 0.22398871)*1.0312371; N32:=N(74); if Ewritten( 33)<=maxdiagram then E33:=exp(-t/ 0.20443709)*1.0375674; N33:=N( 6); if Ewritten( 34)<=maxdiagram then E34:=exp(-t/ 0.27675092)*1.0203964; N34:=N(24); if Ewritten( 35)<=maxdiagram then E35:=exp(-t/ 0.25405817)*1.0242303; N35:=N(42); if Ewritten( 36)<=maxdiagram then E36:=exp(-t/ 0.15124282)*1.0692758; N36:=N(59); if Ewritten( 37)<=maxdiagram then E37:=exp(-t/ 0.49251215)*1.0064135; N37:=N(90); if Ewritten( 38)<=maxdiagram then E38:=exp(-t/ 1.19852346)*1.0010813; N38:=N(129); if Ewritten( 39)<=maxdiagram then E39:=exp(-t/ 0.69229925)*1.0032428; N39:=N(104); if Ewritten( 40)<=maxdiagram then E40:=exp(-t/ 0.93085387)*1.0017929; N40:=N(117); if Ewritten( 41)<=maxdiagram then E41:=exp(-t/ 0.31656183)*1.0155666; N41:=N(75); if Ewritten( 42)<=maxdiagram then E42:=exp(-t/ 0.27646705)*1.0204386; N42:=N( 7); if Ewritten( 43)<=maxdiagram then E43:=exp(-t/ 0.36920233)*1.0114300; N43:=N(25); if Ewritten( 44)<=maxdiagram then E44:=exp(-t/ 0.33618859)*1.0137948; N44:=N(43); if Ewritten( 45)<=maxdiagram then E45:=exp(-t/ 0.20529795)*1.0372495; N45:=N(60); if Ewritten( 46)<=maxdiagram then E46:=exp(-t/ 0.43080400)*1.0083873; N46:=N(76); if Ewritten( 47)<=maxdiagram then E47:=exp(-t/ 1.27230355)*1.0009595; N47:=N(118); if Ewritten( 48)<=maxdiagram then E48:=exp(-t/ 2.05538069)*1.0003676; N48:=N(141); if Ewritten( 49)<=maxdiagram then E49:=exp(-t/ 0.94526049)*1.0017387; N49:=N(105); if Ewritten( 50)<=maxdiagram then E50:=exp(-t/ 0.67136843)*1.0034484; N50:=N(91); if Ewritten( 51)<=maxdiagram then E51:=exp(-t/ 1.63770273)*1.0005790; N51:=N(130); if Ewritten( 52)<=maxdiagram then E52:=exp(-t/ 0.36415282)*1.0117503; N52:=N( 8); if Ewritten( 53)<=maxdiagram then E53:=exp(-t/ 0.48204392)*1.0066956; N53:=N(26); if Ewritten( 54)<=maxdiagram then E54:=exp(-t/ 0.43530242)*1.0082144; N54:=N(44); if Ewritten( 55)<=maxdiagram then E55:=exp(-t/ 0.27070767)*1.0213231; N55:=N(61); if Ewritten( 56)<=maxdiagram then E56:=exp(-t/ 0.56905531)*1.0048018; N56:=N(77); if Ewritten( 57)<=maxdiagram then E57:=exp(-t/ 1.24957083)*1.0009947; N57:=N(106); if Ewritten( 58)<=maxdiagram then E58:=exp(-t/ 1.68207810)*1.0005489; N58:=N(119); if Ewritten( 59)<=maxdiagram then E59:=exp(-t/ 0.88718893)*1.0019739; N59:=N(92); if Ewritten( 60)<=maxdiagram then E60:=exp(-t/ 2.17639350)*1.0003278; N60:=N(131); if Ewritten( 61)<=maxdiagram then E61:=exp(-t/ 3.34095011)*1.0001391; N61:=N(152); if Ewritten( 62)<=maxdiagram then E62:=exp(-t/ 2.72918525)*1.0002085; N62:=N(142); if Ewritten( 63)<=maxdiagram then E63:=exp(-t/ 0.47058147)*1.0070264; N63:=N( 9); if Ewritten( 64)<=maxdiagram then E64:=exp(-t/ 0.61821137)*1.0040677; N64:=N(27); if Ewritten( 65)<=maxdiagram then E65:=exp(-t/ 0.55541213)*1.0050410; N65:=N(45); if Ewritten( 66)<=maxdiagram then E66:=exp(-t/ 0.35022595)*1.0127070; N66:=N(62); if Ewritten( 67)<=maxdiagram then E67:=exp(-t/ 4.33880969)*1.0000825; N67:=N(153); if Ewritten( 68)<=maxdiagram then E68:=exp(-t/ 2.81391348)*1.0001961; N68:=N(132); if Ewritten( 69)<=maxdiagram then E69:=exp(-t/ 1.14712419)*1.0011804; N69:=N(93); if Ewritten( 70)<=maxdiagram then E70:=exp(-t/ 5.20269789)*1.0000574; N70:=N(162); if Ewritten( 71)<=maxdiagram then E71:=exp(-t/ 3.52348471)*1.0001251; N71:=N(143); if Ewritten( 72)<=maxdiagram then E72:=exp(-t/ 2.17136396)*1.0003294; N72:=N(120); if Ewritten( 73)<=maxdiagram then E73:=exp(-t/ 1.61421552)*1.0005960; N73:=N(107); if Ewritten( 74)<=maxdiagram then E74:=exp(-t/ 0.73656390)*1.0028645; N74:=N(78); if Ewritten( 75)<=maxdiagram then E75:=exp(-t/ 0.59578256)*1.0043801; N75:=N(10); if Ewritten( 76)<=maxdiagram then E76:=exp(-t/ 0.77708864)*1.0025733; N76:=N(28); if Ewritten( 77)<=maxdiagram then E77:=exp(-t/ 0.69483400)*1.0032192; N77:=N(46); if Ewritten( 78)<=maxdiagram then E78:=exp(-t/ 0.44282101)*1.0079372; N78:=N(63); if Ewritten( 79)<=maxdiagram then E79:=exp(-t/ 5.49185764)*1.0000515; N79:=N(154); if Ewritten( 80)<=maxdiagram then E80:=exp(-t/ 2.04335171)*1.0003719; N80:=N(108); if Ewritten( 81)<=maxdiagram then E81:=exp(-t/ 0.93167712)*1.0017898; N81:=N(79); if Ewritten( 82)<=maxdiagram then E82:=exp(-t/ 3.56752506)*1.0001220; N82:=N(133); if Ewritten( 83)<=maxdiagram then E83:=exp(-t/ 2.75145806)*1.0002051; N83:=N(121); if Ewritten( 84)<=maxdiagram then E84:=exp(-t/ 1.45044546)*1.0007382; N84:=N(94); if Ewritten( 85)<=maxdiagram then E85:=exp(-t/ 4.46376915)*1.0000779; N85:=N(144); if Ewritten( 86)<=maxdiagram then E86:=exp(-t/ 0.74250761)*1.0028188; N86:=N(11); if Ewritten( 87)<=maxdiagram then E87:=exp(-t/ 0.96302711)*1.0016751; N87:=N(29); if Ewritten( 88)<=maxdiagram then E88:=exp(-t/ 0.85691347)*1.0021159; N88:=N(47); if Ewritten( 89)<=maxdiagram then E89:=exp(-t/ 0.55053634)*1.0051308; N89:=N(64); if Ewritten( 90)<=maxdiagram then E90:=exp(-t/ 5.55803553)*1.0000503; N90:=N(145); if Ewritten( 91)<=maxdiagram then E91:=exp(-t/ 4.43213058)*1.0000790; N91:=N(134); if Ewritten( 92)<=maxdiagram then E92:=exp(-t/ 3.42050027)*1.0001327; N92:=N(122); if Ewritten( 93)<=maxdiagram then E93:=exp(-t/ 2.54235615)*1.0002402; N93:=N(109); if Ewritten( 94)<=maxdiagram then E94:=exp(-t/ 1.15887431)*1.0011566; N94:=N(80); if Ewritten( 95)<=maxdiagram then E95:=exp(-t/ 1.80383048)*1.0004773; N95:=N(95); if Ewritten( 96)<=maxdiagram then E96:=exp(-t/ 0.91008354)*1.0018757; N96:=N(12); if Ewritten( 97)<=maxdiagram then E97:=exp(-t/ 1.17501949)*1.0011250; N97:=N(30); if Ewritten( 98)<=maxdiagram then E98:=exp(-t/ 1.04145572)*1.0014322; N98:=N(48); if Ewritten( 99)<=maxdiagram then E99:=exp(-t/ 0.67355944)*1.0034260; N99:=N(65); if Ewritten(100)<=maxdiagram then E100:=exp(-t/ 1.41782911)*1.0007726; N100:=N(81); if Ewritten(101)<=maxdiagram then E101:=exp(-t/ 5.42305143)*1.0000528; N101:=N(135); if Ewritten(102)<=maxdiagram then E102:=exp(-t/ 4.18158732)*1.0000888; N102:=N(123); if Ewritten(103)<=maxdiagram then E103:=exp(-t/ 3.10938886)*1.0001606; N103:=N(110); if Ewritten(104)<=maxdiagram then E104:=exp(-t/ 2.20572612)*1.0003192; N104:=N(96); if Ewritten(105)<=maxdiagram then E105:=exp(-t/ 1.10264393)*1.0012776; N105:=N(13); if Ewritten(106)<=maxdiagram then E106:=exp(-t/ 1.41972119)*1.0007705; N106:=N(31); if Ewritten(107)<=maxdiagram then E107:=exp(-t/ 1.25599396)*1.0009846; N107:=N(49); if Ewritten(108)<=maxdiagram then E108:=exp(-t/ 0.81699578)*1.0023279; N108:=N(66); if Ewritten(109)<=maxdiagram then E109:=exp(-t/ 3.76143982)*1.0001097; N109:=N(111); if Ewritten(110)<=maxdiagram then E110:=exp(-t/ 1.71842641)*1.0005259; N110:=N(82); if Ewritten(111)<=maxdiagram then E111:=exp(-t/ 5.05216296)*1.0000608; N111:=N(124); if Ewritten(112)<=maxdiagram then E112:=exp(-t/ 2.67000861)*1.0002178; N112:=N(97); <* timing of diagrams cputime used 7 real time used 8 cpu % 81.59 blocksread 45 dropped 0 *> if maxdiagram>=1 then begin pvalue(1):=simproc:=r:=r +N1*(E1); <* timing of diagrams cputime used 0 real time used 0 cpu % 19.25 blocksread 16 written 1 dropped 0 *> if maxdiagram>=2 then begin pvalue(2):=simproc:=r:=r +N2*(E1*1.50791777 -E2*1.50791777 ) +N3*(E1*1.09209336 -E3*1.09209336 ) +N5*(E1*1.07842167 -E5*1.07842167 ) +N7*(E1*6.64198117' -1-E7*6.64198117' -1) +N9*(E1*9.71613337' -1-E9*9.71613337' -1) +N12*(E1*2.11208345 -E12*2.11208345 ) +N14*(E1*9.52900154' -1-E14*9.52900154' -1) +N18*(E1*5.43183665' -1-E18*5.43183665' -1) +N20*(E1*1.02565271 -E20*1.02565271 ) +N25*(E1*5.94047731' -1-E25*5.94047731' -1) +N27*(E1*9.31958753' -1-E27*9.31958753' -1) +N33*(E1*7.41894669' -1-E33*7.41894669' -1) +N35*(E1*2.63443678 -E35*2.63443678 ) +N42*(E1*1.18916182 -E42*1.18916182 ) +N44*(E1*7.32825323 -E44*7.32825323 ) +N52*(E1*1.07000172' 1-E52*1.07000172' 1) +N54*(-E1*4.41890518 +E54*4.41890518 ) +N63*(-E1*1.42072794 +E63*1.42072794 ) +N65*(-E1*1.29173139 +E65*1.29173139 ) +N75*(-E1*5.68586372' -1+E75*5.68586372' -1) +N77*(-E1*7.02614456' -1+E77*7.02614456' -1) +N86*(-E1*1.06022720 +E86*1.06022720 ) +N88*(-E1*1.45619583 +E88*1.45619583 ) +N96*(-E1*6.39857601' -1+E96*6.39857601' -1) +N98*(-E1*3.25885936' -1+E98*3.25885936' -1) +N105*(-E1*1.61486922' -1+E105*1.61486922' -1) +N107*(-E1*2.43915915' -1+E107*2.43915915' -1); <* timing of diagrams cputime used 1 real time used 2 cpu % 74.15 blocksread 13 written 28 dropped 0 *> if maxdiagram>=3 then begin pvalue(3):=simproc:=r:=r +N4*(E1*7.67171560' -1-E2*1.17279966 +E4*4.05628101' -1) +N6*(E1*1.56980125 -E2*1.70930749 +E6*1.39506237' -1) +N10*(E1*1.15950158 -E2*1.37368190 +E10*2.14180323' -1) +N15*(E1*1.03917761 -E2*1.43354327 +E15*3.94365663' -1) +N21*(E1*1.02088932 -E2*1.90148671 +E21*8.80597386' -1) +N28*(E1*1.07641093 -E2*4.53139660 +E28*3.45498566 ) +N36*(E1*1.22403451 +E2*4.43382712 -E36*5.65786163 ) +N45*(E1*1.54396779 +E2*1.23088050 -E45*2.77484829 ) +N55*(E1*2.37491035 +E2*6.45367011' -1-E55*3.02027736 ) +N66*(E1*7.72671078 +E2*4.05306273' -1-E66*8.13201705 ) +N78*(-E1*4.49638877 +E2*2.81503793' -1+E78*4.21488498 ) +N89*(-E1*1.55978651 +E2*2.07093714' -1+E89*1.35269280 ) +N99*(-E1*3.64317071' -1+E2*6.51825940' -2+E99*2.99134477' -1) +N108*(-E1*5.88324018' -1+E2*1.24646096' -1+E108*4.63677922' -1) +N10*(E1*3.34146167' -1-E5*5.88112219' -1+E10*2.53966052' -1) +N15*(E1*3.36752053' -1-E5*1.41445943 +E15*1.07770738 ) +N21*(E1*3.43357464' -1+E5*1.21480496 -E21*1.55816242 ); <* timing of diagrams cputime used 1 real time used 2 cpu % 70.53 blocksread 16 written 45 dropped 0 *> if maxdiagram>=4 then begin pvalue(4):=simproc:=r:=r +N7*(E1*3.75685767' -1-E2*8.23995952' -1+E4*1.60291327 -E7*1.15460308 ) +N12*(E1*2.85119104' -1-E2*7.62362498' -1-E4*6.32758650' -1 +E12*1.11000204 ) +N18*(E1*2.69291374' -1-E2*1.43105478 -E4*1.34378478' -1 +E18*1.29614189 ) +N11*(E1*1.84198170 -E2*3.04520382 -E6*5.14342443' -2+E11*1.25465636 ) +N16*(E1*1.17708734 -E2*3.81413375 -E6*1.46605293' -2+E16*2.65170695 ) +N24*(E1*1.08175799 +E2*4.12062521 -E6*6.51539052' -3-E24*5.19586781 ) +N32*(E1*1.31490929 +E2*8.20097568' -1-E6*3.57969885' -3 -E32*2.13142716 ) +N41*(E1*2.76582124 +E2*3.69010629' -1-E6*2.20940059' -3 -E41*3.13262247 ) +N46*(-E1*3.75999748 +E2*2.11536018' -1-E6*1.47925782' -3 +E46*3.54994072 ) +N56*(-E1*8.88970334' -1+E2*1.36841070' -1-E6*1.04751360' -3 +E56*7.53176778' -1) +N74*(-E1*4.45693107' -1+E2*9.47831573' -2-E6*7.69359662' -4 +E74*3.51679310' -1) +N81*(-E1*2.77095495' -1+E2*6.93152006' -2-E6*5.85179516' -4 +E81*2.08365473' -1) +N16*(E1*6.81098031' -1-E2*2.40124329 -E10*3.86108151' -2 +E16*1.75875608 ) +N24*(E1*6.66471995' -1+E2*2.76219426 -E10*1.69875100' -2 -E24*3.41167875 ) +N32*(E1*8.26453700' -1+E2*5.60825260' -1-E10*9.19035685' -3 -E32*1.37808860 ) +N41*(E1*1.75378901 +E2*2.54584184' -1-E10*5.60887149' -3 -E41*2.00276433 ) +N16*(E1*1.96279419' -1+E5*4.11786809' -1-E10*4.57830866' -2 -E16*5.62283141' -1) +N24*(E1*1.92064475' -1+E5*1.31978644' -1-E10*2.01430775' -2 -E24*3.03900042' -1) +N32*(E1*2.38168141' -1+E5*6.34652188' -2-E10*1.08975400' -2 -E32*2.90735820' -1) +N41*(E1*5.05408433' -1+E5*3.64962499' -2-E10*6.65076477' -3 -E41*5.35253918' -1); <* timing of diagrams cputime used 2 real time used 3 cpu % 63.20 blocksread 13 written 65 dropped 0 *> if maxdiagram>=5 then begin pvalue(5):=simproc:=r:=r +N17*(E1*2.99844035 +E2*2.09962677' 1+E6*5.91902561' -3-E11*7.79225979' -1 -E17*2.32214011' 1) +N23*(E1*2.30660286 +E2*1.84070253 +E6*1.75806301' -3-E11*1.96436007' -1 -E23*3.95262745 ) +N31*(E1*6.46066991 +E2*6.03749952' -1+E6*7.91201074' -4 -E11*8.18672326' -2-E31*6.98334383 ) +N37*(-E1*1.72443749 +E2*2.85512337' -1+E6*4.33447601' -4 -E11*4.29920536' -2+E37*1.48148376 ) +N23*(E1*1.53953043 +E2*2.40799310 +E6*5.23388043' -4-E16*9.56411640' -1 -E23*2.99163528 ) +N31*(E1*4.51883179 +E2*8.27678949' -1+E6*2.46836512' -4 -E16*3.74940872' -1-E31*4.97181671 ) +N37*(-E1*1.21861429 +E2*3.95457544' -1+E6*1.36624732' -4 -E16*1.88903508' -1+E37*1.01192363 ) +N31*(E1*3.38462625 -E2*7.28772920' -1+E6*8.94053120' -5 +E24*1.20102811 -E31*3.85697085 ) +N37*(-E1*9.72547121' -1-E2*3.71013767' -1+E6*5.27282174' -5 +E24*5.84814309' -1+E37*7.58693851' -1) +N23*(E1*8.90818475' -1+E2*1.51598703 +E10*2.70042074' -3 -E16*6.34344147' -1-E23*1.77516177 ) +N31*(E1*2.61473159 +E2*5.21077301' -1+E10*1.24688431' -3 -E16*2.48681151' -1-E31*2.88837462 ) +N37*(-E1*7.05126772' -1+E2*2.48966040' -1+E10*6.81811151' -4 -E16*1.25291067' -1+E37*5.80769988' -1) +N31*(E1*2.08527105 -E2*4.88521104' -1+E10*4.47105523' -4 +E24*7.88611687' -1-E31*2.38580874 ) +N37*(-E1*5.99187091' -1-E2*2.48703060' -1+E10*2.60500054' -4 +E24*3.83997173' -1+E37*4.63632478' -1) +N23*(E1*2.56716838' -1-E5*7.17402612' -2+E10*3.20204575' -3 +E16*2.02803007' -1-E23*3.90981629' -1) +N31*(E1*7.53515608' -1-E5*3.11392127' -2+E10*1.47850316' -3 +E16*7.95046118' -2-E31*8.03359510' -1) +N37*(-E1*2.03204042' -1-E5*1.64692372' -2+E10*8.08463091' -4 +E16*4.00561827' -2+E37*1.78808634' -1) +N31*(E1*6.00935213' -1-E5*8.13395905' -3+E10*5.30158993' -4 +E24*7.02466858' -2-E31*6.63578099' -1) +N37*(-E1*1.72674253' -1-E5*4.58382132' -3+E10*3.08890048' -4 +E24*3.42050837' -2+E37*1.42744101' -1); <* timing of diagrams cputime used 2 real time used 3 cpu % 74.55 blocksread 29 written 84 dropped 0 *> if maxdiagram>=6 then begin pvalue(6):=simproc:=r:=r +N22*(E1*2.09297355' 1-E2*1.36030021' 1-E6*2.88396573' -4+E11*1.62407583' -1 +E17*1.90131965' 1-E22*2.65020491' 1) +N29*(-E1*4.78112394 -E2*3.29258072 -E6*8.32778218' -5 +E11*4.46026910' -2+E17*4.39911714 +E29*3.63006811 ) +N39*(-E1*1.02982539 -E2*1.32813729 -E6*3.67789112' -5 +E11*1.91489763' -2+E17*1.74002464 +E39*5.98825839' -1) +N29*(-E1*4.75646734 -E2*3.73297467' -1-E6*3.19882645' -5 +E11*1.45410524' -2+E23*2.04549464 +E29*3.06976111 ) +N39*(-E1*1.08210640 -E2*1.59042588' -1-E6*1.49214848' -5 +E11*6.59374568' -3+E23*7.59316846' -1+E39*4.75253317' -1) +N49*(-E1*4.47138650' -1-E2*8.26104452' -2-E6*8.17853404' -6 +E11*3.55095013' -3+E23*3.68264441' -1+E49*1.57941883' -1) +N39*(-E1*2.81446003 -E2*4.84403561' -2-E6*6.23569504' -6 +E11*2.55177042' -3+E31*2.45931613 +E39*4.01038726' -1) +N49*(-E1*1.21708179 -E2*2.63318450' -2-E6*3.57684999' -6 +E11*1.43815738' -3+E31*1.11714919 +E49*1.24829874' -1) +N29*(-E1*3.17468011 -E2*4.88344917' -1-E6*9.52313716' -6 +E16*1.33184824' -1+E23*1.54817877 +E29*1.98167095 ) +N39*(-E1*7.22246451' -1-E2*2.08058308' -1-E6*4.44223370' -6 +E16*5.84876563' -2+E23*5.74706090' -1+E39*2.97115456' -1) +N49*(-E1*2.98440434' -1-E2*1.08070358' -1-E6*2.43480860' -6 +E16*3.09039202' -2+E23*2.78729252' -1+E49*9.68800545' -2) +N39*(-E1*1.96853757 -E2*6.64067349' -2-E6*1.94539323' -6 +E16*2.12913179' -2+E31*1.75091894 +E39*2.62735993' -1) +N49*(-E1*8.51272079' -1-E2*3.60982452' -2-E6*1.11589481' -6 +E16*1.17734660' -2+E31*7.95358372' -1+E49*8.02396021' -2) +N39*(-E1*1.47444390 +E2*5.84712590' -2-E6*7.04630314' -7 -E24*1.17709584' -1+E31*1.35830497 +E39*1.75377959' -1) +N49*(-E1*6.37606789' -1+E2*3.17845749' -2-E6*4.04182198' -7 -E24*6.31739792' -2+E31*6.17012702' -1+E49*5.19838960' -2) +N29*(-E1*1.83696511 -E2*3.07444634' -1-E10*9.31178570' -5 +E16*8.83354094' -2+E23*9.18650678' -1+E29*1.13751678 ) +N39*(-E1*4.17913456' -1-E2*1.30986129' -1-E10*4.30758919' -5 +E16*3.87921904' -2+E23*3.41016262' -1+E39*1.69134208' -1) +N49*(-E1*1.72686585' -1-E2*6.80372633' -2-E10*2.34858613' -5 +E16*2.04971585' -2+E23*1.65390988' -1+E49*5.48591879' -2) +N39*(-E1*1.13905487 -E2*4.18073243' -2-E10*1.84692558' -5 +E16*1.41215585' -2+E31*1.01719555 +E39*1.49563556' -1) +N49*(-E1*4.92571554' -1-E2*2.27261745' -2-E10*1.05383846' -5 +E16*7.80880215' -3+E31*4.62063080' -1+E49*4.54363846' -2) +N39*(-E1*9.08406112' -1+E2*3.91952599' -2-E10*6.62267239' -6 -E24*7.72897426' -2+E31*8.40207507' -1+E39*1.06299710' -1) +N49*(-E1*3.92830073' -1+E2*2.13062742' -2-E10*3.77883492' -6 -E24*4.14809095' -2+E31*3.81665912' -1+E49*3.13425757' -2) +N29*(-E1*5.29378193' -1+E5*5.60528279' -3-E10*1.10415253' -4 -E16*2.82412736' -2+E23*2.02333975' -1+E29*3.49790624' -1) +N39*(-E1*1.20434661' -1+E5*2.53654967' -3-E10*5.10775875' -5 -E16*1.24020579' -2+E23*7.51092636' -2+E39*5.52419829' -2) +N49*(-E1*4.97649692' -2+E5*1.36431493' -3-E10*2.78485501' -5 -E16*6.55304440' -3+E23*3.64275745' -2+E49*1.85539727' -2) +N39*(-E1*3.28253818' -1+E5*1.02237081' -3-E10*2.19000696' -5 -E16*4.51473310' -3+E31*2.82918190' -1+E39*4.88498896' -2) +N49*(-E1*1.41949696' -1+E5*5.75482520' -4-E10*1.24959749' -5 -E16*2.49651323' -3+E31*1.28516144' -1+E49*1.53670783' -2) +N39*(-E1*2.61785258' -1+E5*2.67056278' -4-E10*7.85288739' -6 -E24*6.88469161' -3+E31*2.33691532' -1+E39*3.47192139' -2) +N49*(-E1*1.13206110' -1+E5*1.50323365' -4-E10*4.48078409' -6 -E24*3.69496986' -3+E31*1.06154838' -1+E49*1.06003992' -2); <* timing of diagrams cputime used 5 real time used 5 cpu % 85.90 blocksread 29 written 113 dropped 0 *> if maxdiagram>=7 then begin pvalue(7):=simproc:=r:=r +N30*(-E1*2.97702546' 1+E2*3.35377320 +E6*6.90180143' -6 -E11*1.54301785' -2-E17*5.56656086 +E22*2.68287806' 1 +E30*5.16968492 ) +N40*(-E1*5.81664942 +E2*8.68079199' -1+E6*1.90347100' -6 -E11*4.16835230' -3-E17*1.42266592 +E22*5.73196040 +E40*6.43442185' -1) +N40*(E1*2.03739295 +E2*3.22178581' -1+E6*8.42793496' -7 -E11*1.75531403' -3-E17*5.04718201' -1-E29*2.43965343 +E40*5.86554568' -1) +N47*(E1*7.72167379' -1+E2*1.39139423' -1+E6*3.78072757' -7 -E11*7.77392894' -4-E17*2.16420282' -1-E29*8.46943766' -1 +E47*1.52834261' -1) +N58*(E1*3.80003020' -1+E2*7.36665767' -2+E6*2.05087863' -7 -E11*4.18189407' -4-E17*1.14079165' -1-E29*3.99830361' -1 +E58*6.06579145' -2) +N47*(E1*1.77270259' -1+E2*5.98201602' -2+E6*1.77965463' -7 -E11*3.55726239' -4-E17*9.12386107' -2-E39*2.83991776' -1 +E47*1.38495517' -1) +N58*(E1*9.04405244' -2+E2*3.28336722' -2+E6*1.00081061' -7 -E11*1.98380946' -4-E17*4.98584345' -2-E39*1.24095769' -1 +E58*5.08782874' -2) +N40*(E1*2.02688597 +E2*3.65271070' -2+E6*3.23729664' -7 -E11*5.72255010' -4-E23*4.16614160' -1-E29*2.06308890 +E40*4.16861913' -1) +N47*(E1*7.68185256' -1+E2*1.57749798' -2+E6*1.45223435' -7 -E11*2.53440108' -4-E23*1.72180257' -1-E29*7.16216600' -1 +E47*1.04689916' -1) +N58*(E1*3.78043317' -1+E2*8.35197337' -3+E6*7.87773344' -8 -E11*1.36335139' -4-E23*8.87929374' -2-E29*3.38115886' -1 +E58*4.06497893' -2) +N47*(E1*1.86269714' -1+E2*7.16338078' -3+E6*7.22019461' -8 -E11*1.22490535' -4-E23*6.81238019' -2-E39*2.25387792' -1 +E47*1.00200918' -1) +N58*(E1*9.50319065' -2+E2*3.93178646' -3+E6*4.06036501' -8 -E11*6.83103624' -5-E23*3.64204699' -2-E39*9.84876100' -2 +E58*3.60126567' -2) +N58*(E1*3.62651608' -2+E2*1.88607679' -3+E6*2.05530567' -8 -E11*3.39740162' -5-E23*1.63128640' -2-E49*5.54418225' -2 +E58*3.36374024' -2) +N47*(E1*4.84470534' -1+E2*2.18178489' -3+E6*3.01732249' -8 -E11*4.74036669' -5-E31*3.67808852' -1-E39*1.90191693' -1 +E47*7.13955996' -2) +N58*(E1*2.47169320' -1+E2*1.19752287' -3+E6*1.69682831' -8 -E11*2.64360153' -5-E31*1.90029951' -1-E39*8.31079852' -2 +E58*2.47975126' -2) +N58*(E1*9.87113662' -2+E2*6.01181626' -4+E6*8.98879924' -9 -E11*1.37596926' -5-E31*7.97199085' -2-E49*4.38186222' -2 +E58*2.42397336' -2) +N40*(E1*1.35283480 +E2*4.77844845' -2+E6*9.63766569' -8 -E16*9.37632822' -3-E23*3.15323828' -1-E29*1.33181808 +E40*2.55898847' -1) +N47*(E1*5.12721369' -1+E2*2.06367090' -2+E6*4.32340645' -8 -E16*4.09715153' -3-E23*1.30318513' -1-E29*4.62350514' -1 +E47*6.34080573' -2) +N58*(E1*2.52323102' -1+E2*1.09259882' -2+E6*2.34525809' -8 -E16*2.18518839' -3-E23*6.72049384' -2-E29*2.18269241' -1 +E58*2.44102536' -2) +N47*(E1*1.24324780' -1+E2*9.37108044' -3+E6*2.14950403' -8 -E16*1.91770737' -3-E23*5.15610367' -2-E39*1.40906321' -1 +E47*6.06891835' -2) +N58*(E1*6.34285660' -2+E2*5.14353324' -3+E6*1.20879996' -8 -E16*1.06032937' -3-E23*2.75656545' -2-E39*6.15717767' -2 +E58*2.16256492' -2) +N58*(E1*2.42049984' -2+E2*2.46735136' -3+E6*6.11879328' -9 -E16*5.17413872' -4-E23*1.23467592' -2-E49*3.40074886' -2 +E58*2.01993058' -2) +N47*(E1*3.38856633' -1+E2*2.99100219' -3+E6*9.41335120' -9 -E16*6.98104865' -4-E31*2.61862833' -1-E39*1.24601940' -1 +E47*4.53152326' -2) +N58*(E1*1.72879376' -1+E2*1.64168041' -3+E6*5.29371352' -9 -E16*3.85992725' -4-E31*1.35292506' -1-E39*5.44472580' -2 +E58*1.56046950' -2) +N58*(E1*6.90423851' -2+E2*8.24158039' -4+E6*2.80429833' -9 -E16*1.97119155' -4-E31*5.67568750' -2-E49*2.81662450' -2 +E58*1.52536932' -2) +N47*(E1*2.53805211' -1-E2*2.63358323' -3+E6*3.40955880' -9 +E24*6.34281292' -3-E31*2.03144519' -1-E39*8.31725936' -2 +E47*2.88026681' -2) +N58*(E1*1.29487465' -1-E2*1.44550279' -3+E6*1.91740722' -9 +E24*3.46312325' -3-E31*1.04955448' -1-E39*3.63438937' -2 +E58*9.79425444' -3) +N58*(E1*5.17130710' -2-E2*7.25672752' -4+E6*1.01572966' -9 +E24*1.71649395' -3-E31*4.40301052' -2-E49*1.82477370' -2 +E58*9.57394890' -3) +N40*(E1*7.82790787' -1+E2*3.00834161' -2+E10*1.76219946' -6 -E16*6.21889015' -3-E23*1.87105296' -1-E29*7.64488881' -1 +E40*1.44937103' -1) +N47*(E1*2.96675960' -1+E2*1.29921398' -2+E10*7.87453199' -7 -E16*2.71745344' -3-E23*7.73277559' -2-E29*2.65397980' -1 +E47*3.57743024' -2) +N58*(E1*1.46001714' -1+E2*6.87861456' -3+E10*4.26071457' -7 -E16*1.44933563' -3-E23*3.98777346' -2-E29*1.25290692' -1 +E58*1.37370074' -2) +N47*(E1*7.19380460' -2+E2*5.89969977' -3+E10*3.88254852' -7 -E16*1.27192769' -3-E23*3.05950334' -2-E39*8.02115091' -2 +E47*3.42403362' -2) +N58*(E1*3.67016704' -2+E2*3.23818605' -3+E10*2.17784104' -7 -E16*7.03268033' -4-E23*1.63567720' -2-E39*3.50499898' -2 +E58*1.21699556' -2) +N58*(E1*1.40057380' -2+E2*1.55335688' -3+E10*1.09659513' -7 -E16*3.43176983' -4-E23*7.32625904' -3-E49*1.92570413' -2 +E58*1.13672728' -2) +N47*(E1*1.96072610' -1+E2*1.88302886' -3+E10*1.66468478' -7 -E16*4.63021064' -4-E31*1.52129092' -1-E39*7.09301722' -2 +E47*2.55664801' -2) +N58*(E1*1.00033191' -1+E2*1.03354374' -3+E10*9.33772966' -8 -E16*2.56011340' -4-E31*7.85981187' -2-E39*3.09943279' -2 +E58*8.78162977' -3) +N58*(E1*3.99499945' -2+E2*5.18860661' -4+E10*4.92055244' -8 -E16*1.30740130' -4-E31*3.29728804' -2-E49*1.59493854' -2 +E58*8.58410155' -3) +N47*(E1*1.56369602' -1-E2*1.76537979' -3+E10*5.96919663' -8 +E24*4.16477879' -3-E31*1.25659225' -1-E39*5.04123929' -2 +E47*1.73025576' -2) +N58*(E1*7.97773349' -2-E2*9.68969343' -4+E10*3.34830623' -8 +E24*2.27393468' -3-E31*6.49223536' -2-E39*2.20286824' -2 +E58*5.86870228' -3) +N58*(E1*3.18604661' -2-E2*4.86442957' -4+E10*1.76440281' -8 +E24*1.12707369' -3-E31*2.72357282' -2-E49*1.10020818' -2 +E58*5.73669554' -3) +N40*(E1*2.25585325' -1-E5*2.32082231' -4+E10*2.08954227' -6 +E16*1.98821038' -3-E23*4.12101785' -2-E29*2.35083164' -1 +E40*4.89497992' -2) +N47*(E1*8.54963344' -2-E5*1.02692769' -4+E10*9.33729004' -7 +E16*8.68783497' -4-E23*1.70315362' -2-E29*8.16108623' -2 +E47*1.23790396' -2) +N58*(E1*4.20749000' -2-E5*5.52105721' -5+E10*5.05217679' -7 +E16*4.63359873' -4-E23*8.78312154' -3-E29*3.85273519' -2 +E58*4.82691892' -3) +N47*(E1*2.07311682' -2-E5*4.95309366' -5+E10*4.60376333' -7 +E16*4.06641665' -4-E23*6.73859486' -3-E39*2.61983833' -2 +E47*1.18482388' -2) +N58*(E1*1.05767191' -2-E5*2.76064473' -5+E10*2.58239264' -7 +E16*2.24838319' -4-E23*3.60259974' -3-E39*1.14478967' -2 +E58*4.27628721' -3) +N58*(E1*4.03618567' -3-E5*1.37129125' -5+E10*1.30029655' -7 +E16*1.09715403' -4-E23*1.61361783' -3-E49*6.51294034' -3 +E58*3.99423998' -3) +N47*(E1*5.65043741' -2-E5*1.99637264' -5+E10*1.97391346' -7 +E16*1.48030157' -4-E31*4.23125005' -2-E39*2.31669477' -2 +E47*8.84681036' -3) +N58*(E1*2.88276514' -2-E5*1.11269360' -5+E10*1.10722885' -7 +E16*8.18481099' -5-E31*2.18609268' -2-E39*1.01232515' -2 +E58*3.08569500' -3) +N58*(E1*1.15128239' -2-E5*5.78425203' -6+E10*5.83458488' -8 +E16*4.17982756' -5-E31*9.17092845' -3-E49*5.39425524' -3 +E58*3.01628740' -3) +N47*(E1*4.50627269' -2-E5*5.21477966' -6+E10*7.07802322' -8 +E24*3.70983478' -4-E31*3.49502910' -2-E39*1.64655073' -2 +E47*5.98723192' -3) +N58*(E1*2.29903013' -2-E5*2.90649743' -6+E10*3.97028122' -8 +E24*2.02553902' -4-E31*1.80572111' -2-E39*7.19492590' -3 +E58*2.06214857' -3) +N58*(E1*9.18157663' -3-E5*1.51092031' -6+E10*2.09215491' -8 +E24*1.00395661' -4-E31*7.57522279' -3-E49*3.72102346' -3 +E58*2.01576395' -3); <* timing of diagrams cputime used 13 real time used 14 cpu % 89.95 blocksread 29 written 165 dropped 0 *> if maxdiagram>=8 then begin pvalue(8):=simproc:=r:=r +N38*(E1*1.40668324' 1-E2*4.06425734' -1-E6*8.92948975' -8 +E11*7.68059181' -4+E17*7.86238819' -1-E22*1.01722287' 1 -E30*6.22951773 +E38*1.95433298 ) +N51*(E1*3.29367372 -E2*1.03845946' -1-E6*2.34757754' -8 +E11*1.99955510' -4+E17*1.99850913' -1-E22*2.43589969 -E30*1.24206567 +E51*2.88086741' -1) +N51*(E1*1.14165867 -E2*4.76848666' -2-E6*1.14860080' -8 +E11*9.58279525' -5+E17*9.06123653' -2-E22*9.23266359' -1 -E40*5.41895905' -1+E51*2.80480279' -1) +N60*(E1*4.55388824' -1-E2*2.00395674' -2-E6*4.91813324' -9 +E11*4.07651780' -5+E17*3.79538428' -2-E22*3.72998681' -1 -E40*1.75400772' -1+E60*7.50555937' -2) +N51*(-E1*3.99887832' -1-E2*1.76977431' -2-E6*5.08562140' -9 +E11*4.03536308' -5+E17*3.21464859' -2+E29*6.65662736' -1 -E40*4.93986135' -1+E51*2.13722140' -1) +N60*(-E1*1.59508664' -1-E2*7.43747736' -3-E6*2.17758543' -9 +E11*1.71664207' -5+E17*1.34648585' -2+E29*2.58404014' -1 -E40*1.59893346' -1+E60*5.49534515' -2) +N60*(-E1*7.23068766' -2-E2*3.84182753' -3-E6*1.16839068' -9 +E11*9.09335540' -6+E17*6.90572781' -3+E29*1.07296207' -1 -E47*9.38331957' -2+E60*5.57708731' -2) +N68*(-E1*3.81008574' -2-E2*2.09281954' -3-E6*6.44567835'-10 +E11*4.99425830' -6+E17*3.75360778' -3+E29*5.56275497' -2 -E47*3.93137021' -2+E68*2.01212279' -2) +N68*(-E1*1.86798900' -2-E2*1.10386520' -3-E6*3.48335049'-10 +E11*2.67650112' -6+E17*1.97115709' -3+E29*2.61622501' -2 -E58*2.79911868' -2+E68*1.96388587' -2) +N60*(-E1*1.65998449' -2-E2*1.65171547' -3-E6*5.49981939'-10 +E11*4.16101709' -6+E17*2.91132147' -3+E39*5.77956065' -2 -E47*8.50298672' -2+E60*4.25703392' -2) +N68*(-E1*8.74700101' -3-E2*8.99765123' -4-E6*3.03409360'-10 +E11*2.28531639' -6+E17*1.58244854' -3+E39*2.88828591' -2 -E47*3.56253333' -2+E68*1.48045067' -2) +N68*(-E1*4.44580428' -3-E2*4.91999894' -4-E6*1.69984420'-10 +E11*1.26968024' -6+E17*8.61496544' -4+E39*1.25734761' -2 -E58*2.34782824' -2+E68*1.49798445' -2) +N51*(-E1*3.97825582' -1-E2*2.00648769' -3-E6*1.95346371' -9 +E11*1.31558040' -5+E23*4.44966718' -2+E29*5.62916595' -1 -E40*3.51073910' -1+E51*1.43479559' -1) +N60*(-E1*1.58686067' -1-E2*8.43226544' -4-E6*8.36443330'-10 +E11*5.59647450' -6+E23*1.83391961' -2+E29*2.18518928' -1 -E40*1.13635542' -1+E60*3.63011154' -2) +N60*(-E1*7.19339849' -2-E2*4.35568513' -4-E6*4.48796440'-10 +E11*2.96455112' -6+E23*9.06542755' -3+E29*9.07348604' -2 -E47*6.42747858' -2+E60*3.68410872' -2) +N68*(-E1*3.79043685' -2-E2*2.37274133' -4-E6*2.47588205'-10 +E11*1.62819261' -6+E23*4.87584840' -3+E29*4.70413457' -2 -E47*2.69294865' -2+E68*1.31523072' -2) +N68*(-E1*1.85835565' -2-E2*1.25151095' -4-E6*1.33800734'-10 +E11*8.72573880' -7+E23*2.50500867' -3+E29*2.21240636' -2 -E58*1.87582421' -2+E68*1.28370050' -2) +N60*(-E1*1.74425670' -2-E2*1.97790625' -4-E6*2.23131868'-10 +E11*1.43280184' -6+E23*3.58677238' -3+E39*4.58690189' -2 -E47*6.15187475' -2+E60*2.97018813' -2) +N68*(-E1*9.19105885' -3-E2*1.07745619' -4-E6*1.23095492'-10 +E11*7.86924317' -7+E23*1.92914876' -3+E39*2.29226491' -2 -E47*2.57747772' -2+E68*1.02209969' -2) +N68*(-E1*4.67150384' -3-E2*5.89163014' -5-E6*6.89639758'-11 +E11*4.37200845' -7+E23*1.02748705' -3+E39*9.97883830' -3 -E58*1.66183920' -2+E68*1.03420497' -2) +N68*(-E1*1.78269430' -3-E2*2.82621322' -5-E6*3.49086967'-11 +E11*2.17440928' -7+E23*4.60215272' -4+E49*8.70825814' -3 -E58*1.55223077' -2+E68*8.16457332' -3) +N60*(-E1*4.53665256' -2-E2*6.02420297' -5-E6*9.32469054'-11 +E11*5.54492322' -7+E31*3.05353208' -2+E39*3.87062062' -2 -E47*4.38336093' -2+E60*2.00182956' -2) +N68*(-E1*2.39051056' -2-E2*3.28165947' -5-E6*5.14416600'-11 +E11*3.04538617' -7+E31*1.61751444' -2+E39*1.93430949' -2 -E47*1.83651579' -2+E68*6.78453637' -3) +N68*(-E1*1.21501553' -2-E2*1.79444176' -5-E6*2.88200757'-11 +E11*1.69196119' -7+E31*8.32553237' -3+E39*8.42056321' -3 -E58*1.14430543' -2+E68*6.86488927' -3) +N68*(-E1*4.85237583' -3-E2*9.00847444' -6-E6*1.52671824'-11 +E11*8.80649581' -8+E31*3.49266353' -3+E49*6.88259975' -3 -E58*1.11856617' -2+E68*5.67169469' -3) +N51*(-E1*2.65526676' -1-E2*2.62487198' -3-E6*5.81560240'-10 +E16*3.77478094' -4+E23*3.36783102' -2+E29*3.63388363' -1 -E40*2.15513593' -1+E51*8.62209906' -2) +N60*(-E1*1.05914214' -1-E2*1.10310257' -3-E6*2.49015215'-10 +E16*1.59522240' -4+E23*1.38804344' -2+E29*1.41063945' -1 -E40*6.97574025' -2+E60*2.16708176' -2) +N60*(-E1*4.80119749' -2-E2*5.69807427' -4-E6*1.33609939'-10 +E16*8.33737119' -5+E23*6.86137341' -3+E29*5.85734949' -2 -E47*3.89296263' -2+E60*2.19931667' -2) +N68*(-E1*2.52990793' -2-E2*3.10400222' -4-E6*7.37087950'-11 +E16*4.55869745' -5+E23*3.69039588' -3+E29*3.03673363' -2 -E47*1.63105148' -2+E68*7.81667527' -3) +N68*(-E1*1.24035009' -2-E2*1.63721713' -4-E6*3.98334440'-11 +E16*2.42220891' -5+E23*1.89597234' -3+E29*1.42820932' -2 -E58*1.12643499' -2+E68*7.62928494' -3) +N60*(-E1*1.16419533' -2-E2*2.58748196' -4-E6*6.64279672'-11 +E16*3.90237903' -5+E23*2.71472961' -3+E39*2.86760638' -2 -E47*3.72603630' -2+E60*1.77312473' -2) +N68*(-E1*6.13452581' -3-E2*1.40952002' -4-E6*3.66464162'-11 +E16*2.13373795' -5+E23*1.46011977' -3+E39*1.43306172' -2 -E47*1.56111363' -2+E68*6.07453984' -3) +N68*(-E1*3.11797164' -3-E2*7.70738588' -5-E6*2.05310732'-11 +E16*1.17533997' -5+E23*7.77676757' -4+E39*6.23849846' -3 -E58*9.97936697' -3+E68*6.14648387' -3) +N68*(-E1*1.18985031' -3-E2*3.69723071' -5-E6*1.03925709'-11 +E16*5.73536129' -6+E23*3.48324313' -4+E49*5.34156302' -3 -E58*9.32116684' -3+E68*4.85236676' -3) +N60*(-E1*3.17310281' -2-E2*8.25856129' -5-E6*2.90908868'-11 +E16*1.42058680' -5+E31*2.17397312' -2+E39*2.53579339' -2 -E47*2.78214653' -2+E60*1.25232081' -2) +N68*(-E1*1.67201162' -2-E2*4.49881685' -5-E6*1.60486131'-11 +E16*7.76746684' -6+E31*1.15159521' -2+E39*1.26724102' -2 -E47*1.16564803' -2+E68*4.22545492' -3) +N68*(-E1*8.49826859' -3-E2*2.45999468' -5-E6*8.99119982'-12 +E16*4.27860142' -6+E31*5.92739265' -3+E39*5.51663689' -3 -E58*7.20093885' -3+E68*4.27549925' -3) +N68*(-E1*3.39393135' -3-E2*1.23496899' -5-E6*4.76300929'-12 +E16*2.18500050' -6+E31*2.48661434' -3+E49*4.42407773' -3 -E58*7.03896565' -3+E68*3.53236963' -3) +N60*(-E1*2.37666892' -2+E2*7.27167924' -5-E6*1.05368521'-11 -E24*2.07690425' -4+E31*1.68649640' -2+E39*1.69265834' -2 -E47*1.76835114' -2+E60*7.79362683' -3) +N68*(-E1*1.25234456' -2+E2*3.96121697' -5-E6*5.81288097'-12 -E24*1.12841960' -4+E31*8.93369450' -3+E39*8.45891502' -3 -E47*7.40893766' -3+E68*2.61300354' -3) +N68*(-E1*6.36524312' -3+E2*2.16603009' -5-E6*3.25665364'-12 -E24*6.13791171' -5+E31*4.59827504' -3+E39*3.68239049' -3 -E58*4.51965433' -3+E68*2.64395074' -3) +N68*(-E1*2.54207054' -3+E2*1.08739259' -5-E6*1.72518372'-12 -E24*3.04225046' -5+E31*1.92903310' -3+E49*2.86617569' -3 -E58*4.41799219' -3+E68*2.18440251' -3) +N51*(-E1*1.53641697' -1-E2*1.65252627' -3-E10*1.97610283' -8 +E16*2.50363974' -4+E23*1.99838694' -2+E29*2.08591825' -1 -E40*1.22063527' -1+E51*4.85317117' -2) +N60*(-E1*6.12851403' -2-E2*6.94474244' -4-E10*8.44448147' -9 +E16*1.05803814' -4+E23*8.23630362' -3+E29*8.09733847' -2 -E40*3.95095011' -2+E60*1.21736320' -2) +N60*(-E1*2.77811685' -2-E2*3.58730540' -4-E10*4.51337427' -9 +E16*5.52979742' -5+E23*4.07136788' -3+E29*3.36222990' -2 -E47*2.19637737' -2+E60*1.23547123' -2) +N68*(-E1*1.46388060' -2-E2*1.95416967' -4-E10*2.48649490' -9 +E16*3.02357576' -5+E23*2.18978889' -3+E29*1.74314281' -2 -E47*9.20225777' -3+E68*4.38503051' -3) +N68*(-E1*7.17703760' -3-E2*1.03073382' -4-E10*1.34032226' -9 +E16*1.60654051' -5+E23*1.12502271' -3+E29*8.19819285' -3 -E58*6.33907616' -3+E68*4.27990752' -3) +N60*(-E1*6.73638328' -3-E2*1.62898684' -4-E10*2.22532521' -9 +E16*2.58826973' -5+E23*1.61085286' -3+E39*1.63239685' -2 -E47*2.10219891' -2+E60*9.96056922' -3) +N68*(-E1*3.54962060' -3-E2*8.87383797' -5-E10*1.22596963' -9 +E16*1.41521090' -5+E23*8.66398663' -4+E39*8.15776339' -3 -E47*8.80767420' -3+E68*3.40772024' -3) +N68*(-E1*1.80415190' -3-E2*4.85229671' -5-E10*6.85098424'-10 +E16*7.79549306' -6+E23*4.61453995' -4+E39*3.55129118' -3 -E58*5.61594482' -3+E68*3.44807970' -3) +N68*(-E1*6.88483069' -4-E2*2.32764528' -5-E10*3.44963465'-10 +E16*3.80400312' -6+E23*2.06686962' -4+E49*3.02470732' -3 -E58*5.24553900' -3+E68*2.72210058' -3) +N60*(-E1*1.83605244' -2-E2*5.19929719' -5-E10*9.54132320'-10 +E16*9.42210325' -6+E31*1.26296868' -2+E39*1.44351093' -2 -E47*1.56966410' -2+E60*7.03494115' -3) +N68*(-E1*9.67476062' -3-E2*2.83229548' -5-E10*5.25647776'-10 +E16*5.15180590' -6+E31*6.69018707' -3+E39*7.21382216' -3 -E47*6.57648995' -3+E68*2.37041301' -3) +N68*(-E1*4.91735306' -3-E2*1.54872537' -5-E10*2.93743379'-10 +E16*2.83780086' -6+E31*3.44351603' -3+E39*3.14036848' -3 -E58*4.05236879' -3+E68*2.39848708' -3) +N68*(-E1*1.96383046' -3-E2*7.77492659' -6-E10*1.54789200'-10 +E16*1.44921101' -6+E31*1.44459745' -3+E49*2.50517316' -3 -E58*3.96121746' -3+E68*1.98160319' -3) +N60*(-E1*1.46426770' -2+E2*4.87445221' -5-E10*3.42131044'-10 -E24*1.36372409' -4+E31*1.04321707' -2+E39*1.02595042' -2 -E47*1.06229733' -2+E60*4.66160356' -3) +N68*(-E1*7.71570526' -3+E2*2.65533753' -5-E10*1.88485830'-10 -E24*7.40935936' -5+E31*5.52612070' -3+E39*5.12709931' -3 -E47*4.45075331' -3+E68*1.56077897' -3) +N68*(-E1*3.92163159' -3+E2*1.45196313' -5-E10*1.05329970'-10 -E24*4.03023782' -5+E31*2.84435771' -3+E39*2.23196257' -3 -E58*2.70816996' -3+E68*1.57926411' -3) +N68*(-E1*1.56617177' -3+E2*7.28915980' -6-E10*5.55040316'-11 -E24*1.99758378' -5+E31*1.19324315' -3+E49*1.72809919' -3 -E58*2.64725416' -3+E68*1.30477033' -3) +N51*(-E1*4.42765970' -2+E5*5.60535665' -6-E10*2.34317993' -8 -E16*8.00426188' -5+E23*4.40147255' -3+E29*6.41427590' -2 -E40*4.12246762' -2+E51*1.70315024' -2) +N60*(-E1*1.76612047' -2+E5*2.38345336' -6-E10*1.00131123' -8 -E16*3.38260102' -5+E23*1.81405630' -3+E29*2.48996158' -2 -E40*1.33435960' -2+E60*4.32258116' -3) +N60*(-E1*8.00600113' -3+E5*1.26143043' -6-E10*5.35177007' -9 -E16*1.76790398' -5+E23*8.96723932' -4+E29*1.03389815' -2 -E47*7.60016006' -3+E60*4.38687869' -3) +N68*(-E1*4.21862376' -3+E5*6.92594008' -7-E10*2.94838145' -9 -E16*9.66652339' -6+E23*4.82303777' -4+E29*5.36022872' -3 -E47*3.18427211' -3+E68*1.56934025' -3) +N68*(-E1*2.06828490' -3+E5*3.70958291' -7-E10*1.58929797' -9 -E16*5.13619062' -6+E23*2.47787676' -4+E29*2.52097468' -3 -E58*2.22742886' -3+E68*1.53171822' -3) +N60*(-E1*1.94129675' -3+E5*6.08415097' -7-E10*2.63869738' -9 -E16*8.27482818' -6+E23*3.54792381' -4+E39*5.33167358' -3 -E47*7.27427282' -3+E60*3.53677266' -3) +N68*(-E1*1.02293273' -3+E5*3.34053024' -7-E10*1.45370342' -9 -E16*4.52450026' -6+E23*1.90825403' -4+E39*2.66445819' -3 -E47*3.04773372' -3+E68*1.21957476' -3) +N68*(-E1*5.19922052' -4+E5*1.85486948' -7-E10*8.12361001'-10 -E16*2.49225824' -6+E23*1.01635827' -4+E39*1.15990945' -3 -E58*1.97333448' -3+E68*1.23401884' -3) +N68*(-E1*1.98407646' -4+E5*9.21366757' -8-E10*4.09043221'-10 -E16*1.21615888' -6+E23*4.55230650' -5+E49*1.02298884' -3 -E58*1.84318104' -3+E68*9.74201207' -4) +N60*(-E1*5.29115179' -3+E5*2.45225174' -7-E10*1.13137012' -9 -E16*3.01229368' -6+E31*3.51276422' -3+E39*4.71474143' -3 -E47*5.43153402' -3+E60*2.49794836' -3) +N68*(-E1*2.78808087' -3+E5*1.34641976' -7-E10*6.23291105'-10 -E16*1.64705819' -6+E31*1.86077850' -3+E39*2.35615163' -3 -E47*2.27567343' -3+E68*8.48337211' -4) +N68*(-E1*1.41708705' -3+E5*7.47615721' -8-E10*3.48308589'-10 -E16*9.07259172' -7+E31*9.57764041' -4+E39*1.02569542' -3 -E58*1.42392408' -3+E68*8.58384523' -4) +N68*(-E1*5.65938358' -4+E5*3.88642278' -8-E10*1.83542546'-10 -E16*4.63320032' -7+E31*4.01793829' -4+E49*8.47276748' -4 -E58*1.39189527' -3+E68*7.09187686' -4) +N60*(-E1*4.21973930' -3+E5*6.40559394' -8-E10*4.05684654'-10 -E24*1.21475625' -5+E31*2.90155699' -3+E39*3.35092091' -3 -E47*3.67588459' -3+E60*1.65522990' -3) +N68*(-E1*2.22351861' -3+E5*3.51701993' -8-E10*2.23498598'-10 -E24*6.59999018' -6+E31*1.53701032' -3+E39*1.67459401' -3 -E47*1.54010135' -3+E68*5.58580666' -4) +N68*(-E1*1.13013918' -3+E5*1.95286750' -8-E10*1.24895865'-10 -E24*3.58999054' -6+E31*7.91116845' -4+E39*7.28995273' -4 -E58*9.51598590' -4+E68*5.65196236' -4) +N68*(-E1*4.51340734' -4+E5*1.01518314' -8-E10*6.58143547'-11 -E24*1.77937561' -6+E31*3.31883275' -4+E49*5.84461898' -4 -E58*9.30193955' -4+E68*4.66958805' -4); <* timing of diagrams cputime used 28 real time used 29 cpu % 95.00 blocksread 30 written 241 dropped 0 *> if maxdiagram>=9 then begin pvalue(9):=simproc:=r:=r +N48*(-E1*3.23799491 +E2*2.73387485' -2+E6*6.70052707'-10 -E11*2.18400111' -5-E17*6.11545308' -2+E22*1.94201786 +E30*2.91358623 -E38*2.73361048 +E48*1.14983892 ) +N62*(-E1*7.59917405' -1+E2*6.66992497' -3+E6*1.65882535'-10 -E11*5.37910641' -6-E17*1.48820707' -2+E22*4.59987809' -1 +E30*6.47835842' -1-E38*5.03967036' -1+E62*1.64278315' -1) +N62*(-E1*3.62343782' -1+E2*3.47055920' -3+E6*8.88104617'-11 -E11*2.85179949' -6-E17*7.70344837' -3+E22*2.24315748' -1 +E30*2.63042101' -1-E51*2.89899852' -1+E62*1.69121525' -1) +N71*(-E1*1.45500340' -1+E2*1.42909409' -3+E6*3.69338898'-11 -E11*1.18182944' -6-E17*3.16670232' -3+E22*9.06011320' -2 +E30*1.02252458' -1-E51*9.02039366' -2+E71*4.45894764' -2) +N62*(-E1*1.25596205' -1+E2*1.59364095' -3+E6*4.34523527'-11 -E11*1.36671455' -6-E17*3.49274201' -3+E22*8.50212286' -2 +E40*1.88119618' -1-E51*2.82245516' -1+E62*1.36601343' -1) +N71*(-E1*5.04335700' -2+E2*6.56223605' -4+E6*1.80706684'-11 -E11*5.66387470' -7-E17*1.43578222' -3+E22*3.43400747' -2 +E40*7.01480045' -2-E51*8.78222480' -2+E71*3.45478638' -2) +N71*(-E1*2.62015241' -2+E2*3.59186804' -4+E6*1.00778095'-11 -E11*3.13813430' -7-E17*7.83281038' -4+E22*1.80693394' -2 +E40*2.95727498' -2-E60*5.69433306' -2+E71*3.59271736' -2) +N85*(-E1*1.36303995' -2+E2*1.90147802' -4+E6*5.37298895'-12 -E11*1.66887275' -7-E17*4.14156408' -4+E22*9.43744991' -3 +E40*1.46715946' -2-E60*2.26715140' -2+E85*1.24170445' -2) +N62*(E1*4.39924782' -2+E2*5.91463292' -4+E6*1.92392530'-11 -E11*5.75530345' -7-E17*1.23911766' -3-E29*9.76376578' -2 +E40*1.71487701' -1-E51*2.15067227' -1+E62*9.78729356' -2) +N71*(E1*1.76653246' -2+E2*2.43550577' -4+E6*8.00108949'-12 -E11*2.38508601' -7-E17*5.09371461' -4-E29*3.87462326' -2 +E40*6.39461220' -2-E51*6.69193530' -2+E71*2.43201984' -2) +N71*(E1*9.17758606' -3+E2*1.33308453' -4+E6*4.46211807'-12 -E11*1.32148407' -7-E17*2.77884070' -4-E29*1.95900365' -2 +E40*2.69581819' -2-E60*4.16921964' -2+E71*2.52911728' -2) +N85*(E1*4.77430869' -3+E2*7.05713823' -5+E6*2.37898037'-12 -E11*7.02770676' -8-E17*1.46929981' -4-E29*1.01102150' -2 +E40*1.33744586' -2-E60*1.65994016' -2+E85*8.63727829' -3) +N71*(E1*4.16029176' -3+E2*6.88604561' -5+E6*2.39416424'-12 -E11*7.00013391' -8-E17*1.42518524' -4-E29*8.13430325' -3 +E47*2.49032589' -2-E60*4.23123595' -2+E71*2.14568401' -2) +N85*(E1*2.16424199' -3+E2*3.64536343' -5+E6*1.27644980'-12 -E11*3.72270006' -8-E17*7.53560433' -5-E29*4.19802967' -3 +E47*1.18755741' -2-E60*1.68463144' -2+E85*7.04346769' -3) +N85*(E1*1.23856774' -3+E2*2.15671892' -5+E6*7.64791559'-13 -E11*2.22056597' -8-E17*4.44852791' -5-E29*2.36379530' -3 +E47*5.40381965' -3-E68*1.18324751' -2+E85*7.57682330' -3) +N90*(E1*7.37906101' -4+E2*1.30111102' -5+E6*4.63786233'-13 -E11*1.34409936' -8-E17*2.68136629' -5-E29*1.40044738' -3 +E47*3.04056651' -3-E68*5.37534857' -3+E90*3.01113933' -3) +N85*(E1*6.07238545' -4+E2*1.13756915' -5+E6*4.13305925'-13 -E11*1.19003603' -8-E17*2.33608514' -5-E29*1.11171900' -3 +E58*5.83599494' -3-E68*1.15488134' -2+E85*6.22929597' -3) +N90*(E1*3.61776762' -4+E2*6.86275688' -6+E6*2.50637701'-13 -E11*7.20323868' -9-E17*1.40808377' -5-E29*6.58645847' -4 +E58*3.16470551' -3-E68*5.24648453' -3+E90*2.38587339' -3) +N71*(E1*9.55098619' -4+E2*2.96051501' -5+E6*1.12697501'-12 -E11*3.20318249' -8-E17*6.00830569' -5-E39*6.63650989' -3 +E47*2.25668623' -2-E60*3.22973516' -2+E71*1.54424105' -2) +N85*(E1*4.96855666' -4+E2*1.56724973' -5+E6*6.00847260'-13 -E11*1.70346565' -8-E17*3.17686524' -5-E39*3.36802704' -3 +E47*1.07614206' -2-E60*1.28589222' -2+E85*4.98478618' -3) +N85*(E1*2.84344081' -4+E2*9.27237359' -6+E6*3.60000771'-13 -E11*1.01610600' -8-E17*1.87541345' -5-E39*1.82801487' -3 +E47*4.89683916' -3-E68*8.70592779' -3+E85*5.36225133' -3) +N90*(E1*1.69404729' -4+E2*5.59386175' -6+E6*2.18312296'-13 -E11*6.15044741' -9-E17*1.13041224' -5-E39*1.07060756' -3 +E47*2.75530387' -3-E68*3.95499640' -3+E90*2.10661178' -3) +N85*(E1*1.44522463' -4+E2*5.07021967' -6+E6*2.01689632'-13 -E11*5.64530019' -9-E17*1.02098878' -5-E39*7.95783450' -4 +E58*4.89508138' -3-E68*8.80903676' -3+E85*4.57036168' -3) +N90*(E1*8.61026845' -5+E2*3.05877536' -6+E6*1.22308979'-13 -E11*3.41707677' -9-E17*6.15404680' -6-E39*4.66063921' -4 +E58*2.65447300' -3-E68*4.00183754' -3+E90*1.73042447' -3) +N62*(E1*4.37656059' -2+E2*6.70573533' -5+E6*7.39008660'-12 -E11*1.87630314' -7-E23*2.80348534' -3-E29*8.25671243' -2 +E40*1.21875602' -1-E51*1.44382565' -1+E62*6.40450972' -2) +N71*(E1*1.75742233' -2+E2*2.76126301' -5+E6*3.07333887'-12 -E11*7.77568795' -8-E23*1.14316742' -3-E29*3.27656877' -2 +E40*4.54462453' -2-E51*4.49254309' -2+E71*1.57862826' -2) +N71*(E1*9.13025659' -3+E2*1.51138915' -5+E6*1.71396670'-12 -E11*4.30820849' -8-E23*6.13653700' -4-E29*1.65662821' -2 +E40*1.91590687' -2-E60*2.75410041' -2+E71*1.64165438' -2) +N85*(E1*4.74968723' -3+E2*8.00105465' -6+E6*9.13802159'-13 -E11*2.29112303' -8-E23*3.22627842' -4-E29*8.54968665' -3 +E40*9.50517256' -3-E60*1.09652220' -2+E85*5.57469854' -3) +N71*(E1*4.13883684' -3+E2*7.80707780' -6+E6*9.19634510'-13 -E11*2.28213392' -8-E23*3.03341169' -4-E29*6.87876013' -3 +E47*1.70584794' -2-E60*2.79506710' -2+E71*1.39276718' -2) +N85*(E1*2.15308084' -3+E2*4.13294327' -6+E6*4.90303576'-13 -E11*1.21364822' -8-E23*1.59481328' -4-E29*3.55005687' -3 +E47*8.13464759' -3-E60*1.11283275' -2+E85*4.54601644' -3) +N85*(E1*1.23218036' -3+E2*2.44518747' -6+E6*2.93767946'-13 -E11*7.23933141' -9-E23*9.31602281' -5-E29*1.99893960' -3 +E47*3.70156157' -3-E68*7.73433649' -3+E85*4.89025644' -3) +N90*(E1*7.34100666' -4+E2*1.47513908' -6+E6*1.78147271'-13 -E11*4.38193725' -9-E23*5.59225478' -5-E29*1.18428602' -3 +E47*2.08275717' -3-E68*3.51361437' -3+E90*1.93549434' -3) +N85*(E1*6.04106972' -4+E2*1.28972292' -6+E6*1.58757025'-13 -E11*3.87967091' -9-E23*4.78618613' -5-E29*9.40123337' -4 +E58*3.91098123' -3-E68*7.54892008' -3+E85*4.02053124' -3) +N90*(E1*3.59911054' -4+E2*7.78067413' -7+E6*9.62737126'-14 -E11*2.34834870' -9-E23*2.87306856' -5-E29*5.56982775' -4 +E58*2.12082155' -3-E68*3.42938197' -3+E90*1.53358710' -3) +N71*(E1*1.00358598' -3+E2*3.54517545' -6+E6*4.57222357'-13 -E11*1.10298172' -8-E23*1.20018137' -4-E39*5.26701277' -3 +E47*1.63270289' -2-E60*2.25342838' -2+E71*1.05871656' -2) +N85*(E1*5.22079472' -4+E2*1.87675971' -6+E6*2.43768317'-13 -E11*5.86570222' -9-E23*6.30994200' -5-E39*2.67300761' -3 +E47*7.78584207' -3-E60*8.97183788' -3+E85*3.39815247' -3) +N85*(E1*2.98779339' -4+E2*1.11035381' -6+E6*1.46055059'-13 -E11*3.49885259' -9-E23*3.68592139' -5-E39*1.45078932' -3 +E47*3.54284232' -3-E68*6.01055225' -3+E85*3.65547227' -3) +N90*(E1*1.78004876' -4+E2*6.69857145' -7+E6*8.85709642'-14 -E11*2.11784095' -9-E23*2.21259779' -5-E39*8.49679092' -4 +E47*1.99345064' -3-E68*2.73052030' -3+E90*1.43020212' -3) +N85*(E1*1.51859416' -4+E2*6.07151737' -7+E6*8.18270223'-14 -E11*1.94389889' -9-E23*1.96316456' -5-E39*6.31567144' -4 +E58*3.46483529' -3-E68*6.08173844' -3+E85*3.11563732' -3) +N90*(E1*9.04738480' -5+E2*3.66284085' -7+E6*4.96216858'-14 -E11*1.17663393' -9-E23*1.17845529' -5-E39*3.69887887' -4 +E58*1.87888842' -3-E68*2.76285931' -3+E90*1.17480437' -3) +N85*(E1*5.79511277' -5+E2*2.91250507' -7+E6*4.14198089'-14 -E11*9.66794057'-10-E23*8.79308712' -6-E49*8.06641402' -4 +E58*3.23630827' -3-E68*4.80125322' -3+E85*2.32213803' -3) +N90*(E1*3.45257585' -5+E2*1.75706366' -7+E6*2.51178729'-14 -E11*5.85196429'-10-E23*5.27834511' -6-E49*4.64906223' -4 +E58*1.75496427' -3-E68*2.18115055' -3+E90*8.61669973' -4) +N71*(E1*2.61023559' -3+E2*1.07977092' -6+E6*1.91073423'-13 -E11*4.26852392' -9-E31*1.57112581' -3-E39*4.44452677' -3 +E47*1.16334066' -2-E60*1.51875212' -2+E71*6.95845605' -3) +N85*(E1*1.35788108' -3+E2*5.71613613' -7+E6*1.01870886'-13 -E11*2.27001861' -9-E31*8.19501852' -4-E39*2.25559618' -3 +E47*5.54760253' -3-E60*6.04678540' -3+E85*2.21583049' -3) +N85*(E1*7.77097806' -4+E2*3.38185731' -7+E6*6.10364732'-14 -E11*1.35405109' -9-E31*4.71470385' -4-E39*1.22423701' -3 +E47*2.52436163' -3-E68*3.98970967' -3+E85*2.38362079' -3) +N90*(E1*4.62974445' -4+E2*2.04021571' -7+E6*3.70138447'-14 -E11*8.19601505'-10-E31*2.81419719' -4-E39*7.16994933' -4 +E47*1.42038224' -3-E68*1.81247625' -3+E90*9.27331022' -4) +N85*(E1*3.94972488' -4+E2*1.84923087' -7+E6*3.41955484'-14 -E11*7.52286170'-10-E31*2.42671216' -4-E39*5.32942904' -4 +E58*2.38580834' -3-E68*4.03696194' -3+E85*2.03161106' -3) +N90*(E1*2.35314225' -4+E2*1.11560883' -7+E6*2.07369242'-14 -E11*4.55355696'-10-E31*1.44849958' -4-E39*3.12126947' -4 +E58*1.29376068' -3-E68*1.83394238' -3+E90*7.61733274' -4) +N85*(E1*1.57739132' -4+E2*9.28352727' -8+E6*1.81147920'-14 -E11*3.91557740'-10-E31*1.01803568' -4-E49*6.37531619' -4 +E58*2.33214353' -3-E68*3.33529278' -3+E85*1.58465286' -3) +N90*(E1*9.39768281' -5+E2*5.60059057' -8+E6*1.09852038'-14 -E11*2.37008274'-10-E31*6.07663440' -5-E49*3.67440125' -4 +E58*1.26465968' -3-E68*1.51518267' -3+E90*5.84696866' -4) +N62*(E1*2.92111326' -2+E2*8.77239213' -5+E6*2.20008210'-12 -E16*9.32844508' -6-E23*2.12188114' -3-E29*5.33008484' -2 +E40*7.48157246' -2-E51*8.67636333' -2+E62*3.80811102' -2) +N71*(E1*1.17298266' -2+E2*3.61226334' -5+E6*9.14955157'-13 -E16*3.85238311' -6-E23*8.65232057' -4-E29*2.11517474' -2 +E40*2.78980675' -2-E51*2.69969827' -2+E71*9.35379783' -3) +N71*(E1*6.09394365' -3+E2*1.97718783' -5+E6*5.10260253'-13 -E16*2.12040935' -6-E23*4.64457650' -4-E29*1.06942914' -2 +E40*1.17611695' -2-E60*1.64412600' -2+E71*9.72724451' -3) +N85*(E1*3.17015476' -3+E2*1.04669190' -5+E6*2.72045496'-13 -E16*1.12482947' -6-E23*2.44188163' -4-E29*5.51921307' -3 +E40*5.83493628' -3-E60*6.54595109' -3+E85*3.29491920' -3) +N71*(E1*2.76244575' -3+E2*1.02131600' -5+E6*2.73781829'-13 -E16*1.10822415' -6-E23*2.29590609' -4-E29*4.44055372' -3 +E47*1.03318933' -2-E60*1.66858205' -2+E71*8.25252084' -3) +N85*(E1*1.43706293' -3+E2*5.40668506' -6+E6*1.45966912'-13 -E16*5.87887984' -7-E23*1.20707042' -4-E29*2.29172379' -3 +E47*4.92695209' -3-E60*6.64332081' -3+E85*2.68691782' -3) +N85*(E1*8.22412558' -4+E2*3.19877571' -6+E6*8.74568372'-14 -E16*3.49112192' -7-E23*7.05104209' -5-E29*1.29040677' -3 +E47*2.24194303' -3-E68*4.59666854' -3+E85*2.89038048' -3) +N90*(E1*4.89971782' -4+E2*1.92976576' -6+E6*5.30357280'-14 -E16*2.10930284' -7-E23*4.23262422' -5-E29*7.64510695' -4 +E47*1.26147380' -3-E68*2.08821024' -3+E90*1.14188276' -3) +N85*(E1*4.03208148' -4+E2*1.68720575' -6+E6*4.72631119'-14 -E16*1.85496552' -7-E23*3.62253298' -5-E29*6.06892536' -4 +E58*2.34854953' -3-E68*4.48647192' -3+E85*2.37633039' -3) +N90*(E1*2.40220815' -4+E2*1.01786189' -6+E6*2.86613789'-14 -E16*1.12075263' -7-E23*2.17454677' -5-E29*3.59557811' -4 +E58*1.27355622' -3-E68*2.03814926' -3+E90*9.04769719' -4) +N71*(E1*6.69838396' -4+E2*4.63777165' -6+E6*1.36118395'-13 -E16*5.18713940' -7-E23*9.08384352' -5-E39*3.29279322' -3 +E47*9.88887206' -3-E60*1.34523788' -2+E71*6.27318089' -3) +N85*(E1*3.48459307' -4+E2*2.45516282' -6+E6*7.25715869'-14 -E16*2.75166079' -7-E23*4.77582199' -5-E39*1.67109170' -3 +E47*4.71568933' -3-E60*5.35595285' -3+E85*2.00847414' -3) +N85*(E1*1.99418761' -4+E2*1.45255644' -6+E6*4.34816450'-14 -E16*1.63404995' -7-E23*2.78977278' -5-E39*9.06994049' -4 +E47*2.14581077' -3-E68*3.57218961' -3+E85*2.16056271' -3) +N90*(E1*1.18808456' -4+E2*8.76302039' -7+E6*2.63682151'-14 -E16*9.87277524' -8-E23*1.67465457' -5-E39*5.31196272' -4 +E47*1.20738307' -3-E68*1.62280200' -3+E90*8.43775722' -4) +N85*(E1*1.01357800' -4+E2*7.94271299' -7+E6*2.43604950'-14 -E16*9.00093759' -8-E23*1.48586540' -5-E39*3.94838611' -4 +E58*2.08063829' -3-E68*3.61449697' -3+E85*1.84149388' -3) +N90*(E1*6.03863129' -5+E2*4.79170063' -7+E6*1.47727339'-14 -E16*5.43828137' -8-E23*8.91940481' -6-E39*2.31243853' -4 +E58*1.12827505' -3-E68*1.64202172' -3+E90*6.93098827' -4) +N85*(E1*3.86791875' -5+E2*3.81011705' -7+E6*1.23309760'-14 -E16*4.39222952' -8-E23*6.65524641' -6-E49*4.94786192' -4 +E58*1.94340750' -3-E68*2.85347937' -3+E85*1.37249703' -3) +N90*(E1*2.30440431' -5+E2*2.29857736' -7+E6*7.47777200'-15 -E16*2.65374353' -8-E23*3.99503460' -6-E49*2.85169072' -4 +E58*1.05385843' -3-E68*1.29630074' -3+E90*5.08359060' -4) +N71*(E1*1.82569544' -3+E2*1.48025462' -6+E6*5.96105072'-14 -E16*1.88827936' -7-E31*1.11856866' -3-E39*2.91178152' -3 +E47*7.38379580' -3-E60*9.50113300' -3+E71*4.32070052' -3) +N85*(E1*9.49752313' -4+E2*7.83623341' -7+E6*3.17813703'-14 -E16*1.00168973' -7-E31*5.83447285' -4-E39*1.47772836' -3 +E47*3.52109794' -3-E60*3.78279717' -3+E85*1.37243912' -3) +N85*(E1*5.43530984' -4+E2*4.63617777' -7+E6*1.90419738'-14 -E16*5.94844778' -8-E31*3.35665033' -4-E39*8.02045054' -4 +E47*1.60222808' -3-E68*2.48481804' -3+E85*1.47636493' -3) +N90*(E1*3.23821472' -4+E2*2.79692543' -7+E6*1.15474670'-14 -E16*3.59399589' -8-E31*2.00357779' -4-E39*4.69731133' -4 +E47*9.01525470' -4-E68*1.12882241' -3+E90*5.73320630' -4) +N85*(E1*2.76258385' -4+E2*2.53510490' -7+E6*1.06682235'-14 -E16*3.27661999' -8-E31*1.72770643' -4-E39*3.49151525' -4 +E58*1.50135266' -3-E68*2.51424707' -3+E85*1.25833745' -3) +N90*(E1*1.64587484' -4+E2*1.52938470' -7+E6*6.46944274'-15 -E16*1.97970281' -8-E31*1.03126447' -4-E39*2.04486445' -4 +E58*8.14143788' -4-E68*1.14219166' -3+E90*4.70940140' -4) +N85*(E1*1.10328590' -4+E2*1.27267589' -7+E6*5.65139788'-15 -E16*1.67330761' -8-E31*7.24794160' -5-E49*4.09800009' -4 +E58*1.46758222' -3-E68*2.07724279' -3+E85*9.81500877' -4) +N90*(E1*6.57308739' -5+E2*7.67783235' -8+E6*3.42713058'-15 -E16*1.01099663' -8-E31*4.32628167' -5-E49*2.36187448' -4 +E58*7.95830972' -4-E68*9.43665968' -4+E90*3.61487719' -4) +N71*(E1*1.36745447' -3-E2*1.30336707' -6+E6*2.15911980'-14 +E24*4.39533769' -6-E31*8.67748545' -4-E39*1.94363283' -3 +E47*4.69319050' -3-E60*5.91288467' -3+E71*2.66052910' -3) +N85*(E1*7.11368947' -4-E2*6.89981872' -7+E6*1.15113575'-14 +E24*2.32347312' -6-E31*4.52619094' -4-E39*9.86393155' -4 +E47*2.23803365' -3-E60*2.35416591' -3+E85*8.42142076' -4) +N85*(E1*4.07107262' -4-E2*4.08216352' -7+E6*6.89708989'-15 +E24*1.37104149' -6-E31*2.60397823' -4-E39*5.35370214' -4 +E47*1.01838700' -3-E68*1.53660102' -3+E85*9.05911971' -4) +N90*(E1*2.42543805' -4-E2*2.46269827' -7+E6*4.18254530'-15 +E24*8.26260210' -7-E31*1.55430934' -4-E39*3.13548542' -4 +E47*5.73015681' -4-E68*6.98059028' -4+E90*3.50899029' -4) +N85*(E1*2.06918829' -4-E2*2.23216478' -7+E6*3.86407928'-15 +E24*7.45762624' -7-E31*1.34029747' -4-E39*2.33060881' -4 +E58*9.42320880' -4-E68*1.55479981' -3+E85*7.72128178' -4) +N90*(E1*1.23276799' -4-E2*1.34662620' -7+E6*2.34326171'-15 +E24*4.49434962' -7-E31*8.00020846' -5-E39*1.36496012' -4 +E58*5.10995659' -4-E68*7.06326516' -4+E90*2.88237382' -4) +N85*(E1*8.26366328' -5-E2*1.12059359' -7+E6*2.04696212'-15 +E24*3.69636579' -7-E31*5.62271321' -5-E49*2.65492357' -4 +E58*9.21124932' -4-E68*1.28455820' -3+E85*6.02258546' -4) +N90*(E1*4.92327335' -5-E2*6.76034628' -8+E6*1.24132235'-15 +E24*2.22762038' -7-E31*3.35618614' -5-E49*1.53016010' -4 +E58*4.99501658' -4-E68*5.83559063' -4+E90*2.21247384' -4) +N62*(E1*1.69024373' -2+E2*5.52278685' -5+E10*1.38479714'-10 -E16*6.18713145' -6-E23*1.25907136' -3-E29*3.05956998' -2 +E40*4.23744556' -2-E51*4.88371522' -2+E62*2.13659895' -2) +N71*(E1*6.78722941' -3+E2*2.27415284' -5+E10*5.75277250'-11 -E16*2.55510972' -6-E23*5.13407127' -4-E29*1.21415049' -2 +E40*1.58010289' -2-E51*1.51959491' -2+E71*5.24241635' -3) +N71*(E1*3.52613854' -3+E2*1.24476731' -5+E10*3.20185308'-11 -E16*1.40637065' -6-E23*2.75597588' -4-E29*6.13872649' -3 +E40*6.66134233' -3-E60*9.23591589' -3+E71*5.45171775' -3) +N85*(E1*1.83434661' -3+E2*6.58960088' -6+E10*1.70573740'-11 -E16*7.46047998' -7-E23*1.44895167' -4-E29*3.16813317' -3 +E40*3.30481660' -3-E60*3.67720319' -3+E85*1.84522475' -3) +N71*(E1*1.59843395' -3+E2*6.42984319' -6+E10*1.71131423'-11 -E16*7.35034447' -7-E23*1.36233342' -4-E29*2.54896221' -3 +E47*5.82916887' -3-E60*9.37329830' -3+E71*4.62519620' -3) +N85*(E1*8.31527708' -4+E2*3.40385709' -6+E10*9.11676025'-12 -E16*3.89919242' -7-E23*7.16245484' -5-E29*1.31549300' -3 +E47*2.77974569' -3-E60*3.73190085' -3+E85*1.50473106' -3) +N85*(E1*4.75872569' -4+E2*2.01383570' -6+E10*5.45488447'-12 -E16*2.31550168' -7-E23*4.18391255' -5-E29*7.40718007' -4 +E47*1.26488575' -3-E68*2.57865795' -3+E85*1.61867447' -3) +N90*(E1*2.83512367' -4+E2*1.21491206' -6+E10*3.30606030'-12 -E16*1.39900421' -7-E23*2.51153367' -5-E29*4.38843665' -4 +E47*7.11713101' -4-E68*1.17145273' -3+E90*6.39111251' -4) +N85*(E1*2.33308326' -4+E2*1.06220488' -6+E10*2.94040543'-12 -E16*1.23031389' -7-E23*2.14952073' -5-E29*3.48367847' -4 +E58*1.32165944' -3-E68*2.51683939' -3+E85*1.33079550' -3) +N90*(E1*1.38998967' -4+E2*6.40809735' -7+E10*1.78210148'-12 -E16*7.43344016' -8-E23*1.29032183' -5-E29*2.06393015' -4 +E58*7.16700917' -4-E68*1.14336932' -3+E90*5.06399194' -4) +N71*(E1*3.87588583' -4+E2*2.91977649' -6+E10*8.43765769'-12 -E16*3.44039259' -7-E23*5.39012622' -5-E39*1.87443623' -3 +E47*5.57921996' -3-E60*7.55690493' -3+E71*3.51585812' -3) +N85*(E1*2.01629005' -4+E2*1.54568341' -6+E10*4.49503083'-12 -E16*1.82505089' -7-E23*2.83385368' -5-E39*9.51275897' -4 +E47*2.66055298' -3-E60*3.00871892' -3+E85*1.12478818' -3) +N85*(E1*1.15389675' -4+E2*9.14477998' -7+E10*2.68953808'-12 -E16*1.08379068' -7-E23*1.65538160' -5-E39*5.16310133' -4 +E47*1.21064872' -3-E68*2.00394156' -3+E85*1.20996101' -3) +N90*(E1*6.87461353' -5+E2*5.51688674' -7+E10*1.63005745'-12 -E16*6.54816078' -8-E23*9.93698259' -6-E39*3.02385686' -4 +E47*6.81195558' -4-E68*9.10366115' -4+E90*4.72260882' -4) +N85*(E1*5.86486628' -5+E2*5.00045030' -7+E10*1.50297222'-12 -E16*5.96991070' -8-E23*8.81675474' -6-E39*2.24763521' -4 +E58*1.17089089' -3-E68*2.02767531' -3+E85*1.03127569' -3) +N90*(E1*3.49413316' -5+E2*3.01668471' -7+E10*9.10911462'-13 -E16*3.60696358' -8-E23*5.29255239' -6-E39*1.31636524' -4 +E58*6.34943121' -4-E68*9.21148069' -4+E90*3.87927093' -4) +N85*(E1*2.23809378' -5+E2*2.39871452' -7+E10*7.56782510'-13 -E16*2.91316518' -8-E23*3.94905726' -6-E49*2.80177059' -4 +E58*1.09366349' -3-E68*1.60075655' -3+E85*7.68627494' -4) +N90*(E1*1.33339744' -5+E2*1.44710276' -7+E10*4.58665738'-13 -E16*1.76010685' -8-E23*2.37055391' -6-E49*1.61479510' -4 +E58*5.93064749' -4-E68*7.27204101' -4+E90*2.84528331' -4) +N71*(E1*1.05640213' -3+E2*9.31915794' -7+E10*3.61773724'-12 -E16*1.25240943' -7-E31*6.49831947' -4-E39*1.65754374' -3 +E47*4.16587662' -3-E60*5.33728347' -3+E71*2.42157372' -3) +N85*(E1*5.49555170' -4+E2*4.93341454' -7+E10*1.92729322'-12 -E16*6.64375036' -8-E31*3.38953431' -4-E39*8.41203014' -4 +E47*1.98657438' -3-E60*2.12499507' -3+E85*7.68595061' -4) +N85*(E1*3.14503327' -4+E2*2.91877304' -7+E10*1.15316862'-12 -E16*3.94533366' -8-E31*1.95004446' -4-E39*4.56567481' -4 +E47*9.03963854' -4-E68*1.39394340' -3+E85*8.26795723' -4) +N90*(E1*1.87372815' -4+E2*1.76084502' -7+E10*6.98904810'-13 -E16*2.38373328' -8-E31*1.16397759' -4-E39*2.67396400' -4 +E47*5.08633226' -4-E68*6.33251421' -4+E90*3.20887292' -4) +N85*(E1*1.59851386' -4+E2*1.59601210' -7+E10*6.44415639'-13 -E16*2.17323235' -8-E31*1.00371025' -4-E39*1.98755957' -4 +E58*8.44894642' -4-E68*1.41045262' -3+E85*7.04695705' -4) +N90*(E1*9.52352538' -5+E2*9.62846348' -8+E10*3.90563168'-13 -E16*1.31304643' -8-E31*5.99112620' -5-E39*1.16404759' -4 +E58*4.58163990' -4-E68*6.40751357' -4+E90*2.63584979' -4) +N85*(E1*6.38394310' -5+E2*8.01231589' -8+E10*3.39577291'-13 -E16*1.10982850' -8-E31*4.21068833' -5-E49*2.32052881' -4 +E58*8.25890136' -4-E68*1.16530017' -3+E85*5.49661342' -4) +N90*(E1*3.80338548' -5+E2*4.83369085' -8+E10*2.05808759'-13 -E16*6.70547880' -9-E31*2.51335134' -5-E49*1.33743232' -4 +E58*4.47858350' -4-E68*5.29381600' -4+E90*2.02324509' -4) +N71*(E1*8.42489834' -4-E2*8.73690970' -7+E10*1.29724168'-12 +E24*2.88603959' -6-E31*5.36763731' -4-E39*1.17807054' -3 +E47*2.81932905' -3-E60*3.53667488' -3+E71*1.58767791' -3) +N85*(E1*4.38275000' -4-E2*4.62518154' -7+E10*6.91085320'-13 +E24*1.52562462' -6-E31*2.79976861' -4-E39*5.97870490' -4 +E47*1.34444857' -3-E60*1.40809772' -3+E85*5.02158393' -4) +N85*(E1*2.50819123' -4-E2*2.73641209' -7+E10*4.13501121'-13 +E24*9.00244830' -7-E31*1.61074436' -4-E39*3.24497439' -4 +E47*6.11773172' -4-E68*9.17830579' -4+E85*5.40183554' -4) +N90*(E1*1.49431440' -4-E2*1.65082983' -7+E10*2.50612024'-13 +E24*5.42533895' -7-E31*9.61450046' -5-E39*1.90047366' -4 +E47*3.44226332' -4-E68*4.16959195' -4+E90*2.09116341' -4) +N85*(E1*1.27482863' -4-E2*1.49629545' -7+E10*2.31073396'-13 +E24*4.89678065' -7-E31*8.29068598' -5-E39*1.41262358' -4 +E58*5.64637230' -4-E68*9.28700939' -4+E85*4.60410014' -4) +N90*(E1*7.59509384' -5-E2*9.02689025' -8+E10*1.40047435'-13 +E24*2.95105219' -7-E31*4.94869368' -5-E39*8.27326685' -5 +E58*3.06187818' -4-E68*4.21897466' -4+E90*1.71773479' -4) +N85*(E1*5.09124983' -5-E2*7.51171735' -8+E10*1.21765012'-13 +E24*2.42708496' -7-E31*3.47804504' -5-E49*1.60072925' -4 +E58*5.51936651' -4-E68*7.67282322' -4+E85*3.59118957' -4) +N90*(E1*3.03323281' -5-E2*4.53168846' -8+E10*7.37985329'-14 +E24*1.46268639' -7-E31*2.07603804' -5-E49*9.22577229' -5 +E58*2.99300630' -4-E68*3.48566965' -4+E90*1.31851158' -4) +N62*(E1*4.87095899' -3-E5*8.39288252' -8+E10*1.64203441'-10 +E16*1.97805697' -6-E23*2.77312061' -4-E29*9.40829104' -3 +E40*1.43111809' -2-E51*1.71386923' -2+E62*7.64026118' -3) +N71*(E1*1.95594963' -3-E5*3.47731239' -8+E10*6.82139655'-11 +E16*8.16881397' -7-E23*1.13078570' -4-E29*3.73355774' -3 +E40*5.33650236' -3-E51*5.33279856' -3+E71*1.88620070' -3) +N71*(E1*1.01616565' -3-E5*1.92578531' -8+E10*3.79662321'-11 +E16*4.49623753' -7-E23*6.07007177' -5-E29*1.88768114' -3 +E40*2.24974395' -3-E60*3.27946467' -3+E71*1.96150652' -3) +N85*(E1*5.28623591' -4-E5*1.02396583' -8+E10*2.02259193'-11 +E16*2.38515288' -7-E23*3.19133439' -5-E29*9.74212690' -4 +E40*1.11614008' -3-E60*1.30569161' -3+E85*6.66825684' -4) +N71*(E1*4.60638077' -4-E5*1.01921197' -8+E10*2.02920470'-11 +E16*2.34994200' -7-E23*3.00055661' -5-E29*7.83815324' -4 +E47*2.01707671' -3-E60*3.32824605' -3+E71*1.66412733' -3) +N85*(E1*2.39630373' -4-E5*5.41928647' -9+E10*1.08102723'-11 +E16*1.24659138' -7-E23*1.57753975' -5-E29*4.04518972' -4 +E47*9.61879887' -4-E60*1.32511352' -3+E85*5.43778376' -4) +N85*(E1*1.37137368' -4-E5*3.23159058' -9+E10*6.46817342'-12 +E16*7.40277503' -8-E23*9.21512037' -6-E29*2.27773532' -4 +E47*4.37690457' -4-E68*9.22865120' -4+E85*5.84955145' -4) +N90*(E1*8.17028388' -5-E5*1.95582364' -9+E10*3.92018777'-12 +E16*4.47268666' -8-E23*5.53168470' -6-E29*1.34946053' -4 +E47*2.46275233' -4-E68*4.19246325' -4+E90*2.31703216' -4) +N85*(E1*6.72349949' -5-E5*1.73086297' -9+E10*3.48660954'-12 +E16*3.93337523' -8-E23*4.73434664' -6-E29*1.07124404' -4 +E58*4.64405587' -4-E68*9.00741137' -4+E85*4.80921699' -4) +N90*(E1*4.00568425' -5-E5*1.04755309' -9+E10*2.11314125'-12 +E16*2.37650811' -8-E23*2.84195017' -6-E29*6.34666169' -5 +E58*2.51834852' -4-E68*4.09195670' -4+E90*1.83589823' -4) +N71*(E1*1.11695613' -4-E5*4.91587911' -9+E10*1.00050209'-11 +E16*1.09991077' -7-E23*1.18718213' -5-E39*6.12221354' -4 +E47*1.93058649' -3-E60*2.68328588' -3+E71*1.26499187' -3) +N85*(E1*5.81056207' -5-E5*2.61383871' -9+E10*5.33001919'-12 +E16*5.83477927' -8-E23*6.24159861' -6-E39*3.10702178' -4 +E47*9.20635443' -4-E60*1.06832798' -3+E85*4.06474957' -4) +N85*(E1*3.32530963' -5-E5*1.55866581' -9+E10*3.18914155'-12 +E16*3.46493318' -8-E23*3.64599893' -6-E39*1.68635286' -4 +E47*4.18922729' -4-E68*7.17182273' -4+E85*4.37254639' -4) +N90*(E1*1.98113207' -5-E5*9.43335912'-10+E10*1.93285382'-12 +E16*2.09347985' -8-E23*2.18863300' -6-E39*9.87640825' -5 +E47*2.35715198' -4-E68*3.25807126' -4+E90*1.71213329' -4) +N85*(E1*1.69014223' -5-E5*8.65467889'-10+E10*1.78216147'-12 +E16*1.90861040' -8-E23*1.94190140' -6-E39*7.34114210' -5 +E58*4.11428431' -4-E68*7.25676248' -4+E85*3.72681495' -4) +N90*(E1*1.00694231' -5-E5*5.23798580'-10+E10*1.08012064'-12 +E16*1.15316435' -8-E23*1.16569137' -6-E39*4.29946296' -5 +E58*2.23106743' -4-E68*3.29665835' -4+E90*1.40638981' -4) +N85*(E1*6.44975799' -6-E5*4.29902670'-10+E10*8.97360987'-13 +E16*9.31353524' -9-E23*8.69784862' -7-E49*9.47589218' -5 +E58*3.84292216' -4-E68*5.72888074' -4+E85*2.77765922' -4) +N90*(E1*3.84259626' -6-E5*2.60185745'-10+E10*5.43866612'-13 +E16*5.62714991' -9-E23*5.22117501' -7-E49*5.46141227' -5 +E58*2.08391492' -4-E68*2.60256038' -4+E90*1.03152822' -4) +N71*(E1*3.04434878' -4-E5*1.98137310' -9+E10*4.28976122'-12 +E16*4.00401580' -8-E31*1.80741331' -4-E39*5.41380739' -4 +E47*1.44152501' -3-E60*1.89514854' -3+E71*8.71272664' -4) +N85*(E1*1.58371284' -4-E5*1.05352260' -9+E10*2.28530353'-12 +E16*2.12404032' -8-E31*9.42749809' -5-E39*2.74750584' -4 +E47*6.87417540' -4-E60*7.54537650' -4+E85*2.77754202' -4) +N85*(E1*9.06338404' -5-E5*6.28229143'-10+E10*1.36737903'-12 +E16*1.26134297' -8-E31*5.42376585' -5-E39*1.49122364' -4 +E47*3.12800071' -4-E68*4.98872581' -4+E85*2.98786705' -4) +N90*(E1*5.39972596' -5-E5*3.80216918'-10+E10*8.28732036'-13 +E16*7.62091490' -9-E31*3.23743486' -5-E39*8.73360127' -5 +E47*1.76003176' -4-E68*2.26631706' -4+E90*1.16334390' -4) +N85*(E1*4.60661106' -5-E5*3.48831767'-10+E10*7.64121060'-13 +E16*6.94793286' -9-E31*2.79167450' -5-E39*6.49169277' -5 +E58*2.96879650' -4-E68*5.04780997' -4+E85*2.54662309' -4) +N90*(E1*2.74449777' -5-E5*2.11120004'-10+E10*4.63113438'-13 +E16*4.19787532' -9-E31*1.66634486' -5-E39*3.80196871' -5 +E58*1.60989972' -4-E68*2.29315826' -4+E90*9.55600250' -5) +N85*(E1*1.83973024' -5-E5*1.81337509'-10+E10*4.02656522'-13 +E16*3.54817738' -9-E31*1.17114189' -5-E49*7.84828025' -5 +E58*2.90201833' -4-E68*4.17044410' -4+E85*1.98636128' -4) +N90*(E1*1.09606291' -5-E5*1.09749109'-10+E10*2.44039401'-13 +E16*2.14377522' -9-E31*6.99052224' -6-E49*4.52334126' -5 +E58*1.57368769' -4-E68*1.89458169' -4+E90*7.33506715' -5) +N71*(E1*2.42789448' -4-E5*5.17559895'-10+E10*1.53821483'-12 +E24*2.57078001' -7-E31*1.49293047' -4-E39*3.84776995' -4 +E47*9.75576982' -4-E60*1.25579319' -3+E71*5.71240242' -4) +N85*(E1*1.26302468' -4-E5*2.75193523'-10+E10*8.19460012'-13 +E24*1.35897141' -7-E31*7.78715032' -5-E39*1.95274225' -4 +E47*4.65221709' -4-E60*4.99983627' -4+E85*1.81469555' -4) +N85*(E1*7.22812715' -5-E5*1.64101455'-10+E10*4.90312301'-13 +E24*8.01905636' -8-E31*4.48005181' -5-E39*1.05986140' -4 +E47*2.11692858' -4-E68*3.28478552' -4+E85*1.95211054' -4) +N90*(E1*4.30632814' -5-E5*9.93175025'-11+E10*2.97165236'-13 +E24*4.83269633' -8-E31*2.67413386' -5-E39*6.20725602' -5 +E47*1.19113193' -4-E68*1.49223784' -4+E90*7.58129804' -5) +N85*(E1*3.67381215' -5-E5*9.11193014'-11+E10*2.73997149'-13 +E24*4.36187565' -8-E31*2.30593406' -5-E39*4.61385833' -5 +E58*1.98402611' -4-E68*3.32368899' -4+E85*1.66382563' -4) +N90*(E1*2.18876070' -5-E5*5.51472346'-11+E10*1.66062380'-13 +E24*2.62869090' -8-E31*1.37640737' -5-E39*2.70218349' -5 +E58*1.07588482' -4-E68*1.50991122' -4+E90*6.22747093' -5) +N85*(E1*1.46720077' -5-E5*4.73676674'-11+E10*1.44383848'-13 +E24*2.16195978' -8-E31*9.67367783' -6-E49*5.41384003' -5 +E58*1.93939873' -4-E68*2.74599465' -4+E85*1.29778090' -4) +N90*(E1*8.74119651' -6-E5*2.86678654'-11+E10*8.75072077'-14 +E24*1.30290830' -8-E31*5.77419872' -6-E49*3.12025631' -5 +E58*1.05168457' -4-E68*1.24747175' -4+E90*4.78012824' -5); <* timing of diagrams cputime used 84 real time used 87 cpu % 96.29 blocksread 30 written 393 dropped 0 *> if maxdiagram>=10 then begin pvalue(10):=simproc:=r:=r +N61*(E1*4.21231078' -1-E2*1.10280900' -3-E6*3.08433395'-12 +E11*3.77926379' -7+E17*2.84130315' -3-E22*2.12483855' -1 -E30*7.10481564' -1+E38*1.52924548 -E48*1.83837348 +E61*8.09123461' -1) +N67*(E1*9.58203308' -2-E2*2.55994137' -4-E6*7.21841898'-13 +E11*8.81906366' -8+E17*6.58630482' -4-E22*4.85593656' -2 -E30*1.57614211' -1+E38*3.17434963' -1-E48*3.14907200' -1 +E67*1.07422759' -1) +N67*(E1*5.14228103' -2-E2*1.42817113' -4-E6*4.08640773'-13 +E11*4.96692579' -8+E17*3.66508847' -4-E22*2.63011064' -2 -E30*8.01383470' -2+E38*1.33822201' -1-E62*1.93792710' -1 +E67*1.14763410' -1) +N79*(E1*2.02176829' -2-E2*5.69295623' -5-E6*1.63822580'-13 +E11*1.98716530' -8+E17*1.45956539' -4-E22*1.03728743' -2 -E30*3.09940518' -2+E38*4.97056980' -2-E62*5.73371459' -2 +E79*2.86916442' -2) +N67*(E1*2.45194220' -2-E2*7.43119672' -5-E6*2.18778762'-13 +E11*2.63327686' -8+E17*1.89717012' -4-E22*1.28258885' -2 -E30*3.25387356' -2+E51*1.22289740' -1-E62*1.99506056' -1 +E67*9.79460862' -2) +N79*(E1*9.64019464' -3-E2*2.96221348' -5-E6*8.77075992'-14 +E11*1.05352015' -8+E17*7.55518963' -5-E22*5.05839289' -3 -E30*1.25845777' -2+E51*4.35217253' -2-E62*5.90275446' -2 +E79*2.34626550' -2) +N79*(E1*5.50640664' -3-E2*1.73507001' -5-E6*5.18844751'-14 +E11*6.21037675' -9+E17*4.41780676' -5-E22*2.90620136' -3 -E30*6.95867289' -3+E51*1.92629539' -2-E71*4.01133439' -2 +E79*2.51820240' -2) +N67*(E1*8.49896289' -3-E2*3.41232024' -5-E6*1.07042028'-13 +E11*1.26198837' -8+E17*8.60176566' -5-E22*4.86132966' -3 -E40*3.57495333' -2+E51*1.19060878' -1-E62*1.61143268' -1 +E67*7.41423826' -2) +N79*(E1*3.34150032' -3-E2*1.36021443' -5-E6*4.29127544'-14 +E11*5.04895707' -9+E17*3.42552152' -5-E22*1.91725629' -3 -E40*1.35646117' -2+E51*4.23726048' -2-E62*4.76772066' -2 +E79*1.74243113' -2) +N79*(E1*1.90863984' -3-E2*7.96724235' -6-E6*2.53855511'-14 +E11*2.97630052' -9+E17*2.00303274' -5-E22*1.10152235' -3 -E40*7.19495173' -3+E51*1.87543468' -2-E71*3.10797626' -2 +E79*1.87011839' -2) +N79*(E1*9.91587007' -4-E2*4.36090426' -6-E6*1.41572378'-14 +E11*1.64905321' -9+E17*1.09274062' -5-E22*5.79607974' -4 -E40*3.03322252' -3+E60*1.87857024' -2-E71*3.23206098' -2 +E79*1.61495828' -2) +N67*(-E1*2.97692466' -3-E2*1.26644722' -5-E6*4.73946411'-14 +E11*5.31429626' -9+E17*3.05164243' -5+E29*8.64380719' -3 -E40*3.25888674' -2+E51*9.07227622' -2-E62*1.15456878' -1 +E67*5.16382438' -2) +N79*(-E1*1.17042454' -3-E2*5.04829462' -6-E6*1.90003369'-14 +E11*2.12614111' -9+E17*1.21526989' -5+E29*3.37761116' -3 -E40*1.23653456' -2+E51*3.22873459' -2-E62*3.41600461' -2 +E79*1.20237526' -2) +N79*(-E1*6.68537688' -4-E2*2.95695927' -6-E6*1.12398757'-14 +E11*1.25333506' -9+E17*7.10614533' -6+E29*1.90660647' -3 -E40*6.55883605' -3+E51*1.42905560' -2-E71*2.18788055' -2 +E79*1.29048663' -2) +N79*(-E1*3.47322356' -4-E2*1.61850434' -6-E6*6.26835287'-15 +E11*6.94424566'-10+E17*3.87670833' -6+E29*9.63977345' -4 -E40*2.76505110' -3+E60*1.37543271' -2-E71*2.27523082' -2 +E79*1.11441183' -2) +N79*(-E1*1.57444706' -4-E2*8.36038110' -7-E6*3.36330550'-15 +E11*3.67848924'-10+E17*1.98824908' -6+E29*4.00268985' -4 -E47*3.77373894' -3+E60*1.39589199' -2-E71*1.93028866' -2 +E79*8.87372871' -3) +N79*(-E1*3.61453546' -5-E2*3.59437552' -7-E6*1.58316676'-15 +E11*1.68323528'-10+E17*8.38207413' -7+E39*4.81087210' -4 -E47*3.41969085' -3+E60*1.06549516' -2-E71*1.38922179' -2 +E79*6.21153632' -3) +N67*(-E1*2.96157245' -3-E2*1.43583888' -6-E6*1.82049948'-14 +E11*1.73252911' -9+E23*1.11377083' -4+E29*7.30962130' -3 -E40*2.31607737' -2+E51*6.09055378' -2-E62*7.55514991' -2 +E67*3.33487431' -2) +N79*(-E1*1.16438857' -3-E2*5.72352132' -7-E6*7.29831533'-15 +E11*6.93149420'-10+E23*4.41544945' -5+E29*2.85627131' -3 -E40*8.78800013' -3+E51*2.16756867' -2-E62*2.23533039' -2 +E79*7.73015176' -3) +N79*(-E1*6.65089991' -4-E2*3.35246270' -7-E6*4.31740537'-15 +E11*4.08603390'-10+E23*2.56109536' -5+E29*1.61231862' -3 -E40*4.66133774' -3+E51*9.59377758' -3-E71*1.42015703' -2 +E79*8.29662573' -3) +N79*(-E1*3.45531190' -4-E2*1.83498483' -7-E6*2.40776866'-15 +E11*2.26391363'-10+E23*1.37479919' -5+E29*8.15185852' -4 -E40*1.96511042' -3+E60*9.08582446' -3-E71*1.47685624' -2 +E79*7.16462897' -3) +N79*(-E1*1.56632752' -4-E2*9.47861071' -8-E6*1.29189625'-15 +E11*1.19923493'-10+E23*6.79590449' -6+E29*3.38486807' -4 -E47*2.58497284' -3+E60*9.22097428' -3-E71*1.25295369' -2 +E79*5.70498014' -3) +N79*(-E1*3.79803410' -5-E2*4.30421457' -8-E6*6.42302833'-16 +E11*5.79604109'-11+E23*2.68882658' -6+E39*3.81811000' -4 -E47*2.47413180' -3+E60*7.43409884' -3-E71*9.52436872' -3 +E79*4.21792518' -3) +N79*(-E1*9.87834023' -5-E2*1.31095507' -8-E6*2.68418635'-16 +E11*2.24305985'-11+E31*5.34091489' -5+E39*3.22188171' -4 -E47*1.76287930' -3+E60*5.01038928' -3-E71*6.25992864' -3 +E79*2.73561782' -3) +N67*(-E1*1.97668657' -3-E2*1.87835354' -6-E6*5.41975832'-15 +E16*1.48400354' -7+E23*8.42982588' -5+E29*4.71869427' -3 -E40*1.42176944' -2+E51*3.65998882' -2-E62*4.49227979' -2 +E67*1.97160281' -2) +N79*(-E1*7.77165272' -4-E2*7.48746720' -7-E6*2.17276114'-15 +E16*5.92529260' -8+E23*3.34193255' -5+E29*1.84385353' -3 -E40*5.39468594' -3+E51*1.30255431' -2-E62*1.32912380' -2 +E79*4.56096269' -3) +N79*(-E1*4.43910956' -4-E2*4.38566629' -7-E6*1.28532273'-15 +E16*3.48072166' -8+E23*1.93842282' -5+E29*1.04082528' -3 -E40*2.86145344' -3+E51*5.76517669' -3-E71*8.41481306' -3 +E79*4.89519502' -3) +N79*(-E1*2.30623047' -4-E2*2.40051325' -7-E6*7.16810104'-16 +E16*1.91584132' -8+E23*1.04054779' -5+E29*5.26239685' -4 -E40*1.20632151' -3+E60*5.42399986' -3-E71*8.75077115' -3 +E79*4.22729158' -3) +N79*(-E1*1.04543739' -4-E2*1.23998467' -7-E6*3.84606837'-16 +E16*1.00130742' -8+E23*5.14363367' -6+E29*2.18508688' -4 -E47*1.56565324' -3+E60*5.50468078' -3-E71*7.42408821' -3 +E79*3.36606607' -3) +N79*(-E1*2.53497868' -5-E2*5.63074087' -8-E6*1.91218188'-16 +E16*4.68670637' -9+E23*2.03509907' -6+E39*2.38697859' -4 -E47*1.49851960' -3+E60*4.43796281' -3-E71*5.64344510' -3 +E79*2.48867034' -3) +N79*(-E1*6.90927698' -5-E2*1.79718426' -8-E6*8.37404319'-17 +E16*1.70610624' -9+E31*3.80248353' -5+E39*2.11077942' -4 -E47*1.11891049' -3+E60*3.13444006' -3-E71*3.88696526' -3 +E79*1.69144194' -3) +N79*(-E1*5.17508094' -5+E2*1.58242423' -8-E6*3.03311669'-17 -E24*6.28541965' -8+E31*2.94984087' -5+E39*1.40895879' -4 -E47*7.11187070' -4+E60*1.95067079' -3-E71*2.39345082' -3 +E79*1.0353#▶a0◀#▶a0◀▶01◀#▶a0◀▶02◀#▶a0◀▶03◀#▶a0◀▶04◀#▶a0◀▶05◀#▶a0◀▶06◀#▶a0◀▶07◀#▶a0◀«bs»#▶a0◀ #▶a0◀ #▶a0◀▶0b◀#▶a0◀\f #▶a0◀\r#▶a0◀▶0e◀#▶a0◀▶0f◀#▶a0◀▶10◀#▶a0◀▶11◀#▶a0◀▶12◀#▶a0◀▶13◀#▶a0◀▶14◀#▶a0◀▶15◀#▶a0◀▶16◀#▶a0◀▶17◀#▶a0◀▶18◀#▶a0◀▶EOF◀