An attempt at defining instances for ContT
Completed BaseControl.hs