Page:FORTRAN IV enhanced character graphics (IA fortranivenhance5003wolc).pdf/33

      DATA IAL175 /304817107,443261973,300482560,430974688,304460640,   DAT07570
     2 296724127,458236939,304447488,441459679,298754971,300721176,     DAT07580
     3 306947478,319465044,323561103,321299852,306586573,298296210,     DAT07590
     4 300557333,306914711,319563353,323856029,321889696,307246111,     DAT07600
     5 300852187,302818456,315336214,323626706,325559949,321267083,     DAT07610
     6 306553804,298230607,296297364,302720151,315368985,321758813,     DAT07620
     7 319796830,315597983,300888974,304494028,323420160,455812564,     DAT07630
     8 311010515,302654358,296526682,298755103,309339424,317695581,     DAT07640 
     9 323790484,321365452,310748299,300295054,300360716,455910934,     DAT07650
     * 313144920,317367572,308945941,298595476,300622745,298656733,     DAT07660
     1 307213211/                                                       DAT07670 
      DATA IAL176 /302982367,311403998,321762655,319727193,321529359,   DAT07680
     2 314979789,310781068,300318720,449750412,317076893,317629900,     DAT07690
     3 432711637,334115733,298461140,0,432711637,334115733,298461140,0, DAT07700
     4 466756356,295843748,334635844,0,432842713,334246809,298592216,   DAT07710
     5 432580561,333984657,298330064,0,445785250,303014811,296428370,   DAT07720 
     6 298230793,306390276,312620324,313664738,305112027,298525586,     DAT07730
     7 300328009,308487492,0,431104994,305112283,311108882,308716617,   DAT07740
     8 300098372,297939812,298984482,307209499,313206098,310813833,     DAT07750
     9 302195588,0,441459807,308978836,441459860,441459935,304784532,   DAT07760
     * 430875549/                                                       DAT07770
      DATA IAL177 /315336151,430876119,430875484,317466071,451847581,   DAT07780
     2 298558295,451846999,451847644,296493911,0,438707211,300262284,   DAT07790
     3 298230734,302457933,304423944,298038221,300295180,302425037,     DAT07800
     4 436577354,438707208,0,434578317,29819763,3032359628,302452254,   DAT07810 
     5 300364749,300295180,302425037,0,443688135,310621412,311567623,   DAT07820
     6 453944989,319792480,307241951,296657755,298623960,317335059,     DAT07830
     7 321431119,319202636,306586637,300365341,317662559,307209182,     DAT07840
     8 298754971,300721621,321496721,323462733,319169867,306553804,     DAT07850
     9 296166350,455550348,0,445653771,445555531,293975325,325429003,   DAT07860 
     * 445654795,434677329,432547472/                                   DAT07870  
      DATA IAL178 /0,433070987,435135436,433071520,321889950,325986009, DAT07880
     2 323724886,315274207,315598430,323888793,321627542,434840982,     DAT07870
     3 321562260,325658319,323397196,314942347,434808213,321529490,     DAT07880
     4 323462733,314975180,0,462268125,321889760,309339231,300852123,   DAT07910
     5 296493907,298329038,304489675,317040204,325527312,462268123,     DAT07920
     6 323921502,317695199,305079259,298591123, 300426317,308684236,    DAT07930
     7 321300110,325592848,0,433070987,435135436,433071456,319792797,   DAT07940
     8 325953304,327788240,323429900,312845195,435135839,319759965,     DAT07950
     9 323856088,325691024,321332749,312878028,0,433070987,435135436,   DAT07960 
     * 433071776,435136159,324023254/                                   DAT07970
      DATA IAL179 /313206101,434808149,434513548,323335051,323321856,   DAT07980
     2 433070987,435135435,298169248,324023263,323987104,434840918,     DAT07990
     3 313177045,313163776,462268125,321889760,309339231,300852123,     DAT08000
     4 296493907,298329038,304489675,317040204,325527312,327820756,     DAT08010
     5 462268123,323921502,317695199,305079325,300786584,298427344,     DAT08020
     6 302457933,308684236,321300110,325592787,317302228,0,433070987,   DAT08030
     7 433071072,300262283,462431968,325429003,462432011,434841302,     DAT08040
     8 434808533,0,433070987,300266400,300950475,0,449848720,312911052, DAT08050
     9 304489421,298328912,449848800,317203853,312878283, 304456652,    DAT08060 
     * 298230608,0,433070987,300266400/                                 DAT08070 
      DATA IAL180 /300950475,462431968,300562208,300528791,325429003,   DAT08080
     2 443262731,0,433070987,433071072,300299212,323364491,432383627,0, DAT08090
     3 433070987,435004363,298169307,314946464,315045792,315045723,     DAT08100
     4 314947419,329623435,466626443,0,433070987,435069899,298169309,   DAT08110
     5 327529376,325531360,325531360,328214283,0,443556959,300852123,   DAT08120
     6 296493907,298329038,304489675,317040204,325527312,329885528,     DAT08130
     7 328050397,321889760,309343519,305079259,298591123,300426317,     DAT08140
     8 310781324,321300176,327788312,325953118,315598111,0,433070987,   DAT08150
     9 435135435,298169248,317728351,323954396,325887639,321594837,     DAT08160
     * 300594143,317695582/                                             DAT08170
      DATA IAL 181 /323888793,321627606,300613632,443556959,300852123,  DAT08180
     2 296493907,298329038,304489675,317040204,325527312,329885528,     DAT08190

I-21