questo GADT ha effettivamente il ruolo di tipo rappresentativo

Question

Questo tipo di dati può avere type role HCons' representational representational, che consente di utilizzare coerce per aggiungere o rimuovere i newtypes applicati agli elementi, senza la necessità di attraversare l'elenco.

data HNil' = HNil' 
data HCons' a b = HCons' a b 

Tuttavia la sintassi per tali elenchi non è così bello come quelli con il seguente GADT

data HList (l::[*]) where 
    HNil :: HList '[] 
    HCons :: e -> HList l -> HList (e ': l) 

Ho una classe di convert between these two representations, in modo tale che Prime (HList [a,b]) ~ HCons' a (HCons' b HNil'). Quella lezione rende

coerceHList :: Coercible (Prime a) (Prime b) => HList a -> HList b 
coerceHList = unsafeCoerce 

sicuro?

Answer 1

Non credo che l'esistenza di una conversione da sola sia sufficiente. Ad esempio, il seguente mi consente anche di convertire tra un GADT e un paio coercibile di tipi, ma di certo non sarebbe sicuro di costringere direttamente il GADT:

newtype Age = Age Int 

data Foo a where 
    I :: Bool -> Int -> Foo Int 
    A :: Age -> Bool -> Foo Age 

class ConvFoo a where 
    toFoo :: (Bool, a) -> Foo a 
    fromFoo :: Foo a -> (Bool, a) 

instance ConvFoo Int where 
    toFoo (b, i) = I b i 
    fromFoo (I b i) = (b, i) 

instance ConvFoo Age where 
    toFoo (b, a) = A a b 
    fromFoo (A a b) = (b, a) 

potrei anche definire banalmente una funzione di tipo simile UnFoo a Prime.

penso che la differenza fondamentale tra i due esempi è che nella mia, Age e Int hanno la stessa rappresentazione, mentre nel vostro '[] e e':l non hanno la stessa rappresentazione.

Quindi c'è ancora un caso di dire, come lei suggerisce il titolo, che l ha tipo di ruolo rappresentativo, perché è una specie di ovvio che HList l1 e HList l2 avere le stesse rappresentazioni se l1 e l2 hanno le stesse rappresentazioni.

Tuttavia, poiché in teoria le rappresentazioni dipendono dall'implementazione, non penso che si possa mai considerare questo assolutamente sicuro finché GHC non lo accetta direttamente.