> import CompanyDatatypes
> import Paradise (increase)

To add:
  * Bottom up traversal for a specific data type?

> main = print $ increase 0.1 genCom