../../Task/Pythagoras-tree/Haskell