[add fromDouble to Data.Complex RealFloat instance
John Meacham <john@repetae.net>**20070523035824] hunk ./lib/base/Data/Complex.hs 64
+    fromDouble a = fromDouble a :+ 0