Note that this is not tail call optimized. To change that simply use an accumulator parameter inside your area function.

Code golf might be fun, but questions like these are the best proof of why to avoid doing it in a real codebase.

Using pipes in the second case clause gets rid of the function nesting and improves visibility. Otherwise nice solution!