Advertisement
Guest User

Random array access

a guest
Sep 12th, 2015
1,270
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Public Function GetArrayElement(ByRef arr As Variant, ParamArray indices()) As Variant
  2.   Dim count As Long, lb As Long
  3.  
  4.   lb = LBound(indices)
  5.   count = UBound(indices) - lb + 1
  6.  
  7.   Select Case count
  8.   Case 1: GetArrayElement = arr(indices(lb))
  9.   Case 2: GetArrayElement = arr(indices(lb), indices(lb + 1))
  10.   Case 3: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2))
  11.   Case 4: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3))
  12.   Case 5: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4))
  13.   Case 6: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5))
  14.   Case 7: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6))
  15.   Case 8: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7))
  16.   Case 9: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8))
  17.   Case 10: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9))
  18.   Case 11: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10))
  19.   Case 12: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11))
  20.   Case 13: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12))
  21.   Case 14: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13))
  22.   Case 15: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14))
  23.   Case 16: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15))
  24.   Case 17: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16))
  25.   Case 18: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17))
  26.   Case 19: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18))
  27.   Case 20: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19))
  28.   Case 21: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20))
  29.   Case 22: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21))
  30.   Case 23: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22))
  31.   Case 24: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23))
  32.   Case 25: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24))
  33.   Case 26: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25))
  34.   Case 27: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26))
  35.   Case 28: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27))
  36.   Case 29: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28))
  37.   Case 30: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29))
  38.   Case 31: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30))
  39.   Case 32: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31))
  40.   Case 33: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32))
  41.   Case 34: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33))
  42.   Case 35: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34))
  43.   Case 36: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35))
  44.   Case 37: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36))
  45.   Case 38: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37))
  46.   Case 39: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38))
  47.   Case 40: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39))
  48.   Case 41: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40))
  49.   Case 42: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41))
  50.   Case 43: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42))
  51.   Case 44: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43))
  52.   Case 45: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44))
  53.   Case 46: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45))
  54.   Case 47: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46))
  55.   Case 48: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47))
  56.   Case 49: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48))
  57.   Case 50: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49))
  58.   Case 51: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50))
  59.   Case 52: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  60.       indices(lb + 51))
  61.   Case 53: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  62.       indices(lb + 51), indices(lb + 52))
  63.   Case 54: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  64.       indices(lb + 51), indices(lb + 52), indices(lb + 53))
  65.   Case 55: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  66.       indices(lb + 51), indices(lb + 52), indices(lb + 53), indices(lb + 54))
  67.   Case 56: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  68.       indices(lb + 51), indices(lb + 52), indices(lb + 53), indices(lb + 54), indices(lb + 55))
  69.   Case 57: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  70.       indices(lb + 51), indices(lb + 52), indices(lb + 53), indices(lb + 54), indices(lb + 55), indices(lb + 56))
  71.   Case 58: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  72.       indices(lb + 51), indices(lb + 52), indices(lb + 53), indices(lb + 54), indices(lb + 55), indices(lb + 56), indices(lb + 57))
  73.   Case 59: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  74.       indices(lb + 51), indices(lb + 52), indices(lb + 53), indices(lb + 54), indices(lb + 55), indices(lb + 56), indices(lb + 57), indices(lb + 58))
  75.   Case 60: GetArrayElement = arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  76.       indices(lb + 51), indices(lb + 52), indices(lb + 53), indices(lb + 54), indices(lb + 55), indices(lb + 56), indices(lb + 57), indices(lb + 58), indices(lb + 59))
  77.   Case Else
  78.     Err.Raise 5, , "There can be no more than 60 dimensions"
  79.   End Select
  80.  
  81. End Function
  82.  
  83. Public Sub SetArrayElement(ByRef arr As Variant, ByRef value As Variant, ParamArray indices())
  84.   Dim count As Long, lb As Long
  85.  
  86.   lb = LBound(indices)
  87.   count = UBound(indices) - lb + 1
  88.  
  89.   Select Case count
  90.   Case 1: arr(indices(lb)) = value
  91.   Case 2: arr(indices(lb), indices(lb + 1)) = value
  92.   Case 3: arr(indices(lb), indices(lb + 1), indices(lb + 2)) = value
  93.   Case 4: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3)) = value
  94.   Case 5: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4)) = value
  95.   Case 6: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5)) = value
  96.   Case 7: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6)) = value
  97.   Case 8: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7)) = value
  98.   Case 9: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8)) = value
  99.   Case 10: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9)) = value
  100.   Case 11: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10)) = value
  101.   Case 12: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11)) = value
  102.   Case 13: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12)) = value
  103.   Case 14: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13)) = value
  104.   Case 15: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14)) = value
  105.   Case 16: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15)) = value
  106.   Case 17: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16)) = value
  107.   Case 18: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17)) = value
  108.   Case 19: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18)) = value
  109.   Case 20: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19)) = value
  110.   Case 21: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20)) = value
  111.   Case 22: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21)) = value
  112.   Case 23: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22)) = value
  113.   Case 24: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23)) = value
  114.   Case 25: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24)) = value
  115.   Case 26: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25)) = value
  116.   Case 27: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26)) = value
  117.   Case 28: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27)) = value
  118.   Case 29: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28)) = value
  119.   Case 30: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29)) = value
  120.   Case 31: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30)) = value
  121.   Case 32: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31)) = value
  122.   Case 33: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32)) = value
  123.   Case 34: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33)) = value
  124.   Case 35: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34)) = value
  125.   Case 36: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35)) = value
  126.   Case 37: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36)) = value
  127.   Case 38: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37)) = value
  128.   Case 39: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38)) = value
  129.   Case 40: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39)) = value
  130.   Case 41: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40)) = value
  131.   Case 42: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41)) = value
  132.   Case 43: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42)) = value
  133.   Case 44: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43)) = value
  134.   Case 45: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44)) = value
  135.   Case 46: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45)) = value
  136.   Case 47: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46)) = value
  137.   Case 48: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47)) = value
  138.   Case 49: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48)) = value
  139.   Case 50: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49)) = value
  140.   Case 51: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50)) = value
  141.   Case 52: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  142.       indices(lb + 51)) = value
  143.   Case 53: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  144.       indices(lb + 51), indices(lb + 52)) = value
  145.   Case 54: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  146.       indices(lb + 51), indices(lb + 52), indices(lb + 53)) = value
  147.   Case 55: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  148.       indices(lb + 51), indices(lb + 52), indices(lb + 53), indices(lb + 54)) = value
  149.   Case 56: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  150.       indices(lb + 51), indices(lb + 52), indices(lb + 53), indices(lb + 54), indices(lb + 55)) = value
  151.   Case 57: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  152.       indices(lb + 51), indices(lb + 52), indices(lb + 53), indices(lb + 54), indices(lb + 55), indices(lb + 56)) = value
  153.   Case 58: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  154.       indices(lb + 51), indices(lb + 52), indices(lb + 53), indices(lb + 54), indices(lb + 55), indices(lb + 56), indices(lb + 57)) = value
  155.   Case 59: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  156.       indices(lb + 51), indices(lb + 52), indices(lb + 53), indices(lb + 54), indices(lb + 55), indices(lb + 56), indices(lb + 57), indices(lb + 58)) = value
  157.   Case 60: arr(indices(lb), indices(lb + 1), indices(lb + 2), indices(lb + 3), indices(lb + 4), indices(lb + 5), indices(lb + 6), indices(lb + 7), indices(lb + 8), indices(lb + 9), indices(lb + 10), indices(lb + 11), indices(lb + 12), indices(lb + 13), indices(lb + 14), indices(lb + 15), indices(lb + 16), indices(lb + 17), indices(lb + 18), indices(lb + 19), indices(lb + 20), indices(lb + 21), indices(lb + 22), indices(lb + 23), indices(lb + 24), indices(lb + 25), indices(lb + 26), indices(lb + 27), indices(lb + 28), indices(lb + 29), indices(lb + 30), indices(lb + 31), indices(lb + 32), indices(lb + 33), indices(lb + 34), indices(lb + 35), indices(lb + 36), indices(lb + 37), indices(lb + 38), indices(lb + 39), indices(lb + 40), indices(lb + 41), indices(lb + 42), indices(lb + 43), indices(lb + 44), indices(lb + 45), indices(lb + 46), indices(lb + 47), indices(lb + 48), indices(lb + 49), indices(lb + 50), _
  158.       indices(lb + 51), indices(lb + 52), indices(lb + 53), indices(lb + 54), indices(lb + 55), indices(lb + 56), indices(lb + 57), indices(lb + 58), indices(lb + 59)) = value
  159.   Case Else
  160.     Err.Raise 5, , "There can be no more than 60 dimensions"
  161.   End Select
  162. End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement