orderBy [~{intercalate ", " (map (hsOrderBy ps) fields)}]