1
0
forked from GitHub/gf-core

test for bracketedLinearize

This commit is contained in:
krasimir
2010-05-01 20:54:31 +00:00
parent a587cfef40
commit ec968edf9e
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