Update F1.hs