Added Adul.hs. this module can do conversion for Adam.