The following diagram describes a simple procedure you can follow to fold a strip of paper. Step 0: Cut out a strip of paper. Step 1: Fold left over right: Step 2: Fold left over right: This reveals the creases. One mountain and two valley folds. Reading left to right, we can write "m v v" for short. Write a Haskell recursive function called fold that, given a non-negative integer, produces the string representing the folds as output. fold :: Int -> String Here's an example: > fold 2 "mvv" > fold 1 "v" The following diagram describes a simple procedure you can follow to fold a strip of paper. Step 0: Cut out a strip of paper. Step 1: Fold left over right: Step 2: Fold left over right: This reveals the creases. One mountain and two valley folds. Reading left to right, we can write "m v v" for short. Write a Haskell recursive function called fold that, given a non-negative integer, produces the string representing the folds as output. fold :: Int -> String Here's an example: > fold 2 "mvv" > fold 1 "v