OpenEuphoria

You could at least do this:

  object whatever 
  whatever = stacks[t][2][x][2][y][z] 
  f = find(whatever[2],faces[1]) 
  s = find(whatever[1],suits[1]) 

But this really is pretty advanced stuff. Derek did not know about this either.