m_apm_absolute_value
extern void m_apm_absolute_value(M_APM, M_APM);
{MAPM ret;m_apm_absolute_value(ret.val(),cval());return ret;}
m_apm_absolute_value(M_work1, a);
m_apm_absolute_value(M_work2, b);
m_apm_absolute_value(M_div_worka, a);
m_apm_absolute_value(M_div_workb, b);
m_apm_absolute_value(btmp, atmp); /* do conversion of positive number */
m_apm_absolute_value(tmpU, u);
m_apm_absolute_value(tmpV, v);
m_apm_absolute_value(r, v);
m_apm_absolute_value(r, u);
m_apm_absolute_value(tmpU, u);
m_apm_absolute_value(tmpV, v);
m_apm_absolute_value(tmpN, aa);
m_apm_absolute_value(tmp0, x);
m_apm_absolute_value(tmp0, x);
m_apm_absolute_value(tmpN, aa);
m_apm_absolute_value(tmp1, aa);
m_apm_absolute_value(tmp0, aa);