RosettaCodeData/Task/Collections/Picat/collections-2.picat

8 lines
136 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
go2 =>
L = {1,2,3,4},
L2 = {0} ++ L ++ {5},
% multi dimensional arrays
M = new_array(4,4),
bind_vars(M,0). % initialize to 0