Update FQL.hs