8 lines
168 B
Haskell
8 lines
168 B
Haskell
|
{-# language DeriveTraversable #-}
|
||
|
|
|
||
|
|
data Template a = Val a | List [Template a]
|
||
|
|
deriving ( Show
|
||
|
|
, Functor
|
||
|
|
, Foldable
|
||
|
|
, Traversable )
|