]> gerrit.simantics Code Review - simantics/platform.git/blob - tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Select1.scl
(refs #7307) Added features field to SCL module header
[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / Select1.scl
1 import "StandardLibrary"
2
3 main = let
4     l = [1..3] 
5   in
6     select (?x,?y) where 
7         ?x <- l
8         ?y <- l
9         ?x = ?y
10 --
11 [(1,1), (2,2), (3,3)]