diff --git a/stack/maxima/assessment.mac b/stack/maxima/assessment.mac index 1a3634019de1fdbe83e58165baac635a12cc5c34..083e30529ebae018b40469d5a1cf41081c16f54a 100644 --- a/stack/maxima/assessment.mac +++ b/stack/maxima/assessment.mac @@ -542,7 +542,7 @@ polarform_simp(ex) := block([%_r, %_theta, %_pf,simp], */ -/* Decides if an expression is precicely of the form a*10^n, where a is an integer, or a float, and n is an integer. */ +/* Decides if an expression is precisely of the form a*10^n, where a is an integer, or a float, and n is an integer. */ scientific_notationp(ex) := block([tn], if not(safe_op(ex)="*") then return(false), if not(length(args(ex))=2) then return(false),