Bộ loại mức trong Haskell/Agda

Question

Tôi đã thấy rằng trong các phiên bản mới nhất của GHC có hỗ trợ cho danh sách cấp loại. Tuy nhiên, tôi cần phải làm việc với các bộ mức loại cho một ứng dụng và muốn triển khai một thư viện tập hợp kiểu cấp dựa trên các danh sách mức loại. Nhưng tôi không biết bắt đầu từ đâu :(

Có bất kỳ thư viện hỗ trợ bộ gõ cấp trong Haskell

Answer 1

Bạn có thể sử dụng tài sản cho HSetHList 's từ HList gói:

{-# 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) 

để làm việc với các loại khác, bạn cần viết HEq trường hợp cho chúng.