Cofree(Const c)作家 c

特定

data Const c a = Const c

我們有

data Cofree (Const c) a
     = a :< Const c

這是同構的

data Writer c a = Writer c a