float c4_abs ( complex x ); complex c4_acos ( complex c1 ); complex c4_acosh ( complex c1 ); complex c4_add ( complex c1, complex c2 ); float c4_arg ( complex x ); complex c4_asin ( complex c1 ); complex c4_asinh ( complex c1 ); complex c4_atan ( complex c1 ); complex c4_atanh ( complex c1 ); complex c4_conj ( complex c1 ); void c4_copy ( complex c1, complex c2 ); complex c4_cos ( complex c1 ); complex c4_cosh ( complex c1 ); complex c4_cube_root ( complex x ); complex c4_div ( complex c1, complex c2 ); complex c4_div_r4 ( complex c1, float r ); complex c4_exp ( complex c1 ); complex c4_i ( ); float c4_imag ( complex c ); complex c4_inv ( complex c1 ); bool c4_le_l1 ( complex x, complex y ); bool c4_le_l2 ( complex x, complex y ); bool c4_le_li ( complex x, complex y ); complex c4_log ( complex c1 ); float c4_mag ( complex x ); complex c4_mul ( complex c1, complex c2 ); complex c4_neg ( complex c1 ); complex c4_nint ( complex c1 ); float c4_norm_l1 ( complex x ); float c4_norm_l2 ( complex x ); float c4_norm_li ( complex x ); complex c4_normal_01 ( int *seed ); complex c4_one ( ); void c4_print ( complex a, string title ); float c4_real ( complex c ); complex c4_sin ( complex c1 ); complex c4_sinh ( complex c1 ); complex c4_sqrt ( complex x ); complex c4_sub ( complex c1, complex c2 ); void c4_swap ( complex *x, complex *y ); complex c4_tan ( complex c1 ); complex c4_tanh ( complex c1 ); void c4_to_cartesian ( complex c, float *x, float *y ); void c4_to_polar ( complex c, float *r, float *theta ); complex c4_uniform_01 ( int *seed ); complex c4_zero ( ); void c4mat_add ( int m, int n, complex alpha, complex a[], complex beta, complex b[], complex c[] ); void c4mat_add_r4 ( int m, int n, float alpha, complex a[], float beta, complex b[], complex c[] ); void c4mat_copy ( int m, int n, complex a1[], complex a2[] ); complex *c4mat_copy_new ( int m, int n, complex a1[] ); void c4mat_fss ( int n, complex a[], int nb, complex x[] ); complex *c4mat_fss_new ( int n, complex a[], int nb, complex b[] ); complex *c4mat_identity_new ( int n ); complex *c4mat_indicator_new ( int m, int n ); void c4mat_minvm ( int n1, int n2, complex a[], complex b[], complex c[] ); complex *c4mat_minvm_new ( int n1, int n2, complex a[], complex b[] ); void c4mat_mm ( int n1, int n2, int n3, complex a[], complex b[], complex c[] ); complex *c4mat_mm_new ( int n1, int n2, int n3, complex a[], complex b[] ); void c4mat_nint ( int m, int n, complex a[] ); float c4mat_norm_fro ( int m, int n, complex a[] ); float c4mat_norm_l1 ( int m, int n, complex a[] ); float c4mat_norm_li ( int m, int n, complex a[] ); void c4mat_print ( int m, int n, complex a[], string title ); void c4mat_print_some ( int m, int n, complex a[], int ilo, int jlo, int ihi, int jhi, string title ); void c4mat_scale ( int m, int n, complex alpha, complex a[] ); void c4mat_scale_r4 ( int m, int n, float alpha, complex a[] ); void c4mat_uniform_01 ( int m, int n, int *seed, complex c[] ); complex *c4mat_uniform_01_new ( int m, int n, int *seed ); complex *c4mat_zero_new ( int m, int n ); void c4vec_copy ( int n, complex a1[], complex a2[] ); complex *c4vec_copy_new ( int n, complex a1[] ); complex *c4vec_indicator_new ( int n ); void c4vec_nint ( int n, complex a[] ); float c4vec_norm_l2 ( int n, complex a[] ); void c4vec_print ( int n, complex a[], string title ); void c4vec_print_part ( int n, complex a[], int max_print, string title ); void c4vec_print_some ( int n, complex a[], int i_lo, int i_hi, string title ); void c4vec_sort_a_l2 ( int n, complex x[] ); complex *c4vec_spiral ( int n, int m, complex c1, complex c2 ); void c4vec_uniform_01 ( int n, int *seed, complex c[] ); complex *c4vec_uniform_01_new ( int n, int *seed ); complex cartesian_to_c4 ( float x, float y ); int i4_max ( int i1, int i2 ); int i4_min ( int i1, int i2 ); complex polar_to_c4 ( float r, float theta ); float r4_abs ( float x ); complex r4_csqrt ( float x ); float r4_floor ( float x ); float r4_max ( float x, float y ); int r4_nint ( float x ); float r4_sign ( float x ); float r4_uniform_01 ( int *seed ); void r4poly2_root ( float a, float b, float c, complex *r1, complex *r2 ); void r4poly3_root ( float a, float b, float c, float d, complex *r1, complex *r2, complex *r3 ); void r4poly4_root ( float a, float b, float c, float d, float e, complex *r1, complex *r2, complex *r3, complex *r4 ); void sort_heap_external ( int n, int *indx, int *i, int *j, int isgn ); void timestamp ( );