Online Algebra Calculator
Many of users do not use powerful Maxima computer algebra system for systematic work, but for ad hoc algebraic calculations – equations, functions, matrixes, etc. only. To do this job, it is not useful to download the whole application from a web site.
Function: get (<a>, <i>) Retrieves the user property indicated by <i> associated with atom <a> or returns false if a doesnt have property <i>.

get evaluates its arguments.
(%i1) put (%e, transcendental, type);
(%o1) transcendental
(%i2) put (%pi, transcendental, type)$
(%i3) put (%i, algebraic, type)$
(%i4) typeof (expr) := block ([q],
if numberp (expr)
then return (algebraic),
if not atom (expr)
then return (maplist (typeof, expr)),
q: get (expr, type),
if q=false
then errcatch (error(expr,"is not numeric.")) else q)$
(%i5) typeof (2*%e + x*%pi);
x is not numeric.
(%o5) [[transcendental, []], [algebraic, transcendental]]
(%i6) typeof (2*%e + %pi);
(%o6) [transcendental, [algebraic, transcendental]] There are also some inexact matches for get. Try ?? get to see them.
(%o1) true (%i2)