Replace_Top_With_Reciprocal - Texas Instruments TI-89 Developer's Manual

506

replace_top_with_reciprocal

Declaration: void replace_top_with_reciprocal (void)
Category(ies): EStack Arithmetic, Math
Description: Replaces the top of the estack with its internally-simplified reciprocal.
Inputs: None
Outputs: None
Assumptions: The top expression on the estack is the top tag of an internally-simplified
algebraic expression or comparison.
Side Effects: None
On AMS 2.02 and higher.
Availability:
TI-89 / TI-92 Plus
Differences: None
See Also: divide_top, replace_top2_with_ratio, push_ratio, push_reciprocal
Example:
void push_anti_deriv_powprod_to_frac (EStackIndex i, EStackIndex k)
/* k indexes an expression of the form (bz + c)^n, with b possibly 1,
c possibly 0, and n possibly 1.
i indexes an expression of the form (a * k)^p, with p fractional and
a possibly 1.
Pushes corresponding anti-derivative with respect to z onto estack.
*/
{ Access_AMS_Global_Variables;
EStackIndex old_top = top_estack;
push_product (POWER_EXPONENT_INDEX (i), factor_exponent_index (k));
if (is_minus1 (top_estack))
{ /* int((a(bz + c)^n)^(-1/n),z) -> (a(bz + c)^n)^-(1/n) (bz + c) ln(bz + c) */
top_estack = old_top;
push_ln (factor_base_index (k));
times_top (factor_base_index (k));
times_top (i);
}
else { /* int ((az^n)^p, z) -> (a(bz + c)^n)^p (bz + c)/(np + 1) */
add1_to_top ();
replace_top_with_reciprocal ();
times_top (factor_base_index (k));
times_top (i);
}
} /* end push_anti_deriv_powprod_to_frac */
TI-89 / TI-92 Plus Developer Guide
Appendix A: System Routines — EStack Arithmetic
Not for Distribution Beta Version January 26, 2001