1349     complex_t out_complex;  in exponential_complex()  local
1353     out_complex.real = e_to_x * cos(in_complex.imaginary);  in exponential_complex()
1354     out_complex.imaginary = e_to_x * sin(in_complex.imaginary);  in exponential_complex()
1355     return out_complex;  in exponential_complex()
1360     complex_t out_complex;  in multiply_complex()  local
1362     out_complex.real = in_one_complex.real * in_two_complex.real -  in multiply_complex()
1364     out_complex.imaginary = in_one_complex.real * in_two_complex.imaginary +  in multiply_complex()
1366     return out_complex;  in multiply_complex()
1371     complex_t out_complex;  in divide_complex()  local
1377     out_complex.real = (in_one_complex.real * in_two_complex.real -  in divide_complex()
1379     out_complex.imaginary = (in_one_complex.imaginary * in_two_complex.real -  in divide_complex()
1381     return out_complex;  in divide_complex()
1386     complex_t out_complex;  in inverse_complex()  local
1391     out_complex.real = (in_complex.real - in_complex.imaginary) / divider;  in inverse_complex()
1392     out_complex.imaginary = (in_complex.real - in_complex.imaginary) / divider;  in inverse_complex()
1393     return out_complex;  in inverse_complex()
1398     complex_t out_complex;  in add_complex()  local
1400     out_complex.real = in_one_complex.real + in_two_complex.real;  in add_complex()
1401     out_complex.imaginary = in_one_complex.imaginary + in_two_complex.imaginary;  in add_complex()
1402     return out_complex;  in add_complex()
1407     complex_t out_complex;  in subtract_complex()  local
1409     out_complex.real = in_one_complex.real - in_two_complex.real;  in subtract_complex()
1410     out_complex.imaginary = in_one_complex.imaginary - in_two_complex.imaginary;  in subtract_complex()
1411     return out_complex;  in subtract_complex()