ЗП
type Exp a = a -> TypeSize: a a a
ЗП
type Exp a = a -> TypeЗП
type family Base (t :: k) :: k -> Type
ЗП
data Project :: a -> Exp (Base a a)
ЗП
ЗП
type instance Eval (Project '[]) = 'NilF
type instance Eval (Project (x ': xs)) = 'ConsF x xs
ЗП
data Project :: a -> Exp (Base a a)
ЗП
ЗП
MP
MP
MP
MP
MK
MK
-M и посмотри упадёт лиMP
MK
-F, там что-то про это былоMK
MK
-hT уже смотрел?MP
MP