github.com/pkimpel.retro-220
1
0
Fork 0
mirror of https://github.com/pkimpel/retro-220.git synced 2026-05-04 23:16:42 +00:00
Code Issues Releases Wiki Activity
Files
1ef4bc9d14b4babbca49aefa82539cd4cde7ad46
pkimpel.retro-220/software/BALGOL/BALGOL-Examples/DIRICHLET/DIRICHLET-OUTPUT.lst
Paul Kimpel 1ef4bc9d14 Commit updates to BALGOL DIRICHLET example. 
1. Changes to DIRICHLET program that allow it to compile and run correctly.
2. Cosmetic changes to BALGOL-Main, BAC-Assembler, GEN-Assembler.
3. Commit software/tools/BALGOL-DumpAnalyzer.html script that does a parial
analysis of a memory dump from a BALGOL compiler run.
4. Commit compiler tape image and generator deck configured to run on a
system with 10000 words of memory.
2018-06-10 18:55:55 -07:00

1263 lines
57 KiB
Plaintext
Raw Blame History

This file contains invisible Unicode characters
This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
0200 BAC-220 STANDARD VERSION 2/1/62
0200 COMMENT
0200 DIRICHLET PROBLEM FOR A BEAN-SHAPED REGION. FROM P J DAVIS,
0200 *ORTHONORMALIZING CODES IN NUMERICAL ANALYSIS* IN J TODD, --SURVEY OF
0200 NUMERICAL ANLAYSIS--, MCGRAW-HILL, 1962, P.347. P H KIMPEL 8/15/70
0200 MODIFICATION LOG..
0200 92/03/17 P.KIMPEL, PARADIGM CORP, SAN DIEGO, CA 92117.
0200 CONVERT FOR UNISYS A-SERIES MCP 3.8.4.
0200 2014-11-15 P.KIMPEL
0200 RETRO-CONVERT FROM UNISYS MCP ALGOL BACK TO BURROUGHS B5500 XALGOL.
0200 2018-02-20 P.KIMPEL
0200 RETRO-CONVERT FROM B5500 TO BURROUGHS 220 BALGOL OF FEB 1962.
0200 $
0200
0200 FORMAT F1 (B30,I3,2X10.3,4X10.5,W),
0200 F2 (B40,*X*,B9,*Y*,B9,*W*,B8,*BV*,B7,*CBV*,B7,*DEV*,W3,W)$
0222 INTEGER I, J, N, M, P$
0222 REAL SUM, GMDT$
0222
0222
0222 REAL X, Y, W, CBV, BV, Z, ORTHV, DEV, COF, STD, CV, VCV,
0222 Q, Q2, E, EP, A, GF, ENF$
0222 ARRAY
0222 X(43),
0222 Y(43),
0222 W(43),
0222 CBV(43),
0222 BV(1, 43+11),
0222 Z(11, 43+11),
0222 ORTHV(11+1, 43+11),
0222 DEV(1, 43),
0222 COF(1, 11),
0222 STD(1),
0222 CV(11+1, 11),
0222 VCV(1, 11+1, 11),
0222 Q(1, 11+1),
0222 Q2(1, 11),
0222 E(1, 11),
0222 EP(1, 11),
0222 A(11, 11),
0222 GF(11+1),
0222 ENF(11)$
0222
0222
0222 PROCEDURE ORTHO (W(), Y(,), Z(,), N, FN, M, P, R, AI, AUI, MUI, ZEI$
0224 X(,), DEV(,), COF(,), STD(), CV(,), VCV(,,), GMDT,
0224 Q(,), Q2(,), E(,), EP(,), A(,), GF(), ENF())$
0224 BEGIN
0224 REAL FN, GMDT$
0226 REAL W, Y, Z, X, DEV, COF, STD, CV, VCV, Q, Q2, E, EP, A, GF, ENF$
0226 INTEGER N, M, P, R, AI, AUI, ZEI, MUI$
0226 COMMENT
0226 ORTHO IS TAKEN FROM ACM ALGORITHM 127 (COMM. ACM, VOL.5,
0226 OCTOBER 1962, P. 511, AUTHOR PHILIP J. WALSH)$
0226 INTEGER NPP, NPM, M1, N2, M2, R1, RBAR, P2, BEI, RHI, I18, GAI, SII,
0226 I, J, DEI, NUI, E1Z2, E1Z1, K, THI, ALI, OMI, NII$
0226 ARRAY PK(99), XP (99), QK(99)$
0226 REAL DENOM, SUM, DK2, DK, FI, SS, SSQ$
0226
0226 NPP = N+P$ NPM = N+M$ M1 = M-1$ N2 = N+1$ M2 = M+1$
0241 R1 = 0$ RBAR = R$ P2 = P+1$
0247 EITHER IF N EQL M$ DENOM = 1.0$ OTHERWISE$ DENOM = SQRT(N-M)$
0262 BEI = RHI = I18 = 1$
0266 EITHER IF (P NEQ 0)$ GAI = SII = 2$ OTHERWISE$ GAI = SII = 1$
0277 BOX1.. SWITCH AI, (AT1, AT2)$
0281 AT1.. FOR J = (1, 1, N)$ BEGIN
0293 X(2,J) = Z(1,J)$ X(1,J) = 1.0 END$
0315 FOR I = (2, 1, M1)$ BEGIN
0327 FOR J = (1, 1, N)$
0338 X(I+1,J) = X(I,J) . X(2,J) END$ GO TO BOX2$
0367 AT2.. FOR I = (1, 1, M)$ BEGIN
0379 FOR J = (1, 1, N)$
0390 X(I,J) = Z(I,J) END$
0409 BOX2.. EITHER IF P EQL 0$ GO TO BOX3$
0413 OTHERWISE$ SWITCH AUI, (AU1, AU2)$
0418 AU1.. FOR I = (1, 1, M)$ BEGIN
0430 FOR J = (N2, 1, NPP)$
0441 X(I,J) = 0.0$ X(I,N+I) = 1.0 END$ GO TO BOX3$
0463 AU2.. FOR I = (1, 1, M)$ BEGIN
0475 FOR J = (N2, 1, NPP)$
0486 X(I,J) = Z(I,J) END$
0505 BOX3.. DEI = NUI = E1Z1 = E1Z2 = K = 1$
0511 BOX4.. THI = 1$
0513 BOX5.. ALI = OMI = 1$ EITHER IF P EQL 0$ GO TO BOX6$
0520 OTHERWISE$ FOR J = (1, 1, P)$ PK(N+J) = 0.0$
0539 BOX6.. SWITCH MUI, (MU1, MU2)$
0543 MU1.. FOR I = (1, 1, N)$ PK(I) = X(K,I)$
0566 GO TO BOX7$
0567 MU2.. FOR I = (1, 1, N)$
0578 PK(I) = X(K,I) . W(I)$ GO TO BOX7$
0596 BOX7.. SWITCH OMI, (OM1, OM2)$
0600 OM1.. FOR I = (1, 1, K)$ BEGIN SUM = 0.0$
0613 FOR J = (1, 1, NPP)$
0624 SUM = SUM + PK(J) . X(I,J)$ QK(I) = SUM END$
0642 GO TO BOX8$
0643 OM2.. DK2 = 0.0$ FOR I = (1, 1, NPP)$
0655 DK2 = DK2 + PK(I) . X(K,I)$
0669 DK = SQRT(DK2)$
0673 GF(I18) = DK$ I18 = I18 + 1$
0682 FOR I = (1, 1, NPP)$
0693 X(K,I) = X(K,I)/DK$
0713 OMI = 1$ GO TO BOX6$
0716 BOX8.. SWITCH DEI, (DE1, DE2)$
0720 DE1.. E1Z1 = -E1Z1$ EITHER IF E1Z1 LSS 0$ GO TO BOX8B$
0726 OTHERWISE$ GO TO BOX8A$
0728 BOX8A.. FOR I = (1, 1, K-1)$
0742 QK(I) = -QK(I)$ QK(K) = 1.0$
0750 FOR I = (1, 1, NPP)$ BEGIN
0763 SUM = 0.0$ FOR J = (1, 1, K)$
0774 SUM = SUM + X(J,I) . QK(J)$
0788 XP(I) = SUM END$ GO TO BOX9$
0793 BOX8B.. ENF(I18) = SQRT(QK(K))$ GO TO BOX8A$
0803 DE2.. E1Z2 = -E1Z2$ EITHER IF E1Z2 LSS 0$ GO TO BOX8C$
0809 OTHERWISE$ GO TO BOX8A$
0811 BOX8C.. FOR I = (1, 1, M)$ BEGIN
0823 Q(R1,I) = QK(I)$ Q2(R1,I) = QK(I) . QK(I) END$
0845 Q(R1,M2) = QK(M2)$ E(R1,1) = Q(R1,M2) - Q2(R1,1)$
0879 FOR J = (2, 1, M)$
0890 E(R1,J) = E(R1,J-1) - Q2(R1,J)$
0917 FI = 1.0$
0919 FOR I = (1, 1, M)$ BEGIN
0933 EITHER IF (FN - FI) GTR 0.0$ BEGIN
0935 EITHER IF E(R1,I) LSS 0.0$
0945 BEGIN EP(R1,I) = -SQRT(ABS(E(R1,I))/(FN - FI))$
0972 GO TO BOX8D$ END$
0973 OTHERWISE$ EP(R1,I) = SQRT(E(R1,I)/(FN - FI))$
0997 GO TO BOX8D$ END$ OTHERWISE$ E(R1,I) = -1.0$
1008 BOX8D.. FI = FI + 1.0$ END$ GO TO BOX8A$
1013 BOX9.. SWITCH THI, (TH1, TH2, TH3)$
1018 TH1.. FOR I = (1, 1, NPP)$
1029 X(K,I) = XP(I)$ GO TO BOX10$
1042 TH2.. FOR I = (1, 1, N)$
1053 DEV(R1,I) = XP(I)$
1065 FOR I = (1, 1, P)$
1076 COF(R1,I) = -XP(N+I)$ THI = 3$ GO TO TH1$
1094 TH3.. GO TO BOX11$
1095 BOX10.. SWITCH ALI, (AL1, AL2)$
1099 AL1.. OMI = ALI = 2$ GO TO BOX6$
1103 AL2.. EITHER IF K LSS M$ BEGIN K = K + 1$ GO TO BOX4$ END$
1112 OTHERWISE$ GO TO BOX12$
1114 BOX11.. SWITCH NUI, (NU1, NU2)$
1118 NU1.. NUI = 2$ GO TO BOX14$
1121 NU2.. SS = DK/DENOM$ SSQ = SS . SS$
1128 STD(R1) = SS$ GO TO BOX14$
1135 BOX12.. SWITCH BEI, (BE1, BE2)$
1139 BE1.. FOR I = (1, 1, M)$ BEGIN
1151 FOR J = (1, 1, P)$
1162 A(I,J) = X(I,N+J) END$
1182 GMDT = 1.0$ FOR I = (1, 1, M)$
1195 GMDT = GMDT . (GF(I)/ENF(I))$
1210 GMDT = GMDT . GMDT$ DEI = BEI = THI = 2$
1217 K = K + 1$ GO TO BOX13$
1221 BE2.. GO TO BOX11$
1222 BOX13.. SWITCH GAI, (GA1, GA2)$
1226 GA1.. GO TO BOX11$
1227 GA2.. FOR I = (1, 1, P)$ BEGIN
1239 FOR J = (I, 1, P)$ BEGIN
1239 SUM = 0.0$
1252 FOR NII = (1, 1, M)$
1263 SUM = SUM + A(NII,I) . A(NII,J)$
1283 CV(I,J) = SUM END END$
1294 FOR I = (1, 1, P)$
1305 CV(P2,I) = SQRT(CV(I,I))$ GAI = 1$ GO TO BOX11$
1328 BOX14.. SWITCH RHI, (RH1, RH2)$
1332 RH1.. EITHER IF RBAR EQL 0$ GO TO FINAL$
1336 OTHERWISE$ RBAR = RBAR - 1$
1340 R1 = R1 + 1$ THI = RHI = 2$ SWITCH ZEI, (ZE1, ZE2)$
1350 ZE1.. FOR I = (1, 1, N)$
1361 X(M2,I) = Y(R1,I)$
1379 FOR I = (1, 1, P)$
1390 X(M2,N+I) = 0.0$ GO TO BOX5$
1402 ZE2.. FOR I = (1, 1, NPP)$
1413 X(M2,I) = Y(R1,I)$ GO TO BOX5$
1432 RH2.. SWITCH SII, (SI1, SI2)$
1436 SI1.. GO TO RH1$
1437 SI2.. FOR I = (1, 1, P)$ BEGIN
1449 FOR J = (I, 1, P)$
1460 VCV(R1,I,J) = SSQ . CV(I,J) END$
1483 FOR I = (1, 1, P)$
1494 VCV(R1, P2, I) = SS . CV(P2,I)$ GO TO RH1$
1517 FINAL.. RETURN END ORTHO()$
1517
1517
1602 PROCEDURE G (I, X, Y)$
1602 BEGIN
1605 REAL X, Y, G$ INTEGER I$
1605 SWITCH I, (G1, G2, G3, G4, G5, G6, G7, G8, G9, G10,
1623 G11, G12, G13, G14, G15, G16, G17)$
1624 G() = 0$
1625 RETURN$
1627 G1..
1627 G() = 1$
1628 RETURN$
1630 G2..
1630 G() = X$
1631 RETURN$
1633 G3..
1633 G() = Y$
1634 RETURN$
1636 G4..
1636 G() = X*2 - Y*2$
1644 RETURN$
1646 G5..
1646 G() = 2.0 . X . Y$
1649 RETURN$
1651 G6..
1651 G() = X*3 - 3.0 . X . Y*2$
1663 RETURN$
1665 G7..
1665 G() = 3.0 . X*2 . Y - Y*3$
1677 RETURN$
1679 G8..
1679 G() = X*4 + Y*4 - 6.0 . X*2 . Y*2$
1700 RETURN$
1702 G9..
1702 G() = 4.0 . X*3 . Y - 4.0 . X . Y*3$
1718 RETURN$
1720 G10..
1720 G() = X*5 - 10.0 . X*3 . Y*2 + 5.0 . X . Y*4$
1743 RETURN$
1745 G11..
1745 G() = Y*5 - 10.0 . Y*3 . X*2 + 5.0 . Y . X*4$
1768 RETURN$
1770 G12..
1770 G() = X*6 - 15.0 . X*4 . Y*2 + 15.0 . X*2 . Y*4 - Y*6$
1804 RETURN$
1806 G13..
1806 G() = 6.0 . X*5 . Y + 6.0 . X . Y*5 - 20.0 . X*3 . Y*3$
1835 RETURN$
1837 G14..
1837 G() = X*7 - 21.0 .X*5 . Y*2 + 35.0 . X*3 . Y*4 - 7.0 . X . Y*6$
1875 RETURN$
1877 G15..
1877 G() = 7.0 . X*6 . Y - 35.0 . X*4 . Y*3 + 21.0 . X*2 . Y*5 -
1877 Y*7$
1915 RETURN$
1917 G16..
1917 G() = X*8 + Y*8 - 28.0 . X*6 . Y*2 + 70.0 . X*4 . Y*4 - 28.0
1917 . X*2 . Y*6$
1964 RETURN$
1966 G17..
1966 G() = 8.0 . X*7 . Y - 56.0 . X*5 . Y*3 + 56.0 . X*3 . Y*5
1966 - 8.0 . X . Y*7$
2008 RETURN$
2010 END G()$
2010
2010
2010 COMMENT INITIALIZATION$
2010 N = 43$
2012 M = 11$
2014 P = 11$
2016 FOR I = (1, 1, N)$
2027 BEGIN
2028 READ ($$ XYWIN)$
2032 INPUT XYWIN (X(I), Y(I), W(I))$
2048 BV(1,I) = EXP(X(I)) . COS(Y(I)) + LOG((1 - Y(I))*2 + X(I)*2)$
2073 FOR J = (1, 1, M)$
2084 Z(J,I) = G (J, X(I), Y(I))$
2104 END$
2104
2105 ORTHO (W(), BV(,), Z(,), N , FLOAT(N) , M , P, 1, 2, 1, 2, 1$
2146 ORTHV(,), DEV(,), COF(,), STD(), CV(,), VCV(,,),
2188 GMDT, Q(,), Q2(,), E(,), EP(,), A(,), GF(), ENF())$
2188
2237 FOR I = (1, 1, N)$
2248 BEGIN SUM = 0$
2250 FOR J = (1, 1, M)$
2261 SUM = SUM + COF(1,J) . G (J, X(I), Y(I))$
2278 CBV(I) = SUM$
2281 END$
2282 WRITE ($$ F2)$
2286 WRITE ($$ RESULTS, F1)$
2294 OUTPUT RESULTS (FOR I = (1, 1, N)$ (I,X(I),Y(I),W(I), BV(1,I),
2327 CBV(I), (CBV(I)-BV(1,I))))$
2327
2339 PROCEDURE DMMP (NAME, ROW(), RN, SZ)$
2339 BEGIN
2339 INTEGER
2339 NAME, RN, SZ$
2343 INTEGER
2343 I$
2343 FORMAT
2343 F1 (W4,A5,* = *,W),
2343 F2 (W4,A5,*(*,I2,*) = *,W),
2343 F3 (6F20.11,W)$
2359 OUTPUT
2361 D1OUT (NAME),
2366 D2OUT (NAME, RN),
2376 ROWOUT (FOR I = (1, 1, SZ)$ ROW(I))$
2376
2400 EITHER IF RN GTR 0$
2407 WRITE ($$ D2OUT, F2)$
2411 OTHERWISE$
2416 WRITE ($$ D1OUT, F1)$
2416
2420 WRITE ($$ ROWOUT, F3)$
2428 RETURN$
2430 END DMMP()$
2430
2433 DMMP (6700000000, X(), 0, N)$
2446 DMMP (6800000000, Y(), 0, N)$
2459 DMMP (6600000000, W(), 0, N)$
2472 DMMP (4342650000, CBV(), 0, N)$
2485 DMMP (4265000000, BV(1,), 0, N+P)$
2499 FOR I = (1, 1, M)$
2510 DMMP (6900000000, Z(I,), I, N+P)$
2510
2529 FOR I = (1, 1, M+1)$
2543 DMMP (5659634865, ORTHV(I,), I, N+P)$
2543
2562 DMMP (4445650000, DEV(1,), 0, N)$
2575 DMMP (4356460000, COF(1,), 0, P)$
2588 DMMP (6263440000, STD(), 0, 1)$
2601 FOR I = (1, 1, P+1)$
2615 DMMP (4365000000, CV(I,), I, P)$
2615
2633 FOR I = (1, 1, P+1)$
2647 DMMP (6543650000, VCV(1,I,), I, P)$
2647
2665 DMMP (4557000000, EP(1,), 0, M)$
2678 FOR I = (1, 1, M)$
2689 DMMP (4100000000, A(I,), I, P)$
2689
2707 DMMP (4746000000, GF(), 0, M+1)$
2721 DMMP (5800000000, Q(1,), 0, M+1)$
2735 DMMP (5882000000, Q2(1,), 0, M)$
2748 DMMP (4500000000, E(1,), 0, M)$
2761 DMMP (4555460000, ENF(), 0, M)$
2774 FINISH$
COMPILED PROGRAM ENDS AT 2775
PROGRAM VARIABLES BEGIN AT 6295
X Y W BV CBV DEV
1 .000 .110 .01414 .76088 .76399 .00310
2 -.050 .108 .01427 .72024 .72347 .00323
3 -.100 .115 .01963 .66721 .67048 .00327
4 -.160 .150 .02300 .55235 .55576 .00340
5 -.220 .205 .03897 .40067 .40386 .00318
6 -.320 .300 .02792 .17014 .17015 .00000
7 -.400 .358 .03324 .06949 .06500 -.00448
8 -.500 .420 .01483 .02006 .01359 -.00646
9 -.550 .436 .01423 .04590 .04344 -.00245
10 -.600 .430 .01505 .12036 .12444 .00407
11 -.644 .400 .01483 .22849 .23541 .00691
12 -.660 .350 .01420 .33248 .33512 .00264
13 -.655 .300 .02881 .41179 .41040 -.00139
14 -.635 .200 .03043 .56168 .55792 -.00376
15 -.595 .100 .03076 .70069 .69969 -.00099
16 -.552 .000 .03311 .84177 .84369 .00191
17 -.500 -.105 .03175 .98914 .99145 .00230
18 -.440 -.200 .01809 1.12198 1.12185 -.00013
19 -.400 -.250 .01998 1.19325 1.19145 -.00180
20 -.350 -.300 .01882 1.26792 1.26504 -.00287
21 -.300 -.344 .03140 1.33733 1.33459 -.00274
22 -.204 -.400 .03450 1.44504 1.44501 -.00003
23 -.100 -.436 .02846 1.54874 1.55125 .00251
24 .000 -.448 .02831 1.64168 1.64342 .00174
25 .100 -.442 .03860 1.73582 1.73434 -.00147
26 .230 -.400 .02431 1.85882 1.85512 -.00369
27 .300 -.350 .02059 1.91643 1.91501 -.00141
28 .353 -.300 .03566 1.95563 1.95689 .00126
29 .430 -.200 .03122 1.99206 1.99507 .00301
30 .477 -.100 .02975 1.96610 1.96578 -.00032
31 .510 .000 .02846 1.89648 1.89241 -.00407
32 .522 .100 .01696 1.75623 1.75328 -.00294
33 .520 .160 .02330 1.63625 1.63683 .00058
34 .500 .240 .02102 1.41224 1.41798 .00574
35 .456 .300 .01795 1.14765 1.15159 .00394
36 .400 .330 .01147 .91522 .91268 -.00254
37 .360 .337 .01762 .78912 .78354 -.00558
38 .300 .320 .01648 .68785 .68274 -.00510
39 .250 .290 .01901 .66230 .65991 -.00239
40 .300 .245 .01901 .89407 .89251 -.00155
41 .150 .200 .01809 .72694 .72885 .00191
42 .100 .160 .01677 .75642 .75909 .00267
43 .050 .128 .01501 .77202 .77498 .00296
X =
.00000000000, 00 -.50000000000,-01 -.10000000000, 00 -.16000000000, 00 -.22000000000, 00 -.32000000000, 00
-.40000000000, 00 -.50000000000, 00 -.55000000000, 00 -.60000000000, 00 -.64400000000, 00 -.66000000000, 00
-.65500000000, 00 -.63500000000, 00 -.59500000000, 00 -.55200000000, 00 -.50000000000, 00 -.44000000000, 00
-.40000000000, 00 -.35000000000, 00 -.30000000000, 00 -.20400000000, 00 -.10000000000, 00 .00000000000, 00
.10000000000, 00 .23000000000, 00 .30000000000, 00 .35300000000, 00 .43000000000, 00 .47700000000, 00
.51000000000, 00 .52200000000, 00 .52000000000, 00 .50000000000, 00 .45600000000, 00 .40000000000, 00
.36000000000, 00 .30000000000, 00 .25000000000, 00 .30000000000, 00 .15000000000, 00 .10000000000, 00
.50000000000,-01
Y =
.11000000000, 00 .10800000000, 00 .11500000000, 00 .15000000000, 00 .20500000000, 00 .30000000000, 00
.35800000000, 00 .42000000000, 00 .43600000000, 00 .43000000000, 00 .40000000000, 00 .35000000000, 00
.30000000000, 00 .20000000000, 00 .10000000000, 00 .00000000000, 00 -.10500000000, 00 -.20000000000, 00
-.25000000000, 00 -.30000000000, 00 -.34400000000, 00 -.40000000000, 00 -.43600000000, 00 -.44800000000, 00
-.44200000000, 00 -.40000000000, 00 -.35000000000, 00 -.30000000000, 00 -.20000000000, 00 -.10000000000, 00
.00000000000, 00 .10000000000, 00 .16000000000, 00 .24000000000, 00 .30000000000, 00 .33000000000, 00
.33700000000, 00 .32000000000, 00 .29000000000, 00 .24500000000, 00 .20000000000, 00 .16000000000, 00
.12800000000, 00
W =
.14140000000,-01 .14270000000,-01 .19630000000,-01 .23000000000,-01 .38970000000,-01 .27920000000,-01
.33240000000,-01 .14830000000,-01 .14230000000,-01 .15050000000,-01 .14830000000,-01 .14200000000,-01
.28810000000,-01 .30430000000,-01 .30760000000,-01 .33110000000,-01 .31750000000,-01 .18090000000,-01
.19980000000,-01 .18820000000,-01 .31400000000,-01 .34500000000,-01 .28460000000,-01 .28310000000,-01
.38600000000,-01 .24310000000,-01 .20590000000,-01 .35660000000,-01 .31220000000,-01 .29750000000,-01
.28460000000,-01 .16960000000,-01 .23300000000,-01 .21020000000,-01 .17950000000,-01 .11470000000,-01
.17620000000,-01 .16480000000,-01 .19010000000,-01 .19010000000,-01 .18090000000,-01 .16770000000,-01
.15010000000,-01
CBV =
.76399073000, 00 .72347682000, 00 .67048629000, 00 .55576020000, 00 .40386387000, 00 .17015283000, 00
.65003200000,-01 .13596552000,-01 .43440283000,-01 .12444357000, 00 .23541132000, 00 .33512773000, 00
.41040896000, 00 .55792220000, 00 .69969238000, 00 .84369147000, 00 .99145532000, 00 .11218515000, 01
.11914525000, 01 .12650415000, 01 .13345923000, 01 .14450102000, 01 .15512594000, 01 .16434232000, 01
.17343438000, 01 .18551261000, 01 .19150174000, 01 .19568946000, 01 .19950713000, 01 .19657882000, 01
.18924112000, 01 .17532836000, 01 .16368319000, 01 .14179803000, 01 .11515965000, 01 .91268660000, 00
.78354318000, 00 .68274384000, 00 .65991390000, 00 .89251312000, 00 .72885275000, 00 .75909449000, 00
.77498863000, 00
BV =
.76088841000, 00 .72024613000, 00 .66721239000, 00 .55235649000, 00 .40067717000, 00 .17014345000, 00
.69491780000,-01 .20063290000,-01 .45900150000,-01 .12036854000, 00 .22849674000, 00 .33248138000, 00
.41179999000, 00 .56168894000, 00 .70069088000, 00 .84177328000, 00 .98914967000, 00 .11219847000, 01
.11932581000, 01 .12679213000, 01 .13373396000, 01 .14450454000, 01 .15487488000, 01 .16416818000, 01
.17358214000, 01 .18588237000, 01 .19164317000, 01 .19556301000, 01 .19920608000, 01 .19661095000, 01
.18964821000, 01 .17562334000, 01 .16362508000, 01 .14122402000, 01 .11476546000, 01 .91522800000, 00
.78912810000, 00 .68785090000, 00 .66230780000, 00 .89407080000, 00 .72694000000, 00 .75642080000, 00
.77202140000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
Z ( 1) =
.10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01
.10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01
.10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01
.10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01
.10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01
.10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01
.10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01 .10000000000, 01
.10000000000, 01 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
Z ( 2) =
.00000000000, 00 -.50000000000,-01 -.10000000000, 00 -.16000000000, 00 -.22000000000, 00 -.32000000000, 00
-.40000000000, 00 -.50000000000, 00 -.55000000000, 00 -.60000000000, 00 -.64400000000, 00 -.66000000000, 00
-.65500000000, 00 -.63500000000, 00 -.59500000000, 00 -.55200000000, 00 -.50000000000, 00 -.44000000000, 00
-.40000000000, 00 -.35000000000, 00 -.30000000000, 00 -.20400000000, 00 -.10000000000, 00 .00000000000, 00
.10000000000, 00 .23000000000, 00 .30000000000, 00 .35300000000, 00 .43000000000, 00 .47700000000, 00
.51000000000, 00 .52200000000, 00 .52000000000, 00 .50000000000, 00 .45600000000, 00 .40000000000, 00
.36000000000, 00 .30000000000, 00 .25000000000, 00 .30000000000, 00 .15000000000, 00 .10000000000, 00
.50000000000,-01 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
Z ( 3) =
.11000000000, 00 .10800000000, 00 .11500000000, 00 .15000000000, 00 .20500000000, 00 .30000000000, 00
.35800000000, 00 .42000000000, 00 .43600000000, 00 .43000000000, 00 .40000000000, 00 .35000000000, 00
.30000000000, 00 .20000000000, 00 .10000000000, 00 .00000000000, 00 -.10500000000, 00 -.20000000000, 00
-.25000000000, 00 -.30000000000, 00 -.34400000000, 00 -.40000000000, 00 -.43600000000, 00 -.44800000000, 00
-.44200000000, 00 -.40000000000, 00 -.35000000000, 00 -.30000000000, 00 -.20000000000, 00 -.10000000000, 00
.00000000000, 00 .10000000000, 00 .16000000000, 00 .24000000000, 00 .30000000000, 00 .33000000000, 00
.33700000000, 00 .32000000000, 00 .29000000000, 00 .24500000000, 00 .20000000000, 00 .16000000000, 00
.12800000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
Z ( 4) =
-.12100000000,-01 -.91640000000,-02 -.32250000000,-02 .31000000000,-02 .63750000000,-02 .12400000000,-01
.31836000000,-01 .73600000000,-01 .11240400000, 00 .17510000000, 00 .25473600000, 00 .31310000000, 00
.33902500000, 00 .36322500000, 00 .34402500000, 00 .30470400000, 00 .23897500000, 00 .15360000000, 00
.97500000000,-01 .32500000000,-01 -.28336000000,-01 -.11838400000, 00 -.18009600000, 00 -.20070400000, 00
-.18536400000, 00 -.10710000000, 00 -.32500000000,-01 .34609000000,-01 .14490000000, 00 .21752900000, 00
.26010000000, 00 .26248400000, 00 .24480000000, 00 .19240000000, 00 .11793600000, 00 .51100000000,-01
.16031000000,-01 -.12400000000,-01 -.21600000000,-01 .29975000000,-01 -.17500000000,-01 -.15600000000,-01
-.13884000000,-01 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
Z ( 5) =
.00000000000, 00 -.10800000000,-01 -.23000000000,-01 -.48000000000,-01 -.90200000000,-01 -.19200000000, 00
-.28640000000, 00 -.42000000000, 00 -.47960000000, 00 -.51600000000, 00 -.51520000000, 00 -.46200000000, 00
-.39300000000, 00 -.25400000000, 00 -.11900000000, 00 .00000000000, 00 .10500000000, 00 .17600000000, 00
.20000000000, 00 .21000000000, 00 .20640000000, 00 .16320000000, 00 .87200000000,-01 .00000000000, 00
-.88400000000,-01 -.18400000000, 00 -.21000000000, 00 -.21180000000, 00 -.17200000000, 00 -.95400000000,-01
.00000000000, 00 .10440000000, 00 .16640000000, 00 .24000000000, 00 .27360000000, 00 .26400000000, 00
.24264000000, 00 .19200000000, 00 .14500000000, 00 .14700000000, 00 .60000000000,-01 .32000000000,-01
.12800000000,-01 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
Z ( 6) =
.00000000000, 00 .16246000000,-02 .29675000000,-02 .67040000000,-02 .17088500000,-01 .53632000000,-01
.89796800000,-01 .13960000000, 00 .14728340000, 00 .11682000000, 00 .42030020000,-01 -.44946000000,-01
-.10416137000, 00 -.17984787000, 00 -.19279487000, 00 -.16819660000, 00 -.10846250000, 00 -.32384000000,-01
.11000000000,-01 .51625000000,-01 .79502400000,-01 .89430336000,-01 .56028800000,-01 .00000000000, 00
-.57609200000,-01 -.98233000000,-01 -.83250000000,-01 -.51323023000,-01 .27907000000,-01 .94221330000,-01
.13265100000, 00 .12657664000, 00 .10067200000, 00 .38600000000,-01 -.28301190000,-01 -.66680000000,-01
-.75998520000,-01 -.65160000000,-01 -.47450000000,-01 -.27022500000,-01 -.14625000000,-01 -.66800000000,-02
-.23326000000,-02 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
Z ( 7) =
-.13310000000,-02 -.44971200000,-03 .19291250000,-02 .81450000000,-02 .21150875000,-01 .65160000000,-01
.12595729000, 00 .24091200000, 00 .31278815000, 00 .38489300000, 00 .43368320000, 00 .41450500000, 00
.35912250000, 00 .23393500000, 00 .10520750000, 00 .00000000000, 00 -.77592375000,-01 -.10816000000, 00
-.10437500000, 00 -.83250000000,-01 -.52172416000,-01 .14060800000,-01 .69801856000,-01 .89915392000,-01
.73090888000,-01 .52000000000,-03 -.51625000000,-01 -.85148100000,-01 -.10294000000, 00 -.67258700000,-01
.00000000000, 00 .80745200000,-01 .12569600000, 00 .16617600000, 00 .16014240000, 00 .12246300000, 00
.92752850000,-01 .53632000000,-01 .29986000000,-01 .51443875000,-01 .55000000000,-02 .70400000000,-03
-.11371520000,-02 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
Z ( 8) =
.14641000000,-03 -.32661110000,-04 -.51859938000,-03 -.22943900000,-02 -.80954000000,-02 -.36710240000,-01
-.81011430000,-01 -.17098304000, 00 -.21738151000, 00 -.23559599000, 00 -.20054062000, 00 -.11541239000, 00
-.39511050000,-01 .67416400000,-01 .10419220000, 00 .92844527000,-01 .46084050000,-01 -.73830400000,-02
-.30493750000,-01 -.43043750000,-01 -.41798032000,-01 -.12619469000,-01 .24830729000,-01 .40282095000,-01
.26545252000,-01 -.22385590000,-01 -.43043750000,-01 -.43661458000,-01 -.85879900000,-02 .38217705000,-01
.67652010000,-01 .57998490000,-01 .32238080000,-01 -.20582240000,-01 -.60948060000,-01 -.67084790000,-01
-.58617177000,-01 -.36710240000,-01 -.20558440000,-01 -.20710500000,-01 -.32937500000,-02 -.78064000000,-03
.28925450000,-04 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
Z ( 9) =
.00000000000, 00 .19794240000,-03 .14835000000,-03 -.29760000000,-03 -.11500500000,-02 -.47616000000,-02
-.18235664000,-01 -.61824000000,-01 -.10781792000, 00 -.18070320000, 00 -.26247996000, 00 -.28930440000, 00
-.26647362000, 00 -.18451828000, 00 -.81877948000,-01 .00000000000, 00 .50184750000,-01 .54067200000,-01
.39000000000,-01 .13650000000,-01 -.11697100000,-01 -.38640538000,-01 -.31408742000,-01 .00000000000, 00
.32772355000,-01 .39412800000,-01 .13650000000,-01 -.14660370000,-01 -.49845600000,-01 -.41504532000,-01
.00000000000, 00 .54806656000,-01 .81469440000,-01 .92352000000,-01 .64534570000,-01 .26980800000,-01
.77795240000,-02 -.47616000000,-02 -.62640000000,-02 .88126500000,-02 -.21000000000,-02 -.99840000000,-03
-.35543040000,-03 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
Z (10) =
.00000000000, 00 -.19744722000,-04 .34799690000,-04 .41174240000,-03 .20167482000,-02 .13175757000,-01
.38932940000,-01 .11145760000, 00 .16656845000, 00 .21905997000, 00 .23414014000, 00 .17742873000, 00
.10582183000, 00 -.59057600000,-02 -.53806564000,-01 -.51250178000,-01 -.17772626000,-01 .14061978000,-01
.21947500000,-01 .19160313000,-01 .85156080000,-02 -.12881843000,-01 -.16177284000,-01 .00000000000, 00
.17139906000,-01 .10616434000,-01 -.81356250000,-02 -.19810607000,-01 -.13661956000,-01 .14079392000,-01
.34502525000,-01 .24794546000,-01 .37286910000,-02 -.32455600000,-01 -.47152689000,-01 -.35737580000,-01
-.23723885000,-01 -.94893600000,-02 -.33230510000,-02 -.83722500000,-02 -.74062500000,-04 .81680000000,-04
.46941360000,-04 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
Z (11) =
.16105100000,-04 -.13424520000,-04 -.74473930000,-04 -.29654250000,-03 -.14065459000,-02 -.94893600000,-02
-.21707828000,-01 -.40900880000,-01 -.35478490000,-01 .71156400000,-02 .88820840000,-01 .15054656000, 00
.16268692000, 00 .13065240000, 00 .59136600000,-01 .00000000000, 00 -.29931201000,-01 -.22312960000,-01
-.79765620000,-02 .81356250000,-02 .17887653000,-01 .12930458000,-01 -.76853240000,-02 -.18046378000,-01
-.84557660000,-02 .18019180000,-01 .19160313000,-01 .79233270000,-02 -.19716010000,-01 -.23619432000,-01
.00000000000, 00 .34408925000,-01 .47522198000,-01 .41236262000,-01 .11143350000,-01 -.11345661000,-01
-.16953360000,-01 -.13175757000,-01 -.75279490000,-02 -.24302770000,-02 -.97375000000,-03 -.22474240000,-03
-.14069063000,-04 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
ORTHV( 1) =
.99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00
.99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00
.99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00
.99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00
.99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00
.99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00
.99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00 .99999500000, 00
.99999500000, 00 .99999500000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
ORTHV( 2) =
.18091427000, 00 .54155198000,-01 -.72603875000,-01 -.22471475000, 00 -.37682564000, 00 -.63034379000, 00
-.83315831000, 00 -.10866764000, 01 -.12134355000, 01 -.13401946000, 01 -.14517425000, 01 -.14923054000, 01
-.14796295000, 01 -.14289259000, 01 -.13275186000, 01 -.12185058000, 01 -.10866764000, 01 -.93456557000, 00
-.83315831000, 00 -.70639923000, 00 -.57964016000, 00 -.33626274000, 00 -.72603875000,-01 .18091427000, 00
.43443242000, 00 .76400601000, 00 .94146872000, 00 .10758333000, 01 .12710423000, 01 .13901958000, 01
.14738568000, 01 .15042790000, 01 .14992086000, 01 .14485050000, 01 .13369570000, 01 .11949868000, 01
.10935796000, 01 .94146872000, 00 .81470964000, 00 .94146872000, 00 .56119149000, 00 .43443242000, 00
.30767335000, 00 .18091427000, 00 .25351814000, 01 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
ORTHV( 3) =
.38077157000, 00 .34986617000, 00 .35105210000, 00 .44732308000, 00 .61490817000, 00 .90610240000, 00
.10748749000, 01 .12484008000, 01 .12816781000, 01 .12365099000, 01 .11086176000, 01 .92272463000, 00
.74681667000, 00 .39975553000, 00 .62204002000,-01 -.27392111000, 00 -.62359539000, 00 -.93380881000, 00
-.10930750000, 01 -.12475863000, 01 -.13807035000, 01 -.15347371000, 01 -.16136526000, 01 -.16088930000, 01
-.15399508000, 01 -.13283787000, 01 -.11168098000, 01 -.91332406000, 00 -.52014138000, 00 -.14122310000, 00
.23103847000, 00 .59331495000, 00 .80630642000, 00 .10820534000, 01 .12750747000, 01 .13554191000, 01
.13613598000, 01 .12722140000, 01 .11414689000, 01 .10047859000, 01 .77300716000, 00 .60660489000, 00
.46872824000, 00 -.11456249000,-01 .47547983000, 00 .35657072000, 01 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
ORTHV( 4) =
-.79823084000, 00 -.80067049000, 00 -.79715824000, 00 -.84591472000, 00 -.95234255000, 00 -.11314958000, 01
-.11363566000, 01 -.99645490000, 00 -.76925127000, 00 -.32886317000, 00 .28084893000, 00 .78622687000, 00
.10665792000, 01 .14311515000, 01 .14902281000, 01 .14042354000, 01 .11394765000, 01 .71813505000, 00
.41957389000, 00 .61596314000,-01 -.27664894000, 00 -.78143528000, 00 -.11106587000, 01 -.11848816000, 01
-.10288778000, 01 -.46140586000, 00 .32308239000,-01 .46208864000, 00 .11312984000, 01 .15094606000, 01
.16607847000, 01 .15075803000, 01 .12712447000, 01 .73648366000, 00 .63127163000,-01 -.50803500000, 00
-.79805526000, 00 -.10081120000, 01 -.10494365000, 01 -.56626296000, 00 -.91487780000, 00 -.85755024000, 00
-.81573714000, 00 -.51512617000, 00 .54781566000, 00 -.17716119000, 01 .72915218000, 01 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
ORTHV( 5) =
.18981381000, 00 .18212744000, 00 .17475536000, 00 .12803558000, 00 .93802955000,-04 -.38283436000, 00
-.76609576000, 00 -.13297297000, 01 -.15742390000, 01 -.16959509000, 01 -.16291856000, 01 -.13290517000, 01
-.97979526000, 00 -.29957491000, 00 .31698759000, 00 .83300432000, 00 .12465664000, 01 .14633005000, 01
.14900215000, 01 .14254110000, 01 .12926716000, 01 .87268738000, 00 .29307249000, 00 -.30636385000, 00
-.88181795000, 00 -.14708733000, 01 -.16128321000, 01 -.16083570000, 01 -.13434388000, 01 -.86437106000, 00
-.28253741000, 00 .35064980000, 00 .72721854000, 00 .11834505000, 01 .14200295000, 01 .14142870000, 01
.13264542000, 01 .10846619000, 01 .85246233000, 00 .80444616000, 00 .42659404000, 00 .29664451000, 00
.22061041000, 00 .11601141000, 00 -.10299527000, 01 .72452555000, 00 .48722419000, 00 .54782807000, 01
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
ORTHV( 6) =
-.22439014000, 00 -.16640021000, 00 -.11311004000, 00 -.49521238000,-01 .66231974000,-01 .47868721000, 00
.93068800000, 00 .15880767000, 01 .17567631000, 01 .15337821000, 01 .83305321000, 00 -.40547616000,-01
-.64723534000, 00 -.13993441000, 01 -.14865983000, 01 -.11641636000, 01 -.47404492000, 00 .34695177000, 00
.78480969000, 00 .11567580000, 01 .13698078000, 01 .12599795000, 01 .64003964000, 00 -.19396392000, 00
-.98793296000, 00 -.14967635000, 01 -.12604325000, 01 -.80772268000, 00 .27909752000, 00 .11697197000, 01
.16759236000, 01 .15734277000, 01 .12060794000, 01 .32769000000, 00 -.64217597000, 00 -.12363963000, 01
-.14092013000, 01 -.13030612000, 01 -.10690714000, 01 -.71443887000, 00 -.56031300000, 00 -.40687146000, 00
-.29966720000, 00 -.11776283000, 00 -.71537430000, 00 -.74472034000, 00 .20419912000, 01 .48098507000, 00
.12268324000, 02 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
ORTHV( 7) =
-.78303128000, 00 -.82670960000, 00 -.87782819000, 00 -.99231211000, 00 -.11251143000, 01 -.11901667000, 01
-.94296622000, 00 -.20726089000, 00 .38853264000, 00 .11203441000, 01 .17679318000, 01 .18477265000, 01
.15528102000, 01 .78394589000, 00 -.60386533000,-01 -.69968161000, 00 -.10675443000, 01 -.10223156000, 01
-.80722121000, 00 -.42666585000, 00 .24115536000,-01 .83016678000, 00 .14193087000, 01 .15394855000, 01
.12072960000, 01 .17010108000, 00 -.54611511000, 00 -.10124807000, 01 -.13137230000, 01 -.94392447000, 00
-.17576350000, 00 .76332275000, 00 .12852945000, 01 .17341260000, 01 .15897648000, 01 .10354691000, 01
.60165256000, 00 .26740050000,-01 -.32587375000, 00 .63548022000,-01 -.67339898000, 00 -.73552799000, 00
-.76015103000, 00 -.50063003000, 00 .62880748000, 00 -.24045999000, 01 .24167570000, 00 .24954270000, 01
-.44240286000, 00 .11247907000, 02 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
ORTHV( 8) =
.55102002000, 00 .58645009000, 00 .62428330000, 00 .73203588000, 00 .88408873000, 00 .94749583000, 00
.56688291000, 00 -.60706421000, 00 -.13943599000, 01 -.19442944000, 01 -.18003310000, 01 -.85006750000, 00
.45289579000,-01 .11446080000, 01 .11943730000, 01 .55020793000, 00 -.50255456000, 00 -.13472553000, 01
-.15508542000, 01 -.14391875000, 01 -.10484757000, 01 .87104467000,-01 .11285561000, 01 .13864951000, 01
.80573497000, 00 -.74981468000, 00 -.14008705000, 01 -.14816721000, 01 -.62478891000, 00 .61501606000, 00
.14574617000, 01 .13413081000, 01 .76525341000, 00 -.48887054000, 00 -.14679685000, 01 -.15829690000, 01
-.13224276000, 01 -.66652200000, 00 -.16426751000, 00 -.28328812000, 00 .39611816000, 00 .48883284000, 00
.52627678000, 00 .32234679000, 00 -.39832310000, 00 .16860255000, 01 -.35606157000, 01 -.20279340000, 01
.57521862000, 01 .23456721000, 01 .22192140000, 02 .00000000000, 00 .00000000000, 00 .00000000000, 00
ORTHV( 9) =
-.45955274000, 00 -.35755074000, 00 -.24995704000, 00 -.11053534000, 00 .87766258000,-01 .63296047000, 00
.11288219000, 01 .15502927000, 01 .13488167000, 01 .51243557000, 00 -.80100787000, 00 -.15824341000, 01
-.15976266000, 01 -.90491107000, 00 .20968329000, 00 .10436154000, 01 .13189151000, 01 .84327198000, 00
.31069788000, 00 -.35764783000, 00 -.92765981000, 00 -.13190668000, 01 -.78834099000, 00 .27551224000, 00
.12751762000, 01 .14767473000, 01 .72245107000, 00 -.12051077000, 00 -.12653925000, 01 -.12528713000, 01
-.32237525000, 00 .10187241000, 01 .16797819000, 01 .18934508000, 01 .10021637000, 01 -.20543081000, 00
-.85024971000, 00 -.12807004000, 01 -.12997190000, 01 -.68241251000, 00 -.91830207000, 00 -.73739478000, 00
-.58203234000, 00 -.27135492000, 00 -.91327396000, 00 -.13336863000, 01 .26991516000, 01 -.34108894000, 01
-.10926272000, 01 .64046102000, 01 -.21043290000, 01 .23555474000, 02 .00000000000, 00 .00000000000, 00
ORTHV(10) =
.56769322000, 00 .47459886000, 00 .37529677000, 00 .22902504000, 00 -.29245545000,-01 -.75814991000, 00
-.12693359000, 01 -.11056706000, 01 -.28041898000, 00 .10461666000, 01 .20123702000, 01 .14237750000, 01
.33769500000, 00 -.11595225000, 01 -.11814670000, 01 -.21013213000, 00 .10346085000, 01 .14670507000, 01
.11525928000, 01 .39253260000, 00 -.48993602000, 00 -.14872851000, 01 -.10651410000, 01 .30267749000, 00
.14172762000, 01 .84654413000, 00 -.42465406000, 00 -.12574176000, 01 -.11814109000, 01 .23876902000, 00
.13923885000, 01 .10676716000, 01 .10584892000, 00 -.15393325000, 01 -.19670925000, 01 -.98114772000, 00
-.10871432000, 00 .83211815000, 00 .11580742000, 01 .51125088000, 00 .10013547000, 01 .83575431000, 00
.68434980000, 00 .34981017000, 00 .62306451000, 00 .15884627000, 01 -.27471804000, 01 .26259118000, 01
-.89065461000, 01 -.57305481000, 01 .15599810000, 02 .43980736000, 01 .45372355000, 02 .00000000000, 00
ORTHV(11) =
.56098628000, 00 .60525530000, 00 .63997055000, 00 .72380950000, 00 .82845115000, 00 .73494149000, 00
.12477575000, 00 -.13319182000, 01 -.19670249000, 01 -.17316141000, 01 -.29174653000, 00 .11200854000, 01
.14771642000, 01 .77284113000, 00 -.61485446000, 00 -.14174620000, 01 -.11628807000, 01 -.38616697000,-01
.64765981000, 00 .11118669000, 01 .11257507000, 01 .13044567000, 00 -.11426954000, 01 -.13774719000, 01
-.41368614000, 00 .13315981000, 01 .13457626000, 01 .63350557000, 00 -.10752539000, 01 -.14991116000, 01
-.48744750000, 00 .10753438000, 01 .16194111000, 01 .11442346000, 01 -.41994206000, 00 -.14182396000, 01
-.15250174000, 01 -.98116325000, 00 -.40235519000, 00 -.35659195000, 00 .32262116000, 00 .45572501000, 00
.51948438000, 00 .32587539000, 00 -.66787069000, 00 .16578738000, 01 -.34405579000, 01 -.21355981000, 01
.39643260000, 01 -.81232322000, 01 -.28493973000, 01 .14176898000, 02 .25817176000, 01 .44661036000, 02
ORTHV(12) =
-.10310559000, 01 -.10737387000, 01 -.10881514000, 01 -.11313062000, 01 -.10591200000, 01 -.30114984000,-02
.14920974000, 01 .21496275000, 01 .81777007000, 00 -.13544230000, 01 -.22982785000, 01 -.87952706000, 00
.46243453000, 00 .12521285000, 01 .33196285000, 00 -.63757676000, 00 -.76633328000, 00 .44341489000,-01
.60023883000, 00 .95726427000, 00 .91325518000, 00 .11733542000,-01 -.83444433000, 00 -.57883260000, 00
.49121328000, 00 .12291633000, 01 .47020592000, 00 -.42028020000, 00 -.10006418000, 01 .10689822000, 00
.13532131000, 01 .98053192000, 00 -.19298852000, 00 -.19078806000, 01 -.13100350000, 01 .84491477000, 00
.18565455000, 01 .16976840000, 01 .79588319000, 00 .51781153000, 00 -.63567879000, 00 -.88860144000, 00
-.98616934000, 00 -.33299095000, 03 -.33155983000, 03 .66177954000, 03 -.49206594000, 03 .30223837000, 01
-.62567340000, 02 -.20719404000, 03 .11804512000, 03 -.78860274000, 01 .39372889000, 02 .93216397000, 02
DEV =
-.31019000000,-02 -.32303100000,-02 -.32736700000,-02 -.34035000000,-02 -.31863300000,-02 -.90600000000,-05
.44889290000,-02 .64670880000,-02 .24602360000,-02 -.40747400000,-02 -.69143000000,-02 -.26460300000,-02
.13912200000,-02 .37669900000,-02 .99870000000,-03 -.19181300000,-02 -.23054900000,-02 .13340000000,-03
.18058000000,-02 .28799000000,-02 .27475000000,-02 .35300000000,-04 -.25104000000,-02 -.17414000000,-02
.14778000000,-02 .36979000000,-02 .14146000000,-02 -.12644000000,-02 -.30104000000,-02 .32160000000,-03
.40711000000,-02 .29499000000,-02 -.58060000000,-03 -.57398000000,-02 -.39412000000,-02 .25419000000,-02
.55853600000,-02 .51074300000,-02 .23943900000,-02 .15578200000,-02 -.19124200000,-02 -.26733300000,-02
-.29668600000,-02
COF =
.10017930000, 01 .99748751000, 00 -.19909433000, 01 .14803652000, 01 -.90927480000,-02 .18823191000, 00
.62333689000, 00 -.35513511000, 00 .23724870000,-01 -.11845212000, 00 -.28043865000, 00
STD =
.53182724000,-03
CV ( 1) =
.19822656000, 01 -.59297670000,-01 .42486303000, 01 -.80233565000, 01 -.17588931000, 00 -.89630820000, 00
-.11264608000, 02 .12253009000, 02 -.23350080000, 00 .16713029000, 02 .14553932000, 02
CV ( 2) =
.00000000000, 00 .10748280000, 02 -.57169120000, 00 .17231591000, 01 .25679539000, 01 -.18545000000, 02
.21440365000, 01 .47049036000, 01 -.28240652000, 02 .26545651000, 02 -.29827796000, 02
CV ( 3) =
.00000000000, 00 .00000000000, 00 .32607678000, 02 -.34337497000, 02 -.62902970000, 00 -.44924790000, 01
-.54203648000, 02 .60278802000, 02 -.92593000000, 00 .76352454000, 02 .74042361000, 02
CV ( 4) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .96979653000, 02 .24023835000, 01 .12342795000, 02
.55344621000, 02 -.11774956000, 03 .27210560000, 01 -.13352858000, 03 -.15365888000, 03
CV ( 5) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .63672933000, 02 -.34995337000, 02
.37660910000, 01 .92223304000, 01 -.99072319000, 02 .11363029000, 03 -.95378023000, 02
CV ( 6) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .28003140000, 03
.20355034000, 02 -.20283799000, 02 -.87071510000, 01 -.39387620000, 03 .17705090000, 03
CV ( 7) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.27186269000, 03 -.27671069000, 02 .10498020000, 02 -.28098035000, 03 -.36279196000, 03
CV ( 8) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .74839240000, 03 -.21354969000, 02 .70044378000, 03 -.12725703000, 03
CV ( 9) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .77518783000, 03 .23615169000, 03 .63315495000, 03
CV (10) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .20653157000, 04 .11530218000, 03
CV (11) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .19946081000, 04
CV (12) =
.14079295000, 01 .32784568000, 01 .57103131000, 01 .98478246000, 01 .79795320000, 01 .16734138000, 02
.16488259000, 02 .27356761000, 02 .27842195000, 02 .45445744000, 02 .44661034000, 02
VCV ( 1) =
.56066441000,-06 -.16771765000,-07 .12016834000,-05 -.22693278000,-05 -.49748569000,-07 -.25351199000,-06
-.31860840000,-05 .34656436000,-05 -.66043415000,-07 .47271166000,-05 .41164371000,-05
VCV ( 2) =
.00000000000, 00 .30400457000,-05 -.16169725000,-06 .48737868000,-06 .72632062000,-06 -.52452716000,-05
.60641973000,-06 .13307359000,-05 -.79875919000,-05 .75081775000,-05 -.84365000000,-05
VCV ( 3) =
.00000000000, 00 .00000000000, 00 .92227624000,-05 -.97120248000,-05 -.17791489000,-06 -.12706537000,-05
-.15330971000,-04 .17049269000,-04 -.26189023000,-06 .21595544000,-04 .20942156000,-04
VCV ( 4) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .27429745000,-04 .67949065000,-06 .34910387000,-05
.15653684000,-04 -.33304310000,-04 .76962405000,-06 -.37767251000,-04 -.43460909000,-04
VCV ( 5) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .18009265000,-04 -.98980884000,-05
.10652019000,-05 .26084458000,-05 -.28021635000,-04 .32139215000,-04 -.26976740000,-04
VCV ( 6) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .79204139000,-04
.57572220000,-05 -.57370739000,-05 -.24627324000,-05 -.11140402000,-03 .50077113000,-04
VCV ( 7) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.76893700000,-04 -.78264909000,-05 .29692621000,-05 -.79472541000,-04 -.10261215000,-03
VCV ( 8) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .21167546000,-03 -.60400439000,-05 .19811366000,-03 -.35993405000,-04
VCV ( 9) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .21925428000,-03 .66793193000,-04 .17908167000,-03
VCV (10) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .58415432000,-03 .32612092000,-04
VCV (11) =
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .56415537000,-03
VCV (12) =
.74877526000,-03 .17435726000,-02 .30369000000,-02 .52373413000,-02 .42437324000,-02 .88996704000,-02
.87689052000,-02 .14549070000,-01 .14807237000,-01 .24169284000,-01 .23751954000,-01
EP =
.94481477000,-01 .70814687000,-01 .30811633000,-01 .10512005000,-01 .94616035000,-02 .86705762000,-02
.28740655000,-02 .15152546000,-02 .12514215000,-02 .12081566000,-02 .52258335000,-03
A ( 1) =
.99999500000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
A ( 2) =
.18091427000, 00 .25351814000, 01 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
A ( 3) =
-.11456249000,-01 .47547983000, 00 .35657072000, 01 .00000000000, 00 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
A ( 4) =
-.51512617000, 00 .54781566000, 00 -.17716119000, 01 .72915218000, 01 .00000000000, 00 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
A ( 5) =
.11601141000, 00 -.10299527000, 01 .72452555000, 00 .48722419000, 00 .54782807000, 01 .00000000000, 00
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
A ( 6) =
-.11776283000, 00 -.71537430000, 00 -.74472034000, 00 .20419912000, 01 .48098507000, 00 .12268324000, 02
.00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
A ( 7) =
-.50063003000, 00 .62880748000, 00 -.24045999000, 01 .24167570000, 00 .24954270000, 01 -.44240286000, 00
.11247907000, 02 .00000000000, 00 .00000000000, 00 .00000000000, 00 .00000000000, 00
A ( 8) =
.32234679000, 00 -.39832310000, 00 .16860255000, 01 -.35606157000, 01 -.20279340000, 01 .57521862000, 01
.23456721000, 01 .22192140000, 02 .00000000000, 00 .00000000000, 00 .00000000000, 00
A ( 9) =
-.27135492000, 00 -.91327396000, 00 -.13336863000, 01 .26991516000, 01 -.34108894000, 01 -.10926272000, 01
.64046102000, 01 -.21043290000, 01 .23555474000, 02 .00000000000, 00 .00000000000, 00
A (10) =
.34981017000, 00 .62306451000, 00 .15884627000, 01 -.27471804000, 01 .26259118000, 01 -.89065461000, 01
-.57305481000, 01 .15599810000, 02 .43980736000, 01 .45372355000, 02 .00000000000, 00
A (11) =
.32587539000, 00 -.66787069000, 00 .16578738000, 01 -.34405579000, 01 -.21355981000, 01 .39643260000, 01
-.81232322000, 01 -.28493973000, 01 .14176898000, 02 .25817176000, 01 .44661036000, 02
GF =
.10000050000, 01 .39444908000, 00 .28044927000, 00 .13714558000, 00 .18253902000, 00 .81510725000,-01
.88905426000,-01 .45060999000,-01 .42452977000,-01 .22039852000,-01 .22390882000,-01 .30084691000,-02
Q =
.10575557000, 01 .41148509000, 00 -.40942553000, 00 .18347938000, 00 -.30128957000,-01 .24904116000,-01
.49842252000,-01 -.14731233000,-01 .52071090000,-02 -.22533730000,-02 -.62792690000,-02 .14933475000, 01
Q2 =
.11184240000, 01 .16931997000, 00 .16762926000, 00 .33664682000,-01 .90775404000,-03 .62021499000,-03
.24842500000,-02 .21700922000,-03 .27113984000,-04 .50776898000,-05 .39429219000,-04
E =
.37492350000, 00 .20560353000, 00 .37974270000,-01 .43095880000,-02 .34018340000,-02 .27816191000,-02
.29736910000,-03 .80359880000,-04 .53245896000,-04 .48168207000,-04 .87389880000,-05
ENF =
.10000050000, 01 .40085234000, 00 .28562298000, 00 .17750536000, 00 .21074417000, 00 .88491857000,-01
.14230965000, 00 .68284810000,-01 .84648748000,-01 .57770283000,-01 .46122049000,-01
Reference in New Issue View Git Blame Copy Permalink