]> gerrit.simantics Code Review - simantics/platform.git/blob - tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Set1.scl
Merge commit 'd1a82fe'
[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / Set1.scl
1 import "StandardLibrary"\r
2 \r
3 s1 = Set.set [3,2,1,4]\r
4 s2 = Set.set [9,8,3,2]\r
5 s1s2 = Set.union s1 s2\r
6 \r
7 main = show s1s2\r
8 --\r
9 set [1, 2, 3, 4, 8, 9]