<<< mml ( ( x y ) ) >>> native [ EDelimited "(" ")" [ Right (EDelimited "(" ")" [ Right (EFraction NormalFrac (EIdentifier "x") (EIdentifier "y")) ]) ] ]