1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
|
C Version 4.46 11/28/01
CHARACTER* 92 CHARS
INTEGER NODE(20, 92)
DIMENSION NODE0(20,10)
DIMENSION NODE1(20,10)
DIMENSION NODE2(20,10)
DIMENSION NODE3(20,10)
DIMENSION NODE4(20,10)
DIMENSION NODE5(20,10)
DIMENSION NODE6(20,10)
DIMENSION NODE7(20,10)
DIMENSION NODE8(20,10)
DIMENSION NODE9(20, 2)
EQUIVALENCE ( NODE(1, 1) , NODE0(1,1) )
EQUIVALENCE ( NODE(1, 11) , NODE1(1,1) )
EQUIVALENCE ( NODE(1, 21) , NODE2(1,1) )
EQUIVALENCE ( NODE(1, 31) , NODE3(1,1) )
EQUIVALENCE ( NODE(1, 41) , NODE4(1,1) )
EQUIVALENCE ( NODE(1, 51) , NODE5(1,1) )
EQUIVALENCE ( NODE(1, 61) , NODE6(1,1) )
EQUIVALENCE ( NODE(1, 71) , NODE7(1,1) )
EQUIVALENCE ( NODE(1, 81) , NODE8(1,1) )
EQUIVALENCE ( NODE(1, 91) , NODE9(1,1) )
DATA NCHARS / 92 /
DATA CHARS( 1: 26) / 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' /
DATA CHARS( 27: 52) / 'abcdefghijklmnopqrstuvwxyz' /
DATA CHARS( 53: 78) / '0123456789,.;:`"!?@#$%&|()' /
DATA CHARS( 79: 92) / '[]{}<>_+-*=/^~' /
DATA NODE0 /
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 21688,12488,25288,16088,21616,12416,25216,16016,22016,15688,
& 21988,15516,22188,15716, 0, 0, 0, 0, 0, 0,
& 21216,13988,16416,11216,21318,16118,13884, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 22816,14816,22888,14888,23788,13716,23988,13916,22575,11461,
& 11443,12529,15129,16243,16261,15175,12575, 0, 0, 0,
& 25888,16180,16188,11688,22288,12216,22488,12416,21616,13016,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 20490,11096,11064,21964,13196,23890,14396,15296,15691,15684,
& 13871,13864,15664, 0, 0, 0, 0, 0, 0, 0,
& 26694,16696,16396,16191,15982,15346,15014,14805,14600,14300,
& 14302,25014,15754,15982, 0, 0, 0, 0, 0, 0,
& 26396,16196,15891,15573,14923,14605,14300,14100,24956,14552,
& 14544,14940,15540,15944,15952,15556,14956, 0, 0, 0 /
DATA NODE1 /
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 21516,12616,24916,16116,21816,13888,15816,25616,13784, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 22890,13396,13362,22962,13762,20479,12079, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 24416,16769,12169,14416,26565,12565,14518, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 21616,14067,16416,11616, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 22416,13216,24416,15216,22716,12788,22916,12988,24716,14788,
& 24916,14988,21888,11683,11688,16088,16083,15888, 0, 0,
& 22716,14816,15933,15971,14888,12888,11771,11733,12716,23052,
& 14652,23056,13048,24656,14648,21973,11931,25773,15731, 0,
& 23058,13658,14507,16196,17296,23658,13858,14613, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 25616,16125,16016,11616,14654,12088,21688,15988,16179,21688,
& 14452, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 21347,11755,12255,12451,12235,12422,12916,13816,14522,15134,
& 15552,15670,15582,14888,13988,13484,13277,13468,14362,16153 /
DATA NODE2 /
& 23016,14616,21674,11984,12588,13184,13766,13716,26074,15784,
& 15188,14584,13966,13916,23184,13966,24584,13766, 0, 0,
& 22124,13642,14456,14870,14983,14888,14688,14486,14080,13670,
& 13253,12935,12924,13118,13516,14216,15019,15926, 0, 0,
& 21522,11716,13016,11548,11567,12283,13188,14588,15483,16167,
& 16148,14616,15916,16122,21976,11758,11940,25776,15958,15740,
& 21626,11716,15916,16026,21678,11788,15988,16078,22660,12644,
& 25060,15044,22654,15054,22650,15050,21720,15920,21784,15984,
& 23088,14688,23016,14616,23788,13716,23988,13916,21474,11769,
& 11842,13029,14629,15842,15969,16274,21769,12040,25969,15640,
& 22088,11680,11688,16088,11816,16016,16025,15616,21816,11616,
& 15888, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 26064,15554,14937,14323,13617,12916,12217,11722,11534,11746,
& 12256,12962,13564,14064,14460,14750,14737,14919,15416,16120,
& 21508,12655,13276,13986,14688,15287,15682,15671,15161,14256,
& 12757,24256,15449,15837,15626,14918,13816,13016,11820, 0,
& 21504,15866,25504,15104,14709,14317,13349,12662,12266,11866,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 25184,14987,14588,13888,13485,13177,13267,13861,14857,15345,
& 15233,14722,13716,12816,11922,11734,12150,12857,13861, 0 /
DATA NODE3 /
& 25559,14664,13764,12760,12052,11739,11729,12220,13116,14116,
& 15220,21842,14142, 0, 0, 0, 0, 0, 0, 0,
& 21645,12057,12863,13864,14962,15556,15744,15332,14427,13326,
& 12427,11733,11645,23004,14388, 0, 0, 0, 0, 0,
& 21557,12164,12867,13662,14246,14325,14113,13804,13500,13305,
& 13416,13932,14950,16063, 0, 0, 0, 0, 0, 0,
& 21759,11962,12264,12563,12661,12755,11916,22755,13360,14164,
& 14864,15361,15556,15546,14804, 0, 0, 0, 0, 0,
& 23164,12424,12618,13016,14116,15018,15724, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 22666,12060,11751,11740,12232,13329,14329,15333,15841,16049,
& 15958,15662,15064,14564,14160,13747,13004, 0, 0, 0,
& 22464,11616,25764,15264,14862,13448,12037,22843,13924,14218,
& 14616,15116, 0, 0, 0, 0, 0, 0, 0, 0,
& 22788,13288,13685,14074,14627,15018,15316,15716,21316,14256,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 22764,11600,22130,12122,12517,12916,13716,14418,14922,15664,
& 24922,15017,15316,15616, 0, 0, 0, 0, 0, 0,
& 22064,12364,12562,12645,12631,12416,13825,15037,15753,15759,
& 15662,15564,15264, 0, 0, 0, 0, 0, 0, 0 /
DATA NODE4 /
& 21641,12052,12962,13964,15062,15651,15641,15428,14418,13316,
& 12119,11628,11641, 0, 0, 0, 0, 0, 0, 0,
& 21559,11963,12566,15966,23266,12216,24766,14444,14430,14716,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 25554,12154,12469,12779,13285,13988,14788,15285,15579,15669,
& 15554,15236,14824,14319,13816,13016,12519,12224,12036,12154,
& 21500,12244,12655,13161,13864,14764,15460,15752,15640,15330,
& 14223,13022,11923, 0, 0, 0, 0, 0, 0, 0,
& 26264,13964,12962,12052,11641,11628,12119,13316,14418,15428,
& 15641,15551,14961,13763, 0, 0, 0, 0, 0, 0,
& 21655,12061,12764,15964,23864,13016, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 21958,12162,12464,12663,12658,12239,12224,12716,13716,14521,
& 15333,15645,15657,15463,15164, 0, 0, 0, 0, 0,
& 25660,14964,14264,13464,12761,12254,12147,12542,11936,11728,
& 12020,12816,13816,14618,15321,22542,14042, 0, 0, 0,
& 22764,12056,11645,11432,11621,12116,12716,13320,13816,14416,
& 15120,15731,15942,15953,15564,23320,13740, 0, 0, 0,
& 25386,14086,12977,12765,13357,14457,23357,12044,11733,12023,
& 13317,15016,15213,14810,24086,13392, 0, 0, 0, 0 /
DATA NODE5 /
& 21865,12163,12357,11947,11736,12025,12822,14222,15228,15938,
& 16051,15865,23004,14388, 0, 0, 0, 0, 0, 0,
& 25482,14482,13473,12560,11942,11931,12422,13617,15016,15314,
& 14809,23990,14482, 0, 0, 0, 0, 0, 0, 0,
& 21272,11864,13064,13672,13688,13096,11896,11288,11272, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 21687,12496,12460,21660,13260, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 21290,11896,13196,13690,13683,11268,11260,13660, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 21391,11896,13196,13691,13684,13179,12079,23179,13674,13666,
& 13060,11860,11266, 0, 0, 0, 0, 0, 0, 0,
& 21296,11271,13771,23296,13260,22860,13560, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 23696,11296,11280,13180,13675,13666,13060,11860,11266, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 23691,13196,11896,11290,11266,11860,13060,13666,13675,13279,
& 11679,11275, 0, 0, 0, 0, 0, 0, 0, 0,
& 21296,13696,13692,12268,12260, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 /
DATA NODE6 /
& 21779,11284,11291,11796,13196,13691,13684,13179,13675,13665,
& 13060,11860,11265,11275,11779,13179, 0, 0, 0, 0,
& 23682,13177,11777,11282,11290,11896,13096,13690,13666,13060,
& 11860,11266, 0, 0, 0, 0, 0, 0, 0, 0,
& 22604,13215,12616,12624,13424,13416,12604, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 22624,12616,13416,13424,12624, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 21620,11616,12016,12020,11620,23820,13816,14216,14220,13820,
& 26020,16016,16416,16420,16020, 0, 0, 0, 0, 0,
& 21466,11890,12590,11466, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 22696,13496,14092,14486,14478,14072,13468,12668,12072,11678,
& 11686,12092,12696, 0, 0, 0, 0, 0, 0, 0,
& 23130,12822,13622,13530,13130,23441,13588,14488,13441, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 /
DATA NODE7 /
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 22064,15232,22032,15264, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 23775,14380,15480,16075,16365,16242,15826,15016,13716,13021,
& 12834,13245,14153,15053,16249, 0, 0, 0, 0, 0,
& 21648,15648,23464,13460,13860,13864,13464,23436,13432,13832,
& 13836,13436, 0, 0, 0, 0, 0, 0, 0, 0,
& 22001,11201,10708,10716,11223,12023,13601,14401,14908,14916,
& 14423,13623,12001, 0, 0, 0, 0, 0, 0, 0,
& 23696,13608, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 24872,14159,13941,14121,14808, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 22472,13159,13340,13121,12408, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 /
DATA NODE8 /
& 24266,11648,14230,26066,13448,16030, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 21666,14248,11630,23466,16048,13430, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 27280,14016,17216, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 22282,15482,24882,14786,15882,14578,14882, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 20896,17296, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 23668,13628,21648,15648, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 21648,15648, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 23146,13150,13453,13853,14150,14146,13843,13443,13146,23450,
& 13846,23850,13446, 0, 0, 0, 0, 0, 0, 0,
& 21656,15656,21640,15640, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 21208,16096, 0, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 /
DATA NODE9 /
& 22480,14088,15680, 0, 0, 0, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
& 22480,12985,13685,14479,15179,15684, 0, 0, 0, 0,
& 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 /
|
