m_apm_subtract
extern void m_apm_subtract(M_APM, M_APM, M_APM);
{MAPM ret;m_apm_subtract(ret.val(),a.cval(),b.cval());return ret;}
m_apm_subtract(tmp0, t2, tmp1);
m_apm_subtract(tmp0, t4, t2);
m_apm_subtract(tmp2, MM_One, tmp1);
m_apm_subtract(r,a,b);
m_apm_subtract(r,b,a);
m_apm_subtract(tmp1, a0, b0);
m_apm_subtract(tmp1, sum, tmp2);
m_apm_subtract(M_div_tmp8, M_div_tmp7, M_div_workb);
m_apm_subtract(M_div_tmp9, M_div_worka, M_div_tmp7);
m_apm_subtract(rr, aa, M_div_tmp7);
m_apm_subtract(tmp7, x, tmp8);
m_apm_subtract(tmp8, tmp7, MM_lc_log2);
m_apm_subtract(tmp0, tmp1, MM_0_5);
m_apm_subtract(ctmp, mtmp, MM_0_5);
m_apm_subtract(tmpT, tmpU, tmpV);
m_apm_subtract(tmp3, tmp1, nn);
m_apm_subtract(tmp3, guess, tmp0);
m_apm_subtract(tmp1, tmp2, MM_One);
m_apm_subtract(MM_lc_log2, tmp9, tmp8); /* log(2) */
m_apm_subtract(MM_lc_log10, tmp9, tmp8); /* log(10) */
m_apm_subtract(tmp3, tmp1, tmp2);
m_apm_subtract(tmp1, tmpA0, tmpB0); /* C n+1 = 0.5 * [ An - Bn ] */
m_apm_subtract(tmp4, MM_One, tmp3);
m_apm_subtract(tmp0, a, MM_One);
m_apm_subtract(tmp2, MM_Two, tmp1);
m_apm_subtract(tmp2, guess, last_x);
m_apm_subtract(tmp9, aa, tmp8);
m_apm_subtract(tmp9, aa, tmp8);
m_apm_subtract(tmp7, tmp5, MM_lc_PI);
m_apm_subtract(tmp1, MM_lc_HALF_PI, tmp2);
m_apm_subtract(tmp3, tmp2, x);
m_apm_subtract(tmp2, current_x, tmp0);
m_apm_subtract(tmp1, MM_lc_PI, tmp3);
m_apm_subtract(tmp3, tmp1, x);
m_apm_subtract(tmpR, tmpS, tmp0);
m_apm_subtract(tmp2, MM_lc_HALF_PI, tmp1);
m_apm_subtract(tmp7, tmp8, tmp9);
m_apm_subtract(tmp8, guess, last_x);
m_apm_subtract(tmp1, tmp2, MM_One);
m_apm_subtract(tmp2, tmp1, MM_One);
m_apm_subtract(tmp2, tmp1, MM_One);
m_apm_subtract(tmp2, MM_One, aa);
m_apm_subtract(tmp3, tmp1, tmp2);
m_apm_subtract(tmp3, tmp1, tmp2);
m_apm_subtract(tmp7, sum, term);
m_apm_subtract(tmp7, sum, term);
m_apm_subtract(tmp9, MM_Three, tmp7);
m_apm_subtract(tmp7, guess, last_x);
m_apm_subtract(btmp, atmp, M_work_0_5);