(==) (Two numOne numTwo)
       (Two numOne' numTwo') =
          (==) numOne numOne' && (==) numTwo numTwo'
(==) (Two numOne numTwo)
       (Two numOne' numTwo') =
          (==) numOne numOne' && (==) numTwo numTwo'
(==) (Two numOne numTwo)
       (Two numOne' numTwo') =
          (==) numOne numOne' && (==) numTwo numTwo'