| 1 | test_index = ->
|
| 2 | run_test [
|
| 3 |
|
| 4 | "A=[[A11,A12],[A21,A22]]",
|
| 5 | "",
|
| 6 |
|
| 7 | "A[1,1]",
|
| 8 | "A11",
|
| 9 |
|
| 10 | "A[1,2]",
|
| 11 | "A12",
|
| 12 |
|
| 13 | "A[2,1]",
|
| 14 | "A21",
|
| 15 |
|
| 16 | "A[2,2]",
|
| 17 | "A22",
|
| 18 |
|
| 19 | "A[1]",
|
| 20 | "[A11,A12]",
|
| 21 |
|
| 22 | "A[1][2]",
|
| 23 | "A12",
|
| 24 |
|
| 25 | "A[2]",
|
| 26 | "[A21,A22]",
|
| 27 |
|
| 28 | "A[1]=[B11,B12]",
|
| 29 | "",
|
| 30 |
|
| 31 | "A",
|
| 32 | "[[B11,B12],[A21,A22]]",
|
| 33 |
|
| 34 | "A[2]=[B21,B22]",
|
| 35 | "",
|
| 36 |
|
| 37 | "A",
|
| 38 | "[[B11,B12],[B21,B22]]",
|
| 39 |
|
| 40 | "A=[[0,0],[0,0]]",
|
| 41 | "",
|
| 42 |
|
| 43 | "A[1,1]",
|
| 44 | "0",
|
| 45 |
|
| 46 | # index of scalar should throw an error
|
| 47 |
|
| 48 | "1[2]",
|
| 49 | "Stop: trying to access a scalar as a tensor",
|
| 50 |
|
| 51 | # clean up -----------------
|
| 52 |
|
| 53 | "clearall",
|
| 54 | "",
|
| 55 |
|
| 56 | # index of a non-allocated tensor
|
| 57 | # or index with a symbol instead of
|
| 58 | # a number
|
| 59 |
|
| 60 | "a[0]",
|
| 61 | "a[0]",
|
| 62 |
|
| 63 | "a[0,2]",
|
| 64 | "a[0,2]",
|
| 65 |
|
| 66 |
|
| 67 | "a[b]",
|
| 68 | "a[b]",
|
| 69 |
|
| 70 | "a[b,c]",
|
| 71 | "a[b,c]",
|
| 72 |
|
| 73 | "a = [1,2,3]",
|
| 74 | "",
|
| 75 |
|
| 76 | "a[b]",
|
| 77 | "a[b]",
|
| 78 |
|
| 79 | ]
|