/* Still more constant expression tests */ const c00 = [1] & [3]; const c01 = [1] | [2]; const c02 = [3] ^ [5]; const c03 = {1,2,3} == {1,2,3}; const c04 = [1,2,3] #= [1,2,4]; const c05 = [1,2,3] != [1,2,3]; const c06 = [1,2,3] < [4,5,6]; const c07 = [1,2,3] > [4,5,6]; const c08 = [1,2,3] <= [4,5,6]; const c09 = [1,2,3] >= [4,5,6]; const c10 = ~[-1]; const c11 = -[1]; const c12 = [1,2,3] + [4,5,6]; const c13 = [1,2,3] - [4,5,6]; const c14 = [1,2,3] * [4,5,6]; const c15 = [1,2,3] ** [4,5,6]; const c16 = [1.,2.,3.] / [4.,5.,6.]; const ops = {"&", "|", "^", "==", "#=", "!=", "<", ">", "<=", ">=", "~", "-", "+", "-", "*", "**", "/"}; const res = {c00, c01, c02, c03, c04, c05, c06, c07, c08, c09, c10, c11, c12, c13, c14, c15, c16}; proc main() { forall (ops[i]) { print("SL,V4,*,V,X", ops[i], res[i]); } }