test for bracketedLinearize

This commit is contained in:
krasimir
2010-05-01 20:54:31 +00:00
parent c1406bdcdf
commit 029fbec8f3
2 changed files with 40 additions and 0 deletions

View File

@@ -0,0 +1,12 @@
i -src testsuite/runtime/linearize/TestCnc.gf
l -bracket Even ?
l -bracket Exist (\x -> <Even : E -> S> x)
l -bracket f a
l -bracket fa a
l -bracket fb a
l -bracket IsString "abcd"
l -bracket IsInteger 100
l -bracket IsFloat 12.4
l -bracket <IsString "xyz" : S>
l -bracket <\x -> x : S -> S>

View File

@@ -0,0 +1,28 @@
(S (E (String ?1)) is even)
(S exists (S (String x)) such that (S (S (E (String x)) is even)))
(S (E a))
(S (E aa) a)
(S (E a) b)
(S (String abcd) is string)
(S (Int 100) is integer)
(S (Float 12.4) is float)
(S (String xyz) is string)
cannot linearize