AlgebraicUnitQ

AlgebraicUnitQ[a] yields True if a is an algebraic unit, and yields False otherwise.

Please visit the official Wolfram Language Reference for more details and examples on core symbols.