testCompany3 :: Tree Employee
testCompany3
  = Node (Emp "Stan" 9)
    [ Node (Emp "Bob" 9)
      [ Node (Emp "Joe" 9)
        [ Node (Emp "John" 9) []
        , Node (Emp "Sue" 9) []
        ]
      , Node (Emp "Fred" 9) []
      ]
    , Node (Emp "Sarah" 9)
      [ Node (Emp "Sam" 9) []
      ]
    ]
testCompany3 :: Tree Employee
testCompany3
  = Node (Emp "Stan" 9)
    [ Node (Emp "Bob" 9)
      [ Node (Emp "Joe" 9)
        [ Node (Emp "John" 9) []
        , Node (Emp "Sue" 9) []
        ]
      , Node (Emp "Fred" 9) []
      ]
    , Node (Emp "Sarah" 9)
      [ Node (Emp "Sam" 9) []
      ]
    ]
testCompany3
  = Node (Emp "Stan" 9)
    [ Node (Emp "Bob" 9)
      [ Node (Emp "Joe" 9)
        [ Node (Emp "John" 9) []
        , Node (Emp "Sue" 9) []
        ]
      , Node (Emp "Fred" 9) []
      ]
    , Node (Emp "Sarah" 9)
      [ Node (Emp "Sam" 9) []
      ]
    ]