/* Test array-valued shift expressions */
proc main()
{
    var a;

    a = 1 << {1,2,3,4};
    say(a[0], " ", a[1], " ", a[2], " ", a[3], "\n");
}