/* Test [a,b] alternative indexing syntax */
proc main()
{
    var a;
    a = [[1,2,3],[4,5,6],[7,8,9]];
    a[2,2] = 6;
    say("a[2,2] = ", a[2,2], "\n");
}