! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
! 
! Sparse Jacobian Data Structures File
! 
! Generated by KPP-2.2.4_gc symbolic chemistry Kinetics PreProcessor
!       (http://www.cs.vt.edu/~asandu/Software/KPP)
! KPP is distributed under GPL, the general public licence
!       (http://www.gnu.org/copyleft/gpl.html)
! (C) 1995-1997, V. Damian & A. Sandu, CGRER, Univ. Iowa
! (C) 1997-2005, A. Sandu, Michigan Tech, Virginia Tech
!     With important contributions from:
!        M. Damian, Villanova University, USA
!        R. Sander, Max-Planck Institute for Chemistry, Mainz, Germany
! 
! File                 : gckpp_JacobianSP.f90
! Time                 : Mon Oct 29 14:22:59 2018
! Working directory    : /n/home08/xnw/Code.v11-02_Cl/KPP/Standard
! Equation file        : gckpp.kpp
! Output root filename : gckpp
! 
! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~



MODULE gckpp_JacobianSP

  PUBLIC
  SAVE


! Sparse Jacobian Data


  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_0 = (/ &
       1,  2,  3,  4,  5,  5,  5,  5,  5,  6,  6,  6, & ! index 1 - 12
       6,  6,  6,  6,  6,  6,  6,  6,  6,  6,  6,  6, & ! index 13 - 24
       6,  6,  6,  6,  6,  6,  6,  6,  6,  6,  6,  6, & ! index 25 - 36
       6,  6,  6,  7,  7,  7,  8,  8,  8,  8,  8,  8, & ! index 37 - 48
       8,  8,  9,  9,  9,  9,  9,  9,  9,  9, 10, 10, & ! index 49 - 60
      11, 11, 11, 11, 11, 11, 11, 11, 11, 12, 12, 12, & ! index 61 - 72
      13, 13, 13, 14, 14, 14, 15, 15, 15, 16, 16, 16, & ! index 73 - 84
      17, 17, 17, 18, 18, 19, 19, 19, 19, 19, 20, 20, & ! index 85 - 96
      20, 21, 21, 21, 22, 22, 22, 23, 23, 24, 24, 25, & ! index 97 - 108
      25, 25, 26, 26, 27, 27, 28, 28, 29, 29, 29, 29, & ! index 109 - 120
      30, 30, 31, 31, 31, 32, 32, 33, 33, 33, 33, 33, & ! index 121 - 132
      33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, & ! index 133 - 144
      33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, & ! index 145 - 156
      33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, & ! index 157 - 168
      33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, & ! index 169 - 180
      33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, & ! index 181 - 192
      33, 33, 33, 33, 34, 34, 34, 34, 34, 34, 34, 34, & ! index 193 - 204
      34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, & ! index 205 - 216
      34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, & ! index 217 - 228
      34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, & ! index 229 - 240
      34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, & ! index 241 - 252
      34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, & ! index 253 - 264
      34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 35, 35, & ! index 265 - 276
      35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, & ! index 277 - 288
      35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, & ! index 289 - 300
      35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, & ! index 301 - 312
      35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 36, & ! index 313 - 324
      36, 36, 36, 36, 36, 36, 36, 36, 37, 37, 37, 37, & ! index 325 - 336
      37, 37, 37, 37, 37, 37, 38, 38, 39, 39, 39, 39, & ! index 337 - 348
      40, 40, 41, 41, 42, 42, 42, 42, 43, 43, 44, 44 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_1 = (/ &
      45, 45, 46, 46, 47, 47, 47, 48, 48, 49, 49, 49, & ! index 361 - 372
      50, 50, 50, 51, 51, 52, 52, 52, 53, 53, 54, 54, & ! index 373 - 384
      55, 55, 56, 56, 57, 57, 58, 58, 59, 59, 60, 60, & ! index 385 - 396
      60, 60, 61, 61, 61, 61, 62, 62, 62, 63, 63, 63, & ! index 397 - 408
      63, 64, 64, 64, 64, 64, 65, 65, 65, 65, 65, 66, & ! index 409 - 420
      66, 66, 66, 66, 67, 67, 67, 67, 67, 68, 68, 68, & ! index 421 - 432
      68, 68, 68, 68, 68, 68, 68, 69, 69, 69, 70, 70, & ! index 433 - 444
      70, 71, 71, 71, 71, 71, 72, 72, 72, 72, 73, 73, & ! index 445 - 456
      73, 73, 74, 74, 74, 75, 75, 75, 75, 75, 75, 76, & ! index 457 - 468
      76, 76, 77, 77, 77, 78, 78, 78, 79, 79, 79, 80, & ! index 469 - 480
      80, 80, 81, 81, 81, 82, 82, 82, 83, 83, 83, 84, & ! index 481 - 492
      84, 84, 84, 84, 84, 84, 85, 85, 85, 85, 86, 86, & ! index 493 - 504
      86, 86, 87, 87, 87, 88, 88, 88, 88, 89, 89, 89, & ! index 505 - 516
      90, 90, 90, 91, 91, 91, 91, 91, 91, 91, 91, 92, & ! index 517 - 528
      92, 92, 93, 93, 93, 94, 94, 94, 94, 94, 94, 94, & ! index 529 - 540
      95, 95, 95, 95, 96, 96, 96, 96, 96, 97, 97, 97, & ! index 541 - 552
      97, 97, 98, 98, 98, 98, 98, 99, 99, 99, 99,100, & ! index 553 - 564
     100,100,100,101,101,101,101,101,101,101,101,101, & ! index 565 - 576
     101,102,102,102,102,103,103,103,103,103,104,104, & ! index 577 - 588
     104,104,104,104,105,105,105,106,106,106,106,107, & ! index 589 - 600
     107,107,107,108,108,108,108,108,108,108,108,108, & ! index 601 - 612
     109,109,109,109,110,110,110,110,111,111,111,111, & ! index 613 - 624
     111,112,112,112,112,112,113,113,113,113,113,113, & ! index 625 - 636
     114,114,114,114,114,114,115,115,115,115,115,115, & ! index 637 - 648
     116,116,116,116,116,116,116,117,117,117,117,117, & ! index 649 - 660
     117,117,117,117,117,117,117,117,117,118,118,118, & ! index 661 - 672
     118,119,119,119,119,119,120,120,120,120,120,121, & ! index 673 - 684
     121,121,121,121,121,121,122,122,122,122,122,122, & ! index 685 - 696
     123,123,123,123,124,124,124,124,125,125,125,125, & ! index 697 - 708
     125,125,125,126,126,126,126,126,126,126,127,127 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_2 = (/ &
     127,127,127,127,127,127,128,128,128,128,128,128, & ! index 721 - 732
     129,129,129,129,129,129,130,130,130,130,131,131, & ! index 733 - 744
     131,131,131,132,132,132,132,132,133,133,133,133, & ! index 745 - 756
     133,133,133,133,133,133,133,134,134,134,134,134, & ! index 757 - 768
     134,134,134,135,135,135,135,135,136,136,136,136, & ! index 769 - 780
     136,136,136,137,137,137,137,137,137,138,138,138, & ! index 781 - 792
     138,139,139,139,139,139,140,140,140,140,140,140, & ! index 793 - 804
     140,140,140,140,141,141,141,141,141,141,141,142, & ! index 805 - 816
     142,142,142,142,142,142,142,142,142,142,143,143, & ! index 817 - 828
     143,143,143,143,144,144,144,144,144,144,144,144, & ! index 829 - 840
     144,144,144,144,144,144,144,144,144,144,145,145, & ! index 841 - 852
     145,145,145,145,145,145,145,145,146,146,146,146, & ! index 853 - 864
     146,146,147,147,147,147,147,147,148,148,148,148, & ! index 865 - 876
     148,149,149,149,149,149,149,149,150,150,150,150, & ! index 877 - 888
     150,150,150,150,151,151,151,151,151,151,151,151, & ! index 889 - 900
     152,152,152,152,152,152,152,152,153,153,153,153, & ! index 901 - 912
     153,153,153,153,153,153,154,154,154,154,154,154, & ! index 913 - 924
     154,154,154,154,154,154,154,154,155,155,155,155, & ! index 925 - 936
     155,155,155,155,155,155,155,155,155,155,156,156, & ! index 937 - 948
     156,156,156,156,156,156,156,157,157,157,157,157, & ! index 949 - 960
     157,157,157,157,157,157,157,157,157,157,157,157, & ! index 961 - 972
     157,157,157,157,157,157,157,158,158,158,158,158, & ! index 973 - 984
     158,158,158,158,159,159,159,159,159,159,159,159, & ! index 985 - 996
     159,159,159,159,160,160,160,160,160,160,160,160, & ! index 997 - 1008
     161,161,161,161,161,161,161,161,161,161,161,161, & ! index 1009 - 1020
     161,162,162,162,162,162,162,162,162,162,162,162, & ! index 1021 - 1032
     162,163,163,163,163,163,163,163,163,163,163,164, & ! index 1033 - 1044
     164,164,164,164,164,164,164,164,164,164,164,164, & ! index 1045 - 1056
     164,164,164,164,164,164,164,165,165,165,165,165, & ! index 1057 - 1068
     165,165,166,166,166,166,166,166,166,167,167,167 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_3 = (/ &
     167,167,167,167,167,167,167,168,168,168,168,168, & ! index 1081 - 1092
     168,168,168,168,168,168,169,169,169,169,169,169, & ! index 1093 - 1104
     169,170,170,170,170,170,170,170,170,170,170,170, & ! index 1105 - 1116
     170,171,171,171,171,171,171,171,171,172,172,172, & ! index 1117 - 1128
     172,172,172,172,172,172,172,172,173,173,173,173, & ! index 1129 - 1140
     173,174,174,174,174,174,174,174,174,174,174,174, & ! index 1141 - 1152
     174,174,174,174,174,174,174,174,174,174,174,174, & ! index 1153 - 1164
     174,174,174,175,175,175,175,175,175,175,175,175, & ! index 1165 - 1176
     175,175,176,176,176,176,176,176,176,176,176,176, & ! index 1177 - 1188
     176,177,177,177,177,177,177,177,177,177,177,177, & ! index 1189 - 1200
     178,178,178,178,178,178,178,178,178,178,178,178, & ! index 1201 - 1212
     178,178,178,178,178,178,178,178,178,178,178,178, & ! index 1213 - 1224
     178,178,178,178,178,178,179,179,179,179,179,179, & ! index 1225 - 1236
     179,179,179,179,179,179,179,179,179,180,180,180, & ! index 1237 - 1248
     180,180,180,180,180,180,180,180,181,181,181,181, & ! index 1249 - 1260
     181,181,181,181,181,181,181,182,182,182,182,182, & ! index 1261 - 1272
     182,182,182,182,183,183,183,183,183,183,183,183, & ! index 1273 - 1284
     183,183,183,184,184,184,184,184,184,184,184,184, & ! index 1285 - 1296
     185,185,185,185,185,185,185,185,185,185,185,186, & ! index 1297 - 1308
     186,186,186,186,186,186,186,186,186,187,187,187, & ! index 1309 - 1320
     187,187,187,187,187,187,187,187,187,187,187,187, & ! index 1321 - 1332
     187,187,187,187,187,187,187,187,187,187,187,188, & ! index 1333 - 1344
     188,188,188,188,188,188,189,189,189,189,189,189, & ! index 1345 - 1356
     189,189,189,189,189,189,189,189,189,189,189,189, & ! index 1357 - 1368
     189,189,189,189,189,189,189,189,189,189,189,189, & ! index 1369 - 1380
     189,189,189,189,189,189,189,189,189,189,189,189, & ! index 1381 - 1392
     189,190,190,190,190,190,190,190,190,190,190,190, & ! index 1393 - 1404
     190,191,191,191,191,191,191,191,191,191,191,191, & ! index 1405 - 1416
     191,191,191,191,191,191,191,191,191,191,191,191, & ! index 1417 - 1428
     191,191,191,191,191,191,191,191,191,191,191,191 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_4 = (/ &
     191,191,191,191,191,191,191,191,191,191,191,191, & ! index 1441 - 1452
     191,191,191,191,191,192,192,192,192,192,192,192, & ! index 1453 - 1464
     192,193,193,193,193,193,193,193,193,193,193,193, & ! index 1465 - 1476
     193,193,193,193,193,193,193,193,193,193,193,193, & ! index 1477 - 1488
     193,193,193,193,193,193,193,193,193,193,193,193, & ! index 1489 - 1500
     193,193,193,193,193,193,193,193,193,193,193,193, & ! index 1501 - 1512
     193,193,193,193,193,193,193,193,193,193,193,193, & ! index 1513 - 1524
     193,193,193,193,193,193,193,193,193,193,193,193, & ! index 1525 - 1536
     194,194,194,194,194,194,194,194,194,194,194,194, & ! index 1537 - 1548
     194,194,194,194,194,194,194,194,194,194,194,194, & ! index 1549 - 1560
     194,194,195,195,195,195,195,195,195,195,195,195, & ! index 1561 - 1572
     195,195,195,196,196,196,196,196,196,196,196,196, & ! index 1573 - 1584
     196,196,196,196,196,196,196,196,197,197,197,197, & ! index 1585 - 1596
     197,197,197,197,197,197,197,197,197,197,197,198, & ! index 1597 - 1608
     198,198,198,198,198,198,198,198,198,198,198,198, & ! index 1609 - 1620
     198,198,199,199,199,199,199,199,199,199,199,199, & ! index 1621 - 1632
     199,199,199,199,200,200,200,200,200,200,200,200, & ! index 1633 - 1644
     200,200,200,200,200,201,201,201,201,201,201,201, & ! index 1645 - 1656
     201,201,201,201,201,202,202,202,202,202,202,202, & ! index 1657 - 1668
     202,202,202,202,202,202,202,202,202,202,202,202, & ! index 1669 - 1680
     202,202,202,203,203,203,203,203,203,203,203,203, & ! index 1681 - 1692
     203,203,203,203,203,203,203,203,203,203,203,203, & ! index 1693 - 1704
     203,203,203,204,204,204,204,204,204,204,204,204, & ! index 1705 - 1716
     204,204,204,204,204,204,204,204,204,204,204,204, & ! index 1717 - 1728
     205,205,205,205,205,205,205,205,205,205,205,205, & ! index 1729 - 1740
     205,205,205,205,205,205,205,205,205,205,205,205, & ! index 1741 - 1752
     205,205,205,205,205,205,205,205,205,205,205,205, & ! index 1753 - 1764
     205,205,205,205,205,205,205,205,205,205,205,205, & ! index 1765 - 1776
     205,205,205,205,205,205,205,205,206,206,206,206, & ! index 1777 - 1788
     206,206,206,206,206,206,206,206,206,206,206,206 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_5 = (/ &
     206,207,207,207,207,207,207,207,207,207,207,207, & ! index 1801 - 1812
     207,207,207,207,207,207,207,207,207,207,207,207, & ! index 1813 - 1824
     207,208,208,208,208,208,208,208,208,208,208,208, & ! index 1825 - 1836
     208,208,208,209,209,209,209,209,209,209,209,209, & ! index 1837 - 1848
     209,209,209,209,209,209,209,209,210,210,210,210, & ! index 1849 - 1860
     210,210,210,210,210,210,210,210,210,210,210,210, & ! index 1861 - 1872
     210,210,210,210,210,210,210,210,210,210,210,210, & ! index 1873 - 1884
     210,210,210,210,210,210,210,210,210,210,210,210, & ! index 1885 - 1896
     210,210,210,210,210,210,210,210,210,210,210,210, & ! index 1897 - 1908
     210,210,211,211,211,211,211,211,211,211,211,211, & ! index 1909 - 1920
     211,211,211,211,211,211,211,211,211,211,211,211, & ! index 1921 - 1932
     211,211,211,211,211,211,211,211,211,211,211,211, & ! index 1933 - 1944
     211,211,211,211,212,212,212,212,212,212,212,212, & ! index 1945 - 1956
     212,212,212,212,212,212,212,212,212,212,212,212, & ! index 1957 - 1968
     212,212,213,213,213,213,213,213,213,213,213,213, & ! index 1969 - 1980
     213,213,213,213,213,213,213,213,213,213,213,213, & ! index 1981 - 1992
     213,213,213,213,213,213,213,213,213,213,213,213, & ! index 1993 - 2004
     213,213,213,213,213,213,213,213,213,213,213,213, & ! index 2005 - 2016
     213,213,213,213,213,213,213,213,213,213,213,213, & ! index 2017 - 2028
     213,213,213,213,213,213,213,213,213,213,213,213, & ! index 2029 - 2040
     213,213,213,213,213,213,213,213,213,213,213,213, & ! index 2041 - 2052
     213,213,213,213,213,213,213,214,214,214,214,214, & ! index 2053 - 2064
     214,214,214,214,214,214,214,214,214,214,214,214, & ! index 2065 - 2076
     214,214,214,214,214,214,214,214,214,214,214,214, & ! index 2077 - 2088
     214,214,214,214,214,214,214,214,214,215,215,215, & ! index 2089 - 2100
     215,215,215,215,215,215,215,215,215,215,215,215, & ! index 2101 - 2112
     215,215,215,215,215,216,216,216,216,216,216,216, & ! index 2113 - 2124
     216,216,216,216,216,216,216,216,216,216,216,216, & ! index 2125 - 2136
     216,216,216,216,216,216,216,216,216,216,216,216, & ! index 2137 - 2148
     216,216,216,216,216,216,216,216,216,216,216,216 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_6 = (/ &
     216,216,216,216,216,216,216,216,216,216,216,216, & ! index 2161 - 2172
     216,216,216,216,216,216,216,216,216,217,217,217, & ! index 2173 - 2184
     217,217,217,217,217,217,217,217,217,217,217,217, & ! index 2185 - 2196
     217,217,217,217,217,217,217,217,217,217,217,217, & ! index 2197 - 2208
     217,217,217,217,218,218,218,218,218,218,218,218, & ! index 2209 - 2220
     218,218,218,218,218,218,218,218,218,218,218,218, & ! index 2221 - 2232
     218,218,218,218,218,218,218,218,218,218,218,218, & ! index 2233 - 2244
     218,218,218,218,218,218,218,218,218,218,218,218, & ! index 2245 - 2256
     218,218,218,218,218,218,218,218,218,218,218,218, & ! index 2257 - 2268
     218,218,218,218,218,218,218,218,218,218,218,218, & ! index 2269 - 2280
     218,219,219,219,219,219,219,219,219,219,219,219, & ! index 2281 - 2292
     219,219,219,219,219,219,219,219,219,219,219,219, & ! index 2293 - 2304
     219,219,219,219,219,219,219,219,219,219,219,219, & ! index 2305 - 2316
     219,219,219,219,219,219,219,219,219,219,219,219, & ! index 2317 - 2328
     219,219,219,219,219,219,219,219,219,219,219,219, & ! index 2329 - 2340
     219,219,219,219,219,219,219,219,219,219,220,220, & ! index 2341 - 2352
     220,220,220,220,220,220,220,220,220,220,220,220, & ! index 2353 - 2364
     220,220,220,220,220,220,220,220,221,221,221,221, & ! index 2365 - 2376
     221,221,221,221,221,221,221,221,221,221,221,221, & ! index 2377 - 2388
     221,221,221,221,221,221,221,221,221,221,221,221, & ! index 2389 - 2400
     221,221,221,221,221,221,221,221,222,222,222,222, & ! index 2401 - 2412
     222,222,222,222,222,222,222,222,222,222,222,222, & ! index 2413 - 2424
     222,222,222,222,222,222,222,222,222,222,222,222, & ! index 2425 - 2436
     222,222,222,222,222,222,222,222,222,222,222,222, & ! index 2437 - 2448
     222,222,222,222,222,222,222,222,222,222,222,222, & ! index 2449 - 2460
     222,222,222,222,223,223,223,223,223,223,223,223, & ! index 2461 - 2472
     223,223,223,223,223,223,223,223,223,223,223,223, & ! index 2473 - 2484
     223,223,223,223,223,223,223,223,224,224,224,224, & ! index 2485 - 2496
     224,224,224,224,224,224,224,224,224,224,224,224, & ! index 2497 - 2508
     224,224,224,224,224,224,224,224,224,224,224,224 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_7 = (/ &
     224,224,224,224,224,224,224,224,224,224,224,224, & ! index 2521 - 2532
     224,224,224,224,224,224,224,224,224,224,224,224, & ! index 2533 - 2544
     224,224,224,224,224,224,224,224,224,224,224,224, & ! index 2545 - 2556
     224,224,224,224,224,224,224,224,224,224,224,224, & ! index 2557 - 2568
     224,224,224,224,224,224,224,224,224,224,224,224, & ! index 2569 - 2580
     224,224,224,224,224,224,224,224,224,224,224,224, & ! index 2581 - 2592
     224,224,224,224,224,224,224,224,224,224,224,224, & ! index 2593 - 2604
     224,224,224,224,224,225,225,225,225,225,225,225, & ! index 2605 - 2616
     225,225,225,225,225,225,225,225,225,225,225,225, & ! index 2617 - 2628
     225,225,225,225,225,225,225,225,225,225,225,225, & ! index 2629 - 2640
     225,225,225,225,225,225,225,225,225,225,225,225, & ! index 2641 - 2652
     225,225,225,225,225,225,225,225,225,225,225,225, & ! index 2653 - 2664
     225,225,225,225,225,225,225,225,225,225,225,225, & ! index 2665 - 2676
     225,225,225,225,225,225,225,225,225,225,225,225, & ! index 2677 - 2688
     225,225,225,225,225,225,225,225,225,225,225,226, & ! index 2689 - 2700
     226,226,226,226,226,226,226,226,226,226,226,226, & ! index 2701 - 2712
     226,226,226,226,226,226,226,226,226,226,226,226, & ! index 2713 - 2724
     226,226,226,226,226,226,226,226,226,226,226,226, & ! index 2725 - 2736
     226,226,226,226,226,226,226,226,226,226,226,226, & ! index 2737 - 2748
     226,226,226,226,226,226,226,226,226,226,226,226, & ! index 2749 - 2760
     226,226,226,226,226,226,226,226,226,226,226,226, & ! index 2761 - 2772
     226,226,226,226,226,226,226,226,226,226,226,226, & ! index 2773 - 2784
     226,226,226,226,227,227,227,227,227,227,227,227, & ! index 2785 - 2796
     227,227,227,227,227,227,227,227,227,227,227,227, & ! index 2797 - 2808
     227,227,227,227,227,227,227,227,227,227,227,227, & ! index 2809 - 2820
     227,227,227,227,227,227,227,227,227,227,227,227, & ! index 2821 - 2832
     227,227,227,227,227,227,227,227,227,227,227,227, & ! index 2833 - 2844
     227,227,227,227,227,227,227,227,227,227,227,227, & ! index 2845 - 2856
     227,227,227,227,227,227,227,227,227,227,227,227, & ! index 2857 - 2868
     227,227,227,227,227,227,227,227,227,227,227,227 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_8 = (/ &
     227,227,227,227,227,227,227,227,227,227,227,227, & ! index 2881 - 2892
     227,227,227,227,227,228,228,228,228,228,228,228, & ! index 2893 - 2904
     228,228,228,228,228,228,228,228,228,228,228,228, & ! index 2905 - 2916
     228,228,228,228,228,228,228,228,228,228,228,228, & ! index 2917 - 2928
     228,228,228,228,228,228,228,228,228,228,228,228, & ! index 2929 - 2940
     228,228,228,228,228,228,228,228,228,228,228,228, & ! index 2941 - 2952
     228,228,228,228,228,228,228,228,229,229,229,229, & ! index 2953 - 2964
     229,229,229,229,229,229,229,229,229,229,229,229, & ! index 2965 - 2976
     229,229,229,229,229,229,229,229,229,229,229,229, & ! index 2977 - 2988
     229,229,229,229,229,229,229,229,229,229,229,229, & ! index 2989 - 3000
     229,229,229,229,229,229,229,229,230,230,230,230, & ! index 3001 - 3012
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 3013 - 3024
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 3025 - 3036
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 3037 - 3048
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 3049 - 3060
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 3061 - 3072
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 3073 - 3084
     230,230,230,230,230,230,230,230,230,230,230,230, & ! index 3085 - 3096
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3097 - 3108
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3109 - 3120
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3121 - 3132
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3133 - 3144
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3145 - 3156
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3157 - 3168
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3169 - 3180
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3181 - 3192
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3193 - 3204
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3205 - 3216
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3217 - 3228
     231,231,231,231,231,231,231,231,231,231,231,231 /)
  INTEGER, PARAMETER, DIMENSION(320) :: LU_IROW_9 = (/ &
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 3241 - 3252
     231,231,231,231,231,231,232,232,232,232,232,232, & ! index 3253 - 3264
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 3265 - 3276
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 3277 - 3288
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 3289 - 3300
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 3301 - 3312
     232,233,233,233,233,233,233,233,233,233,233,233, & ! index 3313 - 3324
     233,233,233,233,233,233,233,233,233,233,233,233, & ! index 3325 - 3336
     233,233,233,233,234,234,234,234,234,234,234,234, & ! index 3337 - 3348
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3349 - 3360
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3361 - 3372
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3373 - 3384
     234,234,234,234,234,234,234,234,234,234,234,234, & ! index 3385 - 3396
     234,235,235,235,235,235,235,235,235,235,235,235, & ! index 3397 - 3408
     235,235,235,235,235,235,235,235,235,235,235,235, & ! index 3409 - 3420
     235,235,235,235,235,235,235,235,235,235,235,235, & ! index 3421 - 3432
     235,235,235,235,235,235,235,235,235,235,235,235, & ! index 3433 - 3444
     235,235,235,235,235,235,235,235,235,235,235,235, & ! index 3445 - 3456
     235,235,235,235,235,235,235,235,235,235,235,235, & ! index 3457 - 3468
     235,235,235,235,235,235,235,235,235,235,235,235, & ! index 3469 - 3480
     235,235,235,235,236,236,236,236,236,236,236,236, & ! index 3481 - 3492
     236,236,236,236,236,236,236,236,236,236,236,236, & ! index 3493 - 3504
     236,236,236,236,236,236,236,236,237,237,237,237, & ! index 3505 - 3516
     237,237,237,237,237,237,237,237,237,237,237,237, & ! index 3517 - 3528
     237,237,237,237,237,237,237,237,237,237,237,237, & ! index 3529 - 3540
     237,237,237,237,237,237,237,237,237,237,237,237, & ! index 3541 - 3552
     237,237,237,237,237,237,237,237 /)
  INTEGER, PARAMETER, DIMENSION(3560) :: LU_IROW = (/&
    LU_IROW_0, LU_IROW_1, LU_IROW_2, LU_IROW_3, LU_IROW_4, &
    LU_IROW_5, LU_IROW_6, LU_IROW_7, LU_IROW_8, LU_IROW_9 /)

  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_0 = (/ &
       1,  2,  3,  4,  5, 38, 41, 47, 72,  6, 70, 89, & ! index 1 - 12
     105,114,122,126,134,136,141,148,154,166,176,178, & ! index 13 - 24
     187,188,189,195,200,205,216,218,219,224,225,230, & ! index 25 - 36
     231,234,235,  7, 42, 68,  8, 38, 41, 47, 72,139, & ! index 37 - 48
     161,168,  9, 38, 41, 47, 72,139,161,168, 10, 11, & ! index 49 - 60
      11,129,137,165,219,224,225,227,230, 12, 65,224, & ! index 61 - 72
      13, 65,225, 14,173,231, 15,173,230, 16, 64,224, & ! index 73 - 84
      17, 64,225, 18, 19, 19,118,123,124,231, 20, 71, & ! index 85 - 96
     224, 21, 71,225, 22, 90,231, 23,230, 24,230, 25, & ! index 97 - 108
     153,231, 26,220, 27,220, 28,157, 29, 61, 66, 67, & ! index 109 - 120
      30, 31, 31,136,231, 32,191, 33, 42, 49, 63, 68, & ! index 121 - 132
      69, 76, 94, 95, 97,107,108,113,115,127,133,134, & ! index 133 - 144
     135,136,137,141,142,145,150,151,152,153,154,155, & ! index 145 - 156
     156,158,159,160,162,163,165,166,167,169,170,171, & ! index 157 - 168
     172,176,177,179,180,181,182,183,184,185,186,190, & ! index 169 - 180
     193,195,199,200,201,202,203,206,209,216,219,224, & ! index 181 - 192
     225,227,231,235, 34, 38, 41, 47, 63, 70, 75, 80, & ! index 193 - 204
      84, 87, 89, 90, 92, 96,102,114,120,128,129,130, & ! index 205 - 216
     132,137,138,139,141,142,143,145,146,147,148,149, & ! index 217 - 228
     153,157,159,161,165,168,173,174,175,180,182,184, & ! index 229 - 240
     188,191,192,196,198,199,201,204,207,208,209,210, & ! index 241 - 252
     211,212,213,214,215,219,220,221,222,223,224,225, & ! index 253 - 264
     226,227,228,229,230,231,233,234,236,237, 35, 70, & ! index 265 - 276
      74, 79, 93,105,107,109,111,116,122,126,130,131, & ! index 277 - 288
     136,138,148,154,157,164,165,166,173,175,185,187, & ! index 289 - 300
     191,195,197,198,200,205,206,208,210,212,213,214, & ! index 301 - 312
     215,216,219,222,224,225,230,231,232,234,235, 36, & ! index 313 - 324
     150,151,152,156,160,171,218,231, 37,150,151,152, & ! index 325 - 336
     156,160,163,171,217,231, 38, 84, 39,169,186,225, & ! index 337 - 348
      40,107, 41,196, 42,115,145,159, 43,231, 44,231 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_1 = (/ &
      45,237, 46,237, 47, 84,196, 48,231, 49,141,227, & ! index 361 - 372
      50,179,227, 51,231, 52,227,232, 53,237, 54,237, & ! index 373 - 384
      55,237, 56,237, 57,237, 58,237, 59,237, 60,139, & ! index 385 - 396
     161,168, 61,124,188,231, 62,194,225, 63, 69,227, & ! index 397 - 408
     237, 51, 64,224,225,231, 43, 65,224,225,231, 66, & ! index 409 - 420
     118,123,148,231, 67,118,123,148,231, 39, 68,148, & ! index 421 - 432
     153,169,175,186,188,204,225, 69,225,227, 70,222, & ! index 433 - 444
     231, 71, 89,224,225,231, 72,194,224,231, 73,216, & ! index 445 - 456
     224,231, 74,231,235, 75,136,212,227,230,231, 76, & ! index 457 - 468
     219,227, 77,231,237, 78,231,237, 79,231,235, 80, & ! index 469 - 480
     229,231, 81,231,237, 82,231,237, 83,231,237, 38, & ! index 481 - 492
      41, 47, 84,196,225,233, 85,162,224,231, 86,170, & ! index 493 - 504
     224,231, 87,231,237, 88,202,224,231, 89,230,231, & ! index 505 - 516
      90,230,231, 91,139,161,168,196,223,229,236, 92, & ! index 517 - 528
     231,237, 93,231,235, 80, 94,219,229,231,233,235, & ! index 529 - 540
      95,224,227,231, 96,196,229,231,233, 97,136,216, & ! index 541 - 552
     227,231, 98,165,179,224,231, 99,167,224,231,100, & ! index 553 - 564
     158,224,231,101,150,151,152,156,160,163,171,217, & ! index 565 - 576
     231,102,230,231,235,103,182,184,224,231,104,134, & ! index 577 - 588
     135,203,224,231,105,200,231,106,231,232,235,107, & ! index 589 - 600
     200,224,225,108,143,146,147,220,221,231,232,233, & ! index 601 - 612
     109,185,224,231,110,190,224,231,111,154,224,225, & ! index 613 - 624
     231,112,177,183,224,231,105,113,200,224,225,231, & ! index 625 - 636
     114,185,216,225,231,234,115,145,159,230,231,234, & ! index 637 - 648
     109,116,185,216,224,225,231,117,143,146,147,199, & ! index 649 - 660
     207,209,220,221,223,228,229,233,236,118,200,224, & ! index 661 - 672
     231,119,219,224,231,235,120,169,186,224,231,121, & ! index 673 - 684
     166,195,212,224,230,231,122,171,206,224,226,231, & ! index 685 - 696
     123,200,224,231,124,200,224,231,125,188,202,219, & ! index 697 - 708
     231,234,235,126,169,188,224,225,231,234, 62,127 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_2 = (/ &
     139,168,194,225,230,231,128,223,227,228,230,236, & ! index 721 - 732
     129,192,219,224,225,231,130,230,231,234,131,195, & ! index 733 - 744
     227,231,234,132,230,231,232,235,133,139,146,147, & ! index 745 - 756
     199,221,223,225,227,231,236,114,134,185,216,224, & ! index 757 - 768
     225,231,234,135,200,216,224,225, 75,136,165,212, & ! index 769 - 780
     227,230,231,137,192,219,224,225,230,138,230,231, & ! index 781 - 792
     234,139,194,223,227,236,129,137,140,192,201,219, & ! index 793 - 804
     224,225,230,231, 49,141,175,224,225,227,231,142, & ! index 805 - 816
     149,213,221,222,224,228,231,234,235,237,143,226, & ! index 817 - 828
     227,228,232,233,144,158,162,167,170,172,176,181, & ! index 829 - 840
     182,183,184,185,190,200,203,206,219,231,145,180, & ! index 841 - 852
     181,184,216,219,224,225,230,231,146,199,209,220, & ! index 853 - 864
     221,234,147,199,209,220,221,234,148,200,225,231, & ! index 865 - 876
     234,149,208,214,231,234,235,237,150,173,217,218, & ! index 877 - 888
     225,226,227,234,151,198,217,218,225,226,227,234, & ! index 889 - 900
     152,208,217,218,225,226,227,234,148,153,169,186, & ! index 901 - 912
     190,200,224,225,231,234, 61, 66, 67,118,123,124, & ! index 913 - 924
     148,154,188,200,224,225,231,234, 94,155,199,207, & ! index 925 - 936
     209,219,223,228,229,231,233,235,236,237,156,198, & ! index 937 - 948
     212,217,218,225,226,227,234, 40, 43, 51, 89,105, & ! index 949 - 960
     107,113,129,135,137,154,157,185,187,188,192,200, & ! index 961 - 972
     216,219,224,225,230,231,234,100,158,208,216,219, & ! index 973 - 984
     224,225,230,231,159,180,181,182,184,216,219,224, & ! index 985 - 996
     225,230,231,234,160,215,217,218,225,226,227,234, & ! index 997 - 1008
     127,139,161,168,194,196,223,224,225,227,230,231, & ! index 1009 - 1020
     236, 85,106,162,203,204,216,219,224,225,231,232, & ! index 1021 - 1032
     235,163,173,208,212,215,217,225,226,227,234,100, & ! index 1033 - 1044
     129,137,148,158,164,165,166,169,188,192,200,208, & ! index 1045 - 1056
     216,219,224,225,230,231,234,165,192,224,225,227, & ! index 1057 - 1068
     230,231,166,212,216,219,224,225,230, 99,167,208 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_3 = (/ &
     216,219,224,225,231,232,235,127,139,168,194,196, & ! index 1081 - 1092
     223,225,227,230,231,236,120,169,186,188,224,225, & ! index 1093 - 1104
     231, 86,106,170,203,204,216,219,224,225,231,232, & ! index 1105 - 1116
     235,171,173,217,218,225,226,227,234,120,169,172, & ! index 1117 - 1128
     186,188,204,216,219,224,225,231,173,230,231,234, & ! index 1129 - 1140
     235,130,138,150,151,152,156,160,163,171,173,174, & ! index 1141 - 1152
     198,208,212,215,217,218,222,224,225,226,227,230, & ! index 1153 - 1164
     231,234,235,148,169,175,186,188,200,206,224,225, & ! index 1165 - 1176
     231,234,121,166,176,195,212,216,219,224,225,230, & ! index 1177 - 1188
     231,112,177,183,197,216,219,224,225,231,232,235, & ! index 1189 - 1200
     138,141,148,153,154,163,169,173,175,178,184,186, & ! index 1201 - 1212
     187,188,190,200,205,206,208,212,215,217,224,225, & ! index 1213 - 1224
     226,227,230,231,234,235, 50, 98,165,179,192,210, & ! index 1225 - 1236
     211,215,216,219,224,225,227,230,231,130,138,180, & ! index 1237 - 1248
     181,216,219,224,225,230,231,234,130,138,180,181, & ! index 1249 - 1260
     216,219,224,225,230,231,234,138,182,216,219,224, & ! index 1261 - 1272
     225,230,231,234,130,138,183,211,216,219,224,225, & ! index 1273 - 1284
     230,231,234,130,184,216,219,224,225,230,231,234, & ! index 1285 - 1296
     109,123,124,185,198,200,216,219,224,225,231,120, & ! index 1297 - 1308
     148,169,186,188,200,224,225,231,234,105,109,110, & ! index 1309 - 1320
     135,151,153,154,169,185,186,187,188,190,192,198, & ! index 1321 - 1332
     200,216,217,218,219,224,225,226,227,231,234,188, & ! index 1333 - 1344
     200,201,219,225,231,234,141,152,158,162,166,167, & ! index 1345 - 1356
     170,172,175,176,177,183,185,186,188,189,190,195, & ! index 1357 - 1368
     197,198,200,201,202,203,204,205,206,208,211,212, & ! index 1369 - 1380
     216,217,218,219,224,225,226,227,230,231,232,234, & ! index 1381 - 1392
     235,110,173,190,215,216,219,224,225,230,231,234, & ! index 1393 - 1404
     235, 40, 51, 89,105,107,109,110,111,112,113,135, & ! index 1405 - 1416
     141,153,154,156,160,164,165,166,169,175,177,183, & ! index 1417 - 1428
     185,186,188,190,191,192,197,198,200,201,205,206 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_4 = (/ &
     208,211,212,215,216,217,218,219,224,225,226,227, & ! index 1441 - 1452
     230,231,232,234,235,192,201,216,219,225,230,231, & ! index 1453 - 1464
     234, 42, 68, 90,102,115,128,132,134,135,143,145, & ! index 1465 - 1476
     146,147,148,153,157,159,168,169,175,176,180,181, & ! index 1477 - 1488
     182,184,185,186,187,188,190,191,192,193,194,195, & ! index 1489 - 1500
     196,197,198,199,200,201,204,205,206,208,209,210, & ! index 1501 - 1512
     211,212,213,214,215,216,217,218,219,220,221,223, & ! index 1513 - 1524
     224,225,226,227,228,230,231,232,233,234,235,236, & ! index 1525 - 1536
       1,  2,  3, 41, 48, 60, 62, 72, 84, 91,127,139, & ! index 1537 - 1548
     161,168,194,196,223,224,225,227,229,230,231,233, & ! index 1549 - 1560
     234,236,121,131,166,195,212,216,219,224,225,227, & ! index 1561 - 1572
     230,231,234, 41, 47, 84,161,168,194,196,223,224, & ! index 1573 - 1584
     225,227,229,230,231,233,234,236, 86,170,184,197, & ! index 1585 - 1596
     203,204,216,219,224,225,230,231,232,234,235,118, & ! index 1597 - 1608
     123,124,148,188,198,200,201,216,219,224,225,230, & ! index 1609 - 1620
     231,234,128,146,147,199,209,220,221,223,227,228, & ! index 1621 - 1632
     230,231,234,236,118,123,124,173,200,216,219,224, & ! index 1633 - 1644
     225,230,231,234,235,140,173,192,201,216,219,224, & ! index 1645 - 1656
     225,230,231,234,235, 88,132,138,179,192,201,202, & ! index 1657 - 1668
     203,204,210,211,215,216,219,224,225,227,230,231, & ! index 1669 - 1680
     232,234,235,102,103,104,134,135,172,182,184,185, & ! index 1681 - 1692
     186,188,198,200,201,203,204,216,219,224,225,230, & ! index 1693 - 1704
     231,234,235,140,166,172,183,186,188,192,200,201, & ! index 1705 - 1716
     203,204,211,212,216,219,224,225,230,231,234,235, & ! index 1717 - 1728
      99,105,109,115,116,122,131,135,136,141,145,151, & ! index 1729 - 1740
     154,159,165,167,169,171,173,175,176,177,180,181, & ! index 1741 - 1752
     182,183,184,185,186,188,192,195,197,198,200,201, & ! index 1753 - 1764
     203,204,205,206,208,211,212,216,217,218,219,224, & ! index 1765 - 1776
     225,226,227,230,231,232,234,235,122,171,173,206, & ! index 1777 - 1788
     212,216,217,218,219,224,225,226,227,230,231,234 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_5 = (/ &
     235, 80, 96,155,196,199,207,209,219,220,221,223, & ! index 1801 - 1812
     224,225,226,227,228,229,230,231,233,234,235,236, & ! index 1813 - 1824
     237,138,173,182,208,215,216,219,224,225,230,231, & ! index 1825 - 1836
     232,234,235,146,147,199,209,220,221,222,223,226, & ! index 1837 - 1848
     227,228,229,230,231,234,235,236, 85,100,103,104, & ! index 1849 - 1860
     120,130,134,135,140,144,158,159,162,166,167,169, & ! index 1861 - 1872
     170,172,176,180,181,182,183,184,185,186,188,190, & ! index 1873 - 1884
     192,195,198,200,201,203,204,206,208,210,211,212, & ! index 1885 - 1896
     215,216,217,218,219,224,225,226,227,230,231,232, & ! index 1897 - 1908
     234,235,103,110,114,116,130,140,145,176,180,181, & ! index 1909 - 1920
     182,183,184,185,190,192,195,198,200,201,203,204, & ! index 1921 - 1932
     206,211,212,215,216,217,218,219,224,225,226,227, & ! index 1933 - 1944
     230,231,234,235,118,123,124,138,171,173,182,200, & ! index 1945 - 1956
     201,212,216,217,218,219,224,225,226,227,230,231, & ! index 1957 - 1968
     234,235,  4, 43, 51, 76, 89, 90, 99,105,110,111, & ! index 1969 - 1980
     112,118,119,121,122,123,124,126,129,131,136,137, & ! index 1981 - 1992
     138,141,148,149,153,154,157,158,162,163,164,165, & ! index 1993 - 2004
     166,167,169,170,171,172,173,175,176,177,179,180, & ! index 2005 - 2016
     181,182,183,184,185,186,187,188,190,192,195,197, & ! index 2017 - 2028
     198,200,201,202,203,204,205,206,208,210,211,212, & ! index 2029 - 2040
     213,214,215,216,217,218,219,222,224,225,226,227, & ! index 2041 - 2052
     229,230,231,232,234,235,237, 88, 98, 99,125,152, & ! index 2053 - 2064
     158,165,167,172,179,183,186,188,192,200,201,202, & ! index 2065 - 2076
     203,204,208,210,211,212,214,215,216,217,218,219, & ! index 2077 - 2088
     224,225,226,227,230,231,232,234,235,118,123,124, & ! index 2089 - 2100
     150,173,200,201,215,216,217,218,219,224,225,226, & ! index 2101 - 2112
     227,230,231,234,235, 73, 97,105,110,111,112,121, & ! index 2113 - 2124
     131,136,153,154,158,160,162,165,166,167,169,170, & ! index 2125 - 2136
     172,173,176,177,179,180,181,182,183,184,185,186, & ! index 2137 - 2148
     188,190,191,192,195,197,198,200,201,202,203,204 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_6 = (/ &
     205,206,208,210,211,212,214,215,216,217,218,219, & ! index 2161 - 2172
     224,225,226,227,230,231,232,234,235, 70, 90,101, & ! index 2173 - 2184
     150,151,152,156,160,163,171,173,198,200,201,208, & ! index 2185 - 2196
     212,215,216,217,218,219,222,224,225,226,227,230, & ! index 2197 - 2208
     231,232,234,235, 70, 74, 79, 93,105,107,109,111, & ! index 2209 - 2220
     116,122,126,130,131,136,138,148,150,151,152,154, & ! index 2221 - 2232
     156,157,160,164,165,166,169,171,173,175,185,186, & ! index 2233 - 2244
     187,188,190,191,192,195,197,198,200,201,203,204, & ! index 2245 - 2256
     205,206,208,210,211,212,213,214,215,216,217,218, & ! index 2257 - 2268
     219,222,224,225,226,227,229,230,231,232,234,235, & ! index 2269 - 2280
     237, 48, 73, 76, 90, 92, 93, 97,119,129,136,137, & ! index 2281 - 2292
     149,158,160,162,164,165,166,167,169,170,172,173, & ! index 2293 - 2304
     176,177,179,180,181,182,183,184,185,186,188,189, & ! index 2305 - 2316
     190,192,195,197,198,200,201,202,203,204,205,206, & ! index 2317 - 2328
     208,210,211,212,214,215,216,217,218,219,222,224, & ! index 2329 - 2340
     225,226,227,229,230,231,232,234,235,237,108,143, & ! index 2341 - 2352
     146,147,199,209,220,221,222,223,224,226,227,228, & ! index 2353 - 2364
     229,230,231,232,233,234,235,236,106,132,197,199, & ! index 2365 - 2376
     203,204,207,208,209,211,212,213,214,215,216,217, & ! index 2377 - 2388
     218,219,220,221,222,223,224,225,226,227,228,229, & ! index 2389 - 2400
     230,231,232,233,234,235,236,237, 45, 46, 53, 54, & ! index 2401 - 2412
      55, 56, 57, 58, 59, 69, 70, 77, 78, 81, 82, 83, & ! index 2413 - 2424
      87, 96,142,149,155,174,196,198,199,200,201,207, & ! index 2425 - 2436
     208,209,212,213,214,215,216,217,218,219,220,221, & ! index 2437 - 2448
     222,223,224,225,226,227,228,229,230,231,232,233, & ! index 2449 - 2460
     234,235,236,237,128,139,161,168,194,196,199,207, & ! index 2461 - 2472
     209,219,220,221,222,223,224,225,226,227,228,229, & ! index 2473 - 2484
     230,231,232,233,234,235,236,237, 64, 65, 71, 74, & ! index 2485 - 2496
      76, 79, 85, 86, 88, 89, 92, 93, 95, 98, 99,100, & ! index 2497 - 2508
     103,104,105,107,109,110,111,113,114,116,118,119 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_7 = (/ &
     120,122,123,124,125,126,129,130,134,135,136,137, & ! index 2521 - 2532
     138,140,141,142,144,148,149,154,157,158,162,165, & ! index 2533 - 2544
     166,167,169,170,171,172,173,174,175,176,177,178, & ! index 2545 - 2556
     179,180,181,182,183,184,185,186,187,188,190,191, & ! index 2557 - 2568
     192,194,195,196,197,198,200,201,202,203,204,205, & ! index 2569 - 2580
     206,208,210,211,212,213,214,215,216,217,218,219, & ! index 2581 - 2592
     221,222,223,224,225,226,227,228,229,230,231,232, & ! index 2593 - 2604
     233,234,235,236,237, 62, 63, 64, 65, 69, 71, 84, & ! index 2605 - 2616
      89,107,113,129,133,134,135,137,139,141,146,147, & ! index 2617 - 2628
     150,151,152,154,156,158,160,162,163,165,166,167, & ! index 2629 - 2640
     169,170,171,172,173,175,176,177,179,180,181,182, & ! index 2641 - 2652
     183,184,185,186,188,190,192,194,195,196,197,198, & ! index 2653 - 2664
     199,200,201,202,203,204,206,208,209,210,211,212, & ! index 2665 - 2676
     215,216,217,218,219,220,221,222,223,224,225,226, & ! index 2677 - 2688
     227,228,229,230,231,232,233,234,235,236,237, 44, & ! index 2689 - 2700
      48, 72, 81, 82, 83, 87, 92, 93, 95,112,118,119, & ! index 2701 - 2712
     123,124,132,133,139,142,143,146,147,149,150,151, & ! index 2713 - 2724
     152,156,160,161,163,168,171,173,174,177,178,183, & ! index 2725 - 2736
     184,186,187,188,189,190,192,193,194,195,196,197, & ! index 2737 - 2748
     198,199,200,201,202,203,204,205,206,207,208,209, & ! index 2749 - 2760
     210,211,212,213,214,215,216,217,218,219,220,221, & ! index 2761 - 2772
     222,223,224,225,226,227,228,229,230,231,232,233, & ! index 2773 - 2784
     234,235,236,237, 49, 50, 52, 69, 75, 76, 84, 95, & ! index 2785 - 2796
      97,100,107,113,115,120,126,128,131,133,134,135, & ! index 2797 - 2808
     136,137,139,140,141,143,145,146,147,148,150,151, & ! index 2809 - 2820
     152,153,154,156,158,159,160,162,163,164,165,166, & ! index 2821 - 2832
     167,168,169,170,171,172,173,175,176,177,179,180, & ! index 2833 - 2844
     181,182,183,184,185,186,188,190,192,193,194,195, & ! index 2845 - 2856
     196,197,198,199,200,201,202,203,204,205,206,208, & ! index 2857 - 2868
     209,210,211,212,213,214,215,216,217,218,219,220 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_8 = (/ &
     221,222,223,224,225,226,227,228,229,230,231,232, & ! index 2881 - 2892
     233,234,235,236,237, 74, 79, 93,102,106,119,125, & ! index 2893 - 2904
     128,132,143,149,173,174,178,184,186,187,188,189, & ! index 2905 - 2916
     190,192,195,197,198,199,200,201,202,203,204,205, & ! index 2917 - 2928
     206,207,208,209,210,211,212,213,214,215,216,217, & ! index 2929 - 2940
     218,219,220,221,222,223,224,225,226,227,228,229, & ! index 2941 - 2952
     230,231,232,233,234,235,236,237, 53, 54, 55, 56, & ! index 2953 - 2964
      57, 58, 59, 80, 81, 82, 83, 87, 94, 96,155,196, & ! index 2965 - 2976
     199,202,203,204,207,209,210,211,212,215,216,217, & ! index 2977 - 2988
     218,219,220,221,222,223,224,225,226,227,228,229, & ! index 2989 - 3000
     230,231,232,233,234,235,236,237, 76, 89, 90, 95, & ! index 3001 - 3012
      97,102,115,127,128,130,131,132,136,137,138,139, & ! index 3013 - 3024
     141,143,145,150,151,152,153,156,157,159,160,163, & ! index 3025 - 3036
     165,168,169,171,173,175,180,181,182,184,185,186, & ! index 3037 - 3048
     187,188,190,191,192,193,194,195,196,197,198,199, & ! index 3049 - 3060
     200,201,203,204,205,206,208,209,210,211,212,213, & ! index 3061 - 3072
     214,215,216,217,218,219,220,221,222,223,224,225, & ! index 3073 - 3084
     226,227,228,229,230,231,232,233,234,235,236,237, & ! index 3085 - 3096
      40, 44, 48, 61, 66, 67, 70, 72, 73, 74, 77, 78, & ! index 3097 - 3108
      79, 80, 81, 82, 83, 85, 86, 87, 88, 90, 92, 93, & ! index 3109 - 3120
      95, 96, 98, 99,100,101,102,103,104,105,106,107, & ! index 3121 - 3132
     108,109,110,111,112,113,114,115,116,118,119,120, & ! index 3133 - 3144
     121,122,123,124,125,126,127,130,131,132,133,134, & ! index 3145 - 3156
     135,136,138,139,140,141,142,143,144,145,146,147, & ! index 3157 - 3168
     148,149,150,151,152,153,154,155,156,157,158,159, & ! index 3169 - 3180
     160,161,162,163,164,165,166,167,168,169,170,171, & ! index 3181 - 3192
     172,173,174,175,176,177,178,179,180,181,182,183, & ! index 3193 - 3204
     184,185,186,187,188,189,190,191,192,193,194,195, & ! index 3205 - 3216
     196,197,198,199,200,201,202,203,204,205,206,207, & ! index 3217 - 3228
     208,209,210,211,212,213,214,215,216,217,218,219 /)
  INTEGER, PARAMETER, DIMENSION(320) :: LU_ICOL_9 = (/ &
     220,221,222,223,224,225,226,227,228,229,230,231, & ! index 3241 - 3252
     232,233,234,235,236,237,  3, 45, 46, 52, 59, 60, & ! index 3253 - 3264
      77, 78, 92,106,108,117,132,139,143,146,147,161, & ! index 3265 - 3276
     168,194,196,197,199,203,204,207,208,209,211,212, & ! index 3277 - 3288
     213,214,215,216,217,218,219,220,221,222,223,224, & ! index 3289 - 3300
     225,226,227,228,229,230,231,232,233,234,235,236, & ! index 3301 - 3312
     237, 45, 46, 59, 77, 78, 92,143,194,196,220,221, & ! index 3313 - 3324
     222,223,224,225,226,227,228,229,230,231,232,233, & ! index 3325 - 3336
     234,235,236,237,114,130,131,138,142,146,147,148, & ! index 3337 - 3348
     149,159,165,173,179,180,181,182,184,185,188,192, & ! index 3349 - 3360
     194,195,196,198,199,200,201,208,209,210,211,212, & ! index 3361 - 3372
     213,214,215,216,217,218,219,220,221,222,223,224, & ! index 3373 - 3384
     225,226,227,228,229,230,231,232,233,234,235,236, & ! index 3385 - 3396
     237,  2, 44, 53, 54, 55, 56, 57, 58, 59, 74, 79, & ! index 3397 - 3408
      80, 81, 82, 83, 87, 91, 93, 94,102,106,117,119, & ! index 3409 - 3420
     125,132,139,143,146,147,149,155,161,168,173,174, & ! index 3421 - 3432
     178,184,186,187,188,189,190,192,194,195,196,197, & ! index 3433 - 3444
     198,199,200,201,202,203,204,205,206,207,208,209, & ! index 3445 - 3456
     210,211,212,213,214,215,216,217,218,219,220,221, & ! index 3457 - 3468
     222,223,224,225,226,227,228,229,230,231,232,233, & ! index 3469 - 3480
     234,235,236,237,128,139,161,168,194,196,199,207, & ! index 3481 - 3492
     209,219,220,221,222,223,224,225,226,227,228,229, & ! index 3493 - 3504
     230,231,232,233,234,235,236,237, 45, 46, 53, 54, & ! index 3505 - 3516
      55, 56, 57, 58, 59, 63, 69, 77, 78, 81, 82, 83, & ! index 3517 - 3528
      87, 92,149,155,199,207,208,209,214,215,216,217, & ! index 3529 - 3540
     218,219,220,221,222,223,224,225,226,227,228,229, & ! index 3541 - 3552
     230,231,232,233,234,235,236,237 /)
  INTEGER, PARAMETER, DIMENSION(3560) :: LU_ICOL = (/&
    LU_ICOL_0, LU_ICOL_1, LU_ICOL_2, LU_ICOL_3, LU_ICOL_4, &
    LU_ICOL_5, LU_ICOL_6, LU_ICOL_7, LU_ICOL_8, LU_ICOL_9 /)

  INTEGER, PARAMETER, DIMENSION(238) :: LU_CROW = (/ &
       1,  2,  3,  4,  5, 10, 40, 43, 51, 59, 61, 70, & ! index 1 - 12
      73, 76, 79, 82, 85, 88, 90, 95, 98,101,104,106, & ! index 13 - 24
     108,111,113,115,117,121,123,126,128,197,275,324, & ! index 25 - 36
     333,343,345,349,351,353,357,359,361,363,365,368, & ! index 37 - 48
     370,373,376,378,381,383,385,387,389,391,393,395, & ! index 49 - 60
     399,403,406,410,415,420,425,430,440,443,446,451, & ! index 61 - 72
     455,459,462,468,471,474,477,480,483,486,489,492, & ! index 73 - 84
     499,503,507,510,514,517,520,528,531,534,541,545, & ! index 85 - 96
     550,555,560,564,568,578,582,587,593,596,600,604, & ! index 97 - 108
     613,617,621,626,631,637,643,649,656,670,674,679, & ! index 109 - 120
     684,691,697,701,705,712,719,727,733,739,743,748, & ! index 121 - 132
     753,764,772,777,784,790,794,799,809,816,827,833, & ! index 133 - 144
     851,861,867,873,878,885,893,901,909,919,933,947, & ! index 145 - 156
     956,980,989,1001,1009,1022,1034,1044,1064,1071,1078,1088, & ! index 157 - 168
     1099,1106,1118,1126,1137,1142,1168,1179,1190,1201,1231,1246, & ! index 169 - 180
     1257,1268,1277,1288,1297,1308,1318,1344,1351,1394,1406,1458, & ! index 181 - 192
     1466,1537,1563,1576,1593,1608,1623,1637,1650,1662,1684,1708, & ! index 193 - 204
     1729,1785,1802,1826,1840,1857,1911,1949,1971,2060,2098,2118, & ! index 205 - 216
     2182,2213,2282,2351,2373,2409,2465,2493,2610,2700,2789,2898, & ! index 217 - 228
     2961,3009,3097,3259,3314,3341,3398,3485,3513,3561 /)

  INTEGER, PARAMETER, DIMENSION(238) :: LU_DIAG = (/ &
       1,  2,  3,  4,  5, 10, 40, 43, 51, 59, 61, 70, & ! index 1 - 12
      73, 76, 79, 82, 85, 88, 90, 95, 98,101,104,106, & ! index 13 - 24
     108,111,113,115,117,121,123,126,128,197,275,324, & ! index 25 - 36
     333,343,345,349,351,353,357,359,361,363,365,368, & ! index 37 - 48
     370,373,376,378,381,383,385,387,389,391,393,395, & ! index 49 - 60
     399,403,406,411,416,420,425,431,440,443,446,451, & ! index 61 - 72
     455,459,462,468,471,474,477,480,483,486,489,495, & ! index 73 - 84
     499,503,507,510,514,517,520,528,531,535,541,545, & ! index 85 - 96
     550,555,560,564,568,578,582,587,593,596,600,604, & ! index 97 - 108
     613,617,621,626,632,637,643,650,656,670,674,679, & ! index 109 - 120
     684,691,697,701,705,712,720,727,733,739,743,748, & ! index 121 - 132
     753,765,772,778,784,790,794,801,810,816,827,833, & ! index 133 - 144
     851,861,867,873,878,885,893,901,910,926,934,947, & ! index 145 - 156
     967,981,989,1001,1011,1024,1034,1049,1064,1071,1079,1090, & ! index 157 - 168
     1100,1108,1118,1128,1137,1152,1170,1181,1191,1210,1234,1248, & ! index 169 - 180
     1260,1269,1279,1289,1300,1311,1328,1344,1366,1396,1433,1458, & ! index 181 - 192
     1498,1551,1566,1582,1596,1613,1626,1641,1653,1668,1698,1718, & ! index 193 - 204
     1767,1788,1807,1829,1843,1894,1934,1958,2041,2083,2105,2169, & ! index 205 - 216
     2200,2268,2338,2357,2392,2449,2478,2596,2687,2777,2887,2951, & ! index 217 - 228
     3000,3089,3252,3308,3336,3394,3482,3511,3560,3561 /)


END MODULE gckpp_JacobianSP

