%% Classes ---------------------------------------------------------------

a

b

c

d

%% Type Constructors -----------------------------------------------------

List :a ->b

[__] :a ->b

m :(a ->b) ->c

nt :a ->(b ->c) ->c ->d %(var)%

r :Type

r1 :Type< t

r2 :Type< (t2, r2, s2)

s :Type

s1 :Type< t

s2 :Type< (t2, r2, s2)

s3 :Type< t = {x : t . x = x}

t :Type

t1 :Type< t

t2 :Type< (t2, r2, s2)

tuple1 :b ->a

tuple3 :a ->b ->c ->d

{__} :a ->b

%% Assumptions -----------------------------------------------------------

o1 : m %(var)%

o2 : (m)(tuple1) %(var)%

o3 : (m)(tuple3) %(var)%

o4 : (((nt)(r))(List))(s) %(var)%

u : ([__])(r) %(var)%

v : (m)(List) %(var)%

: ({__})(s) %(var)%

x : (((tuple3)(r))(s))(t) %(var)%

y : ((tuple3)(r))(s) %(var)%

z : m [__] %(var)%

%% Diagnostics -----------------------------------------------------------

Hint "Types.hascasl" (line 7, column 9) not a class '[r]'

Hint "Types.hascasl" (line 7, column 16) not a class '{s}'

Hint "Types.hascasl" (line 11, column 9) not a class 'tuple3 r s t'

Hint "Types.hascasl" (line 12, column 9) not a class 'tuple3 r s'

Error "Types.hascasl" (line 12, column 5) incompatible kinds

Type ->Type

Type

Hint "Types.hascasl" (line 18, column 9) not a class 'm [__]'

Error "Types.hascasl" (line 18, column 12) undeclared type '__'

Hint "Types.hascasl" (line 7, column 15) type 'm' is not unifiable with '{__}'

Hint "Types.hascasl" (line 24, column 10) not a class 'm'

Error "Types.hascasl" (line 24, column 5) incompatible kinds

(Type ->Type) ->Type

Type

Error "Types.hascasl" (line 28, column 12) incompatible kinds

Type ->Type

Type ->Type ->Type ->Type

Hint "Types.hascasl" (line 32, column 10) not a class 'nt r List s'

Warning "Types.hascasl" (line 38, column 12) unchecked formula 'x = x'