29 void init_mpa(int iscale)  in init_mpa()  argument
39   mpf_set_default_prec ((iscale * 32) / 10);  in init_mpa()
67 void str2R (const char *q, char **endptr, int iscale,  in str2R()  argument
73 void str2C (const char *q, char **endptr, int iscale,  in str2C()  argument
125 void add (Real s, Real t, Real* q, int iscale)  in add()  argument
130 void square (Real s, Real* q, int iscale)  in square()  argument
135 void divide (Real s, Real t, Real* q, int iscale)  in divide()  argument
140 void divide_by_int (Real* q, int d, int iscale)  in divide_by_int()  argument
154 void square_root (Real* q, int iscale)  in square_root()  argument
159 void Cabs (Complex z, Real* pm, int iscale)  in Cabs()  argument
206 void Csub (Complex z1, Complex z2, Complex* pw, int iscale)  in Csub()  argument
430 void init_mpa(int iscale)  in init_mpa()  argument
460 void str2R (const char *q, char **endptr, int iscale,  in str2R()  argument
463   bc_a2num (pr, q, endptr, iscale, pnf);  in str2R()
466 void str2C (const char *q, char **endptr, int iscale,  in str2C()  argument
473   bc_a2num (&pc->re, q, &ptr, iscale, pnf);  in str2C()
491 	      bc_a2num (&pc->im, ptr, &ptr2, iscale, pnf);  in str2C()
518 void add (Real s, Real t, Real* q, int iscale)  in add()  argument
520   bc_add (s, t, q, iscale);  in add()
523 void square (Real s, Real* q, int iscale)  in square()  argument
525   bc_multiply (s, s, q, iscale);  in square()
528 void divide (Real s, Real t, Real* q, int iscale)  in divide()  argument
530   bc_divide (s, t, q, iscale);  in divide()
533 void divide_by_int (Real* q, int d, int iscale)  in divide_by_int()  argument
547       bc_divide (num, div, q, iscale);  in divide_by_int()
553 void square_root (Real* q, int iscale)  in square_root()  argument
555   bc_sqrt (q, iscale);  in square_root()
558 void Cabs (Complex z, Real* pm, int iscale)  in Cabs()  argument
567       bc_sub (Zero, z.re, &a, iscale);   in Cabs()
579       bc_sub (Zero, z.im, &b, iscale);   in Cabs()
584       bc_divide (a, b, &q, iscale);  in Cabs()
585       bc_multiply (q, q, &a, iscale);  in Cabs()
586       bc_add (a, _one_, &q, iscale);  in Cabs()
587       bc_sqrt (&q, iscale);  in Cabs()
588       bc_multiply (b, q, pm, iscale);  in Cabs()
593       bc_divide (b, a, &q, iscale);  in Cabs()
594       bc_multiply (q, q, &b, iscale);  in Cabs()
595       bc_add (b, _one_, &q, iscale);  in Cabs()
596       bc_sqrt (&q, iscale);  in Cabs()
597       bc_multiply (a, q, pm, iscale);  in Cabs()
604 void Csub (Complex z1, Complex z2, Complex* pw, int iscale)  in Csub()  argument
606   bc_sub (z1.re, z2.re, &pw->re, iscale);  in Csub()
607   bc_sub (z1.im, z2.im, &pw->im, iscale);  in Csub()