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 /