// // Complex functions. // complex *c8mat_expm1 ( int n, complex a[] ); // // Real functions. // double *r8mat_expm1 ( int n, double a[] ); double *r8mat_expm2 ( int n, double a[] ); double *r8mat_expm3 ( int n, double a[] );