/*: Computes singular values and vectors of an mxn matrix (complex version) */ extern int v3p_netlib_csvdc_( v3p_netlib_complex *x, v3p_netlib_integer v3p_netlib_const *ldx, /*!< (IN) matrix, m rows, n columns, stored row-wise */ v3p_netlib_integer v3p_netlib_const *m, v3p_netlib_integer v3p_netlib_const *n, v3p_netlib_complex *singular_values, /*!< (OUT) in descending order of magnitude */ v3p_netlib_complex *errors, /*!< (OUT) superdiagonal of u^T*x*v (normally 0) */ v3p_netlib_complex *u, v3p_netlib_integer v3p_netlib_const *ldu, /*!< (OUT) left singular vectors */ v3p_netlib_complex *v, v3p_netlib_integer v3p_netlib_const *ldv, /*!< (OUT) right singular vectors */ v3p_netlib_complex *work, /*!< (IN/OUT) scratch work area of length m */ v3p_netlib_integer v3p_netlib_const *job, /*!< (IN) 2-digit number. First digit refers to u; 0 = do not compute, 1 = all m; 2 = only min(m,n) */ v3p_netlib_integer *info /*!< (OUT) singular values [info] and up are correct */ );