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 / & 21616,12472,13183,13888,15488,16183,16472,15616,22150,16150, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 21616,12688,15188,16184,16476,16368,15860,14856,15752,16044, & 15728,15220,14216,11616,22256,14856, 0, 0, 0, 0, & 26474,16183,15488,13888,13183,12472,11832,12121,12816,14416, & 15121,15729, 0, 0, 0, 0, 0, 0, 0, 0, & 21416,14416,15121,15832,16472,16183,15488,12488,21816,12888, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 25616,11616,12688,16688,22256,15356, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 21616,12688,16688,22256,15256, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 26474,16183,15488,13888,13183,12472,11832,12121,12816,14416, & 15121,15832,16150,14550, 0, 0, 0, 0, 0, 0, & 21616,12688,25616,16688,22256,16256, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 24888,13816,22616,15016,23688,16088, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 21630,11921,12616,13916,14621,15332,16188,26788,14688, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 / DATA NODE1 / & 22688,11616,26688,12045,23458,15616, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 23088,12016,16016, 0, 0, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 21416,12488,14048,16888,15816, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 21616,12688,15616,16688, 0, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 21832,12472,13183,13888,15488,16183,16472,15832,15121,14416, & 12816,12121,11832, 0, 0, 0, 0, 0, 0, 0, & 21616,12688,15188,16183,16476,16262,15755,14750,12150, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 21832,12472,13183,13888,15488,16183,16472,15832,15121,14416, & 12816,12121,11832,24331,15616, 0, 0, 0, 0, 0, & 21616,12688,15188,16183,16476,16262,15755,14750,12150,24750, & 15816, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 26576,16183,15288,14088,13183,12474,12470,12761,13656,14856, & 15651,15942,15830,15121,14216,13016,12121,11830, 0, 0, & 24688,13616,22488,16888, 0, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 / DATA NODE2 / & 22688,11832,12121,12816,14416,15121,15832,16688, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22688,12582,13616,16582,16688, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22488,11952,11939,12516,13737,14046,14137,14716,15939,16352, & 16888,24046,14154, 0, 0, 0, 0, 0, 0, 0, & 22688,12582,15622,15616,26688,16582,11622,11616, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22688,12582,14256,16582,16688,24256,13616, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22688,16688,11616,15616,23356,15156, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22764,14964,15759,16150,15616,25942,13142,12338,11730,11728, & 12020,12816,14416,15220,15728, 0, 0, 0, 0, 0, & 22888,11816,22352,12860,13764,15364,16060,16252,15928,15420, & 14616,13016,12220,12028, 0, 0, 0, 0, 0, 0, & 26152,15860,15164,13564,12660,12152,11728,12020,12816,14416, & 15220,15728, 0, 0, 0, 0, 0, 0, 0, 0, & 26488,15416,25952,15660,14964,13364,12460,11952,11528,11820, & 12616,14216,15020,15528, 0, 0, 0, 0, 0, 0 / DATA NODE3 / & 25726,15220,14416,12816,12020,11728,12152,12660,13564,15164, & 15860,16152,15941,11941, 0, 0, 0, 0, 0, 0, & 26872,16680,15884,14684,13880,13272,12416,22256,14856, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 21616,11908,12704,14304,15108,15616,16364,26152,15860,15164, & 13564,12660,12152,11937,12129,12925,14525,15329,15937, 0, & 22688,11616,22152,12660,13564,15164,15860,16152,15616, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22416,15216,24016,14662,13562,24277,14280,14482,14782,14980, & 14977,14675,14375,14277, 0, 0, 0, 0, 0, 0, & 21416,11708,12504,13704,14508,15016,15662,14462,25175,15077, & 15080,15282,15582,15780,15777,15475,15175, 0, 0, 0, & 22888,11816,22244,15968,23250,15816, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22316,14916,23616,14688,13788, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22164,11416,22053,12360,13064,13464,13960,14153,14560,15264, & 15664,16160,16353,15816,24153,13724, 0, 0, 0, 0, & 22364,11616,22152,12660,13564,15164,15860,16152,15616, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 / DATA NODE4 / & 21728,12152,12660,13564,15164,15860,16152,15728,15220,14416, & 12816,12020,11728, 0, 0, 0, 0, 0, 0, 0, & 22564,11600,22352,12860,13764,15364,16060,16352,16136,15528, & 14724,13124,12328,12136, 0, 0, 0, 0, 0, 0, & 26164,15200,25952,15660,14964,13364,12460,11952,11736,11928, & 12724,14324,15128,15736, 0, 0, 0, 0, 0, 0, & 22764,12016,22552,13060,13964,15364,16060,16352, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 26256,15961,15364,13364,12661,12255,12151,12345,12941,14941, & 15637,15831,15726,15319,14616,12616,11919,11724, 0, 0, & 23484,12528,12820,13616,14816,15620,16128,22366,14966, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22364,11728,12020,12816,14416,15220,15728,26364,15616, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22364,12154,13616,16154,16364, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22164,11840,11830,12516,13529,13936,14029,14716,15830,16140, & 16564,23936,14042, 0, 0, 0, 0, 0, 0, 0, & 22564,15616,26164,11616, 0, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 / DATA NODE5 / & 22364,11937,12129,12925,14525,15329,15937,26364,15616,15108, & 14304,12704,11908,11616, 0, 0, 0, 0, 0, 0, & 22564,16164,11616,15616,23042,14742, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 21728,12576,13084,13888,15488,16284,16576,15728,15220,14416, & 12816,12020,11728, 0, 0, 0, 0, 0, 0, 0, & 23578,14688,13616,22616,14616, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22576,13084,13888,15488,16284,16576,16466,15858,12336,11728, & 11616,15616, 0, 0, 0, 0, 0, 0, 0, 0, & 22778,13284,14088,15488,16284,16576,16469,15861,15057,15753, & 16044,15728,15220,14416,12816,12020,11726,25057,13457, 0, & 26088,15016,24016,16016,26340,11940,12688, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 26488,12688,12257,15057,15753,16045,15728,15220,14416,12816, & 12020,11728, 0, 0, 0, 0, 0, 0, 0, 0, & 26578,16284,15488,13888,13084,12576,11728,12020,12816,14416, & 15220,15728,16045,15753,15057,13457,12553,12045, 0, 0, & 22688,16688,16579,13328,13216, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 / DATA NODE6 / & 25357,13157,12467,12576,13084,13888,15488,16284,16576,16367, & 15357,16047,15728,15220,14416,12816,12020,11728,12047,13157, & 21726,12020,12816,14416,15220,15728,16576,16284,15488,13888, & 13084,12576,12259,12551,13247,14847,15751,16259, 0, 0, & 22002,12916,13024,12224,12116,12515,12002, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22224,13024,12916,12116,12224, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22002,12515,12116,12224,13024,12916,12002,22656,12548,13348, & 13456,12656, 0, 0, 0, 0, 0, 0, 0, 0, & 22224,12116,12916,13024,12224,22656,12548,13348,13456,12656, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 25784,16468,16384,15784, 0, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22684,12866,13284,12684,24284,14466,14884,14284, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 23124,12816,13416,13324,13124,23439,14588,13788,13439,24185, & 13546, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22374,12783,13588,14788,15583,15574,15066,14260,13754,13547, & 13439,23124,12816,13416,13324,13124, 0, 0, 0, 0 / DATA NODE7 / & 24443,13538,12743,12854,13861,14858,14443,14739,15239,15849, & 16065,15375,14277,12974,12063,11547,11631,12722,13922,15227, & 23678,12223,25178,13723,21859,15859,21440,15340, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 25576,13376,12573,12167,12059,12254,12852,14452,15050,15345, & 15237,14731,13928,11728,23116,14188, 0, 0, 0, 0, & 21116,16188,22888,12484,12479,12875,13375,13779,13784,13388, & 12888,24616,15020,15025,14629,14129,13725,13720,14116,14616, & 25436,14623,13918,13216,12316,11521,11229,11437,12146,14056, & 14764,14872,14777,14280,13680,13077,12669,12858,15116, 0, & 23696,13608, 0, 0, 0, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 26092,15282,14665,14350,14235,14418,14808,24515,14430,14650, & 15072,15485, 0, 0, 0, 0, 0, 0, 0, 0, & 23492,13882,14065,13950,13635,13018,12208,23784,13870,13650, & 13229,12816, 0, 0, 0, 0, 0, 0, 0, 0, & 25794,14494,13306,14606,24694,13506, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 22794,14094,12906,11606,23894,12706, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 / DATA NODE8 / & 25696,14490,13853,12750,13746,13310,14304,23509,13945,13746, & 24691,14054,13853, 0, 0, 0, 0, 0, 0, 0, & 23096,14090,13453,14450,13346,12910,11804,22709,13145,13346, & 23890,13254,13453, 0, 0, 0, 0, 0, 0, 0, & 25866,11548,15330, 0, 0, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 21866,15548,11330, 0, 0, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 20600,17000, 0, 0, 0, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 21648,15648,23668,13628, 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, & 22265,14031,22231,14065,21248,15048, 0, 0, 0, 0, & 0, 0, 0, 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, & 20608,16696, 0, 0, 0, 0, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 / DATA NODE9 / & 21634,15634,21648,15648,21662,15662, 0, 0, 0, 0, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & 21636,15636,21653,12059,12862,13459,13854,14452,15255,15661, & 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 /