makeSgfTree :: [SgfNode] -> [SgfTree] -> SgfTree
makeSgfTree [] _        = error "absurd"
makeSgfTree :: [SgfNode] -> [SgfTree] -> SgfTree
makeSgfTree [] _        = error "absurd"
makeSgfTree [] _        = error "absurd"