<<< mml ( a b ) >>> native [ EDelimited "(" ")" [ Right (EFraction NormalFrac (EIdentifier "a") (EIdentifier "b")) ] ]