class Eq

class Ord < Eq

type a : Ord

op f : forall e : Ord . e -> e

op c : a

. f (f c) = c;

type t : Eq

op b : t

classes

Eq < Type;

Ord < Type

class

Ord < Eq

types

a : Ord;

t : Eq

op b : t %(op)%

op c : a %(op)%

op f : forall e : Ord . e -> e %(op)%

. f (f c) = c

### Hint 16.3-16.9,

constrain 't : Ord' is unprovable of '(op f : forall e : Ord . e -> e) (op b : t) = (op b : t)'

known kinds are: {Eq}

*** Error 16.7, no typing for 'f b = b'