Create fac.hs