 n peg1 peg2 peg3 = hanoi (n-1) peg1 peg3 peg2 ++ [(peg1, peg2)] ++ hanoi (n-1) peg3 peg2 peg1

-- 
hanoi n peg1 peg2 peg3 = hanoi (n-1) peg1 peg3 peg2 ++ [(peg1, peg2)] ++ hanoi (n-1) peg3 peg2 peg1
hanoi n peg1 peg2 peg3 = hanoi (n-1) peg1 peg3 peg2 ++ [(peg1, peg2)] ++ hanoi (n-1) peg3 peg2 peg1