@@ -213,7 +213,7 @@ atomP = stringAtomP <|>
214functionAtomExprP :: RelationalMarkerExpr a => Parser (AtomExprBase a)
214functionAtomExprP :: RelationalMarkerExpr a => Parser (AtomExprBase a)
215functionAtomExprP =
215functionAtomExprP =
216− FunctionAtomExpr <$> identifier <*> parens (sepBy atomExprP comma) <*> parseMarkerP
216+ FunctionAtomExpr <$> uncapitalizedIdentifier <*> parens (sepBy atomExprP comma) <*> parseMarkerP
218relationalAtomExprP :: RelationalMarkerExpr a => Parser (AtomExprBase a)
218relationalAtomExprP :: RelationalMarkerExpr a => Parser (AtomExprBase a)
219relationalAtomExprP = RelationAtomExpr <$> relExprP
219relationalAtomExprP = RelationAtomExpr <$> relExprP