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

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

  INTEGER, PARAMETER, DIMENSION(230) :: LU_CROW = (/ &
       1,  2,  3,  4,  5, 10, 39, 42, 50, 58, 60, 69, & ! index 1 - 12
      72, 75, 78, 81, 84, 87, 89, 94, 97,100,103,105, & ! index 13 - 24
     107,110,120,122,124,126,130,132,135,137,203,270, & ! index 25 - 36
     317,326,336,339,343,376,380,386,393,396,400,404, & ! index 37 - 48
     409,414,420,425,432,434,436,438,440,444,446,448, & ! index 49 - 60
     452,454,457,460,463,465,468,470,474,478,481,485, & ! index 61 - 72
     490,495,500,505,515,520,524,530,533,536,539,542, & ! index 73 - 84
     549,553,557,560,564,567,570,574,582,589,594,599, & ! index 85 - 96
     604,608,612,616,621,627,630,635,639,643,648,653, & ! index 97 - 108
     662,666,670,674,679,685,691,697,704,718,722,726, & ! index 109 - 120
     731,742,750,757,764,771,776,789,795,801,805,810, & ! index 121 - 132
     815,822,830,835,840,847,851,857,864,871,881,889, & ! index 133 - 144
     896,902,908,926,933,943,948,957,981,994,1008,1032, & ! index 145 - 156
     1042,1051,1063,1070,1081,1093,1121,1126,1146,1153,1160,1170, & ! index 157 - 168
     1181,1193,1200,1211,1222,1233,1250,1265,1276,1287,1296,1358, & ! index 169 - 180
     1367,1407,1417,1442,1449,1460,1471,1483,1509,1522,1573,1581, & ! index 181 - 192
     1595,1612,1627,1642,1657,1672,1693,1718,1743,1767,1783,1796, & ! index 193 - 204
     1808,1863,1887,1901,1937,1958,2045,2068,2089,2126,2190,2226, & ! index 205 - 216
     2245,2272,2339,2446,2498,2584,2635,2747,2891,2954,3007,3082, & ! index 217 - 228
     3149,3234 /)

  INTEGER, PARAMETER, DIMENSION(230) :: LU_DIAG = (/ &
       1,  2,  3,  4,  5, 10, 39, 42, 50, 58, 60, 69, & ! index 1 - 12
      72, 75, 78, 81, 84, 87, 89, 94, 97,100,103,105, & ! index 13 - 24
     107,110,120,122,124,126,130,132,135,137,203,270, & ! index 25 - 36
     317,326,336,339,343,376,380,386,393,396,400,404, & ! index 37 - 48
     409,414,420,425,432,434,436,438,440,444,446,448, & ! index 49 - 60
     452,454,457,460,463,465,468,470,474,478,481,486, & ! index 61 - 72
     491,495,500,506,515,520,524,530,533,536,539,545, & ! index 73 - 84
     549,553,557,560,564,567,570,574,583,589,594,599, & ! index 85 - 96
     604,608,612,616,621,627,630,635,639,643,648,653, & ! index 97 - 108
     662,666,670,674,680,685,691,698,704,718,722,726, & ! index 109 - 120
     731,743,750,757,764,771,777,789,795,801,805,810, & ! index 121 - 132
     815,823,830,835,841,847,851,857,864,873,881,890, & ! index 133 - 144
     896,902,908,926,933,943,948,965,983,1001,1019,1033, & ! index 145 - 156
     1043,1051,1063,1072,1083,1099,1121,1131,1146,1153,1161,1171, & ! index 157 - 168
     1183,1194,1202,1213,1224,1236,1253,1267,1279,1288,1320,1359, & ! index 169 - 180
     1378,1410,1426,1442,1452,1462,1473,1497,1512,1549,1573,1584, & ! index 181 - 192
     1601,1615,1632,1645,1660,1679,1704,1730,1754,1770,1787,1799, & ! index 193 - 204
     1845,1877,1890,1919,1947,2025,2053,2077,2113,2174,2211,2233, & ! index 205 - 216
     2260,2327,2435,2488,2575,2627,2740,2885,2949,3003,3079,3147, & ! index 217 - 228
     3233,3234 /)


END MODULE gckpp_JacobianSP

