let high_dim[10][10][10][10][10]
let i = 0
let j = 0
let k = 0
let l = 0
let m = 0
loop 4 {
j = 0
loop 4 {
k = 0
loop 4 {
l = 0
loop 4 {
m = 0
loop 4 {
high_dim[i][j][k][l][m] = i * j * k * l * m
m = m + 1
}
l = l + 1
}
k = k + 1
}
j = j + 1
}
i = i + 1
}
assert_eq(high_dim[0][0][0][0][0], 0)
assert_eq(high_dim[1][1][1][1][1], 1)
assert_eq(high_dim[2][2][2][2][2], 32)
assert_eq(high_dim[3][3][3][3][3], 243)
assert_eq(high_dim[3][3][1][3][3], 81)
i = 3
j = 3
k = 2
l = 3
m = 1
assert_eq(high_dim[i][j][k][l][m], 54)
assert_eq(high_dim[i][j][k][l][m], i * j * k * l * m)
i = 1
j = 2
k = 2
l = 3
m = 1
assert_eq(high_dim[i][j][k][l][m], 12)
assert_eq(high_dim[i][j][k][l][m], i * j * k * l * m)