{-# LANGUAGE DeriveGeneric #-}
module Main (main) where

data UserTree a = Node a (UserTree a) (UserTree a)
                | Leaf
                deriving Generic