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