added gears.hs