1201     complex_t out_complex;  in exponential_complex()  local
1205     out_complex.real = e_to_x * cos(in_complex.imaginary);  in exponential_complex()
1206     out_complex.imaginary = e_to_x * sin(in_complex.imaginary);  in exponential_complex()
1207     return out_complex;  in exponential_complex()
1212     complex_t out_complex;  in multiply_complex()  local
1214     out_complex.real = in_one_complex.real * in_two_complex.real -  in multiply_complex()
1216     out_complex.imaginary = in_one_complex.real * in_two_complex.imaginary +  in multiply_complex()
1218     return out_complex;  in multiply_complex()
1223     complex_t out_complex;  in divide_complex()  local
1229     out_complex.real = (in_one_complex.real * in_two_complex.real -  in divide_complex()
1231     out_complex.imaginary = (in_one_complex.imaginary * in_two_complex.real -  in divide_complex()
1233     return out_complex;  in divide_complex()
1238     complex_t out_complex;  in inverse_complex()  local
1242     out_complex.real = (in_complex.real - in_complex.imaginary) / divider;  in inverse_complex()
1243     out_complex.imaginary = (in_complex.real - in_complex.imaginary) / divider;  in inverse_complex()
1244     return out_complex;  in inverse_complex()
1249     complex_t out_complex;  in add_complex()  local
1251     out_complex.real = in_one_complex.real + in_two_complex.real;  in add_complex()
1252     out_complex.imaginary = in_one_complex.imaginary + in_two_complex.imaginary;  in add_complex()
1253     return out_complex;  in add_complex()
1258     complex_t out_complex;  in subtract_complex()  local
1260     out_complex.real = in_one_complex.real - in_two_complex.real;  in subtract_complex()
1261     out_complex.imaginary = in_one_complex.imaginary - in_two_complex.imaginary;  in subtract_complex()
1262     return out_complex;  in subtract_complex()