libflame revision_anchor
|
Functions | |
FLA_Error | FLA_Eig_gest (FLA_Inv inv, FLA_Uplo uplo, FLA_Obj A, FLA_Obj B) |
Variables | |
fla_eig_gest_t * | fla_eig_gest_ix_cntl |
fla_eig_gest_t * | fla_eig_gest_nx_cntl |
References FLA_Check_error_level(), FLA_Eig_gest_check(), FLA_Eig_gest_internal(), FLA_Obj_create_conf_to(), and FLA_Obj_free().
{ FLA_Obj Y; FLA_Error r_val; // Check parameters. if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING ) FLA_Eig_gest_check( inv, uplo, A, B ); FLA_Obj_create_conf_to( FLA_NO_TRANSPOSE, A, &Y ); // Invoke FLA_Eig_gest_internal() with the appropriate control tree. if ( inv == FLA_INVERSE ) r_val = FLA_Eig_gest_internal( inv, uplo, A, Y, B, fla_eig_gest_ix_cntl ); else r_val = FLA_Eig_gest_internal( inv, uplo, A, Y, B, fla_eig_gest_nx_cntl ); FLA_Obj_free( &Y ); return r_val; }