Наборы уровней уровня в Haskell/Agda

Question

Я видел, что в последних версиях GHC есть поддержка списков типов. Однако мне нужно работать с наборами типов типов для приложения и хотел бы реализовать библиотеку набора типов на основе списков типов. Но я не знаю, с чего начать :(

Есть ли библиотека поддержки наборов типа уровня в Haskell

Answer 1

Вы можете использовать HSet свойство для HList-х из HList пакета:

{-# LANGUAGE FlexibleInstances #-} 

import Data.HList 

class (HList l, HSet l) => ThisIsSet l where 
    -- Here we have @l@ which is @HList@ _and_ @HSet@. 
    test :: l 

-- This is ok: 

instance ThisIsSet HNil where 
    test = hNil 

-- And this: 

instance ThisIsSet (HCons HZero HNil) where 
    test = hCons hZero hNil 

-- And this (HZero != HSucc HZero): 

instance ThisIsSet (HCons HZero (HCons (HSucc HZero) HNil)) where 
    test = hCons hZero (hCons (hSucc hZero) hNil) 

-- This is an error since HSucc HZero == HSucc HZero: 

instance ThisIsSet (HCons (HSucc HZero) (HCons (HSucc HZero) HNil)) where 
    test = hCons (hSucc hZero) (hCons (hSucc hZero) hNil) 

для работы с другими типами вам нужно написать HEq экземпляры для них.