M_4x_cos
extern void M_4x_cos(M_APM, int, M_APM);
M_4x_cos(r, places, tmp3);
M_4x_cos(tmp7, (places + 6), tmp5);
M_4x_cos(tmp1, local_precision, current_x);
M_4x_cos(tmp1, local_precision, current_x);