blob: 8bcd7b6e41824973c3b86434ad7be8496395723a (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
{-# LANGUAGE DataKinds, PolyKinds #-}
module KindLevels where
import Data.Kind
data A
data B :: A -> Type
data C :: B a -> Type
data D :: C b -> Type
data E :: D c -> Type
|