var("X") + int(3) * var("X^2") ; (type)
{ type }
{ '?-' }
'?-'
{ blah }
blah ; (type), (type) * blah ; (type)
((blah ; blah), blah) * blah ; blah
(type) * blah ; (type)
TESTING DISCRIMINATED UNIONS
one
two
three
apple([9, 5, 1])
banana([three, one, two])
zop(3.30000000000000, 2.03000000000000)
zip(3, 2)
zap(3, -2.11100000000000)
wombat
foo

TESTING POLYMORPHISM
poly_one([2399.30000000000])
poly_two(3)
poly_three(3.33000000000000, 4, poly_one(9.11000000000000))

TESTING BUILTINS
""
"Hello, world\n"
"Foo%sFoo"
"\""
'a'
'&'
3.14159000000000
1.12832498300000e-21
2.23954899000000e+23
-65
4
651u
-128i8
127i8
255u8
-32768i16
32767i16
65535u16
-2147483648i32
2147483647i32
4294967295u32
univ_cons(["hi! I\'m a univ!"])
'<<predicate>>'

TESTING OTHER TYPES
var(1)
var_supply(0)
var_supply(1)
empty
qwerty(4)
array([1, 2, 3, 4])