// test tensor indexing and slicing
//

tensor[3] x = [1, 2, 3];
tensor[3,3] M = [ [1, 2, 3], [4, 5, 6], [7, 8, 9] ];

strand S () {
  output real w = x[0] + x[1] * (M[1,:] • M[:, 2]);

  update {
    stabilize;
  }
}

collection { S() | i in 1..2 }