Creating random binary tree in haskell

I am new to Stackoverflow aswell as quite new to programming with haskell. I need to generate a random binary tree with a given maximum depth. Nodes have either 2 or one child.