Cell は Symbol型の car と cdr の値を持つ。Symbol型は Int または String、Nil、そして、Cell 型である。 data Symbol = I Int | S String | Nil | C Cell deriving (Show, Read, Eq) data Cell = Cell { car :: Symbol, cdr :: Symbol} deriving (Show, R…