First try on Process.hs