Cartesian product of two or more lists: Difference between revisions

Added 11l
(Added SQL implementation)
(Added 11l)
Line 21:
 
<br>
 
=={{header|11l}}==
{{trans|Go}}
<lang 11l>F cart_prod(a, b)
V p = [(0, 0)] * (a.len * b.len)
V i = 0
L(aa) a
L(bb) b
p[i++] = (aa, bb)
R p
 
print(cart_prod([1, 2], [3, 4]))
print(cart_prod([3, 4], [1, 2]))
print(cart_prod([1, 2], []))
print(cart_prod([], [1, 2]))</lang>
{{out}}
<pre>
[(1, 3), (1, 4), (2, 3), (2, 4)]
[(3, 1), (3, 2), (4, 1), (4, 2)]
[]
[]
</pre>
 
=={{header|AppleScript}}==
<lang AppleScript>-- CARTESIAN PRODUCTS ---------------------------------------------------------
1,481

edits