ADT first test fail

gistfile1.txt

Tree.new-branch(
  left => Tree.new-branch(
    left => Tree.new-leaf(storage => 1),
    right => Tree.new-leaf(storage => 2)
  ), 
  right => Tree.new-leaf(storage => 3)
)

Tree.new-branch(
  left => Tree.new(
    leaf => Any, 
    branch => Branch.new(
      left => Tree.new(
        leaf => Leaf.new(storage => 1), 
        branch => Any
      ),
      right => Tree.new(
        leaf => Leaf.new(storage => 2), 
        branch => Any
      ) 
    )
  ), 
  right => Tree.new(
    leaf => Leaf.new(storage => 3), 
    branch => Any
  )
)