00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033 float FLA_random_float( void );
00034 double FLA_random_double( void );
00035 scomplex FLA_random_scomplex( void );
00036 dcomplex FLA_random_dcomplex( void );
00037
00038 FLA_Error FLA_Absolute_square( FLA_Obj alpha );
00039 double FLA_Clock( void );
00040 FLA_Error FLA_Conjugate( FLA_Obj A );
00041 FLA_Error FLA_Conjugate_r( FLA_Uplo uplo, FLA_Obj A );
00042 FLA_Error FLA_Hermitianize( FLA_Uplo uplo, FLA_Obj A );
00043 FLA_Error FLA_Invert( FLA_Obj alpha );
00044 FLA_Error FLA_Max_abs_value( FLA_Obj A, FLA_Obj amax );
00045 double FLA_Max_elemwise_diff( FLA_Obj A, FLA_Obj B );
00046 FLA_Error FLA_FLA_Mult_add( FLA_Obj alpha, FLA_Obj beta, FLA_Obj gamma );
00047 FLA_Error FLA_Negate( FLA_Obj x );
00048 FLA_Error FLA_Norm1( FLA_Obj A, FLA_Obj norm );
00049 FLA_Error FLA_Norm_inf( FLA_Obj A, FLA_Obj norm );
00050 FLA_Error FLA_Random_matrix( FLA_Obj A );
00051 FLA_Error FLA_Random_herm_matrix( FLA_Uplo uplo, FLA_Obj A );
00052 FLA_Error FLA_Random_spd_matrix( FLA_Uplo uplo, FLA_Obj A );
00053 FLA_Error FLA_Random_tri_matrix( FLA_Uplo uplo, FLA_Diag diag, FLA_Obj A );
00054 FLA_Error FLA_Shift_pivots_to_check( FLA_Pivot_type ptype, FLA_Obj ipiv );
00055 FLA_Error FLA_Sqrt( FLA_Obj alpha );
00056 FLA_Error FLA_Symmetrize( FLA_Uplo uplo, FLA_Obj A );
00057 FLA_Error FLA_Triangularize( FLA_Uplo uplo, FLA_Diag diag, FLA_Obj A );
00058 FLA_Error FLA_Transpose( FLA_Obj A );
00059
00060 void FLA_F2C( fla_absolute_square_f ) ( F_INT *alpha, F_INT *IERROR );
00061 double FLA_F2C( fla_clock_f ) ( void );
00062 void FLA_F2C( fla_conjugate_f ) ( F_INT *A, F_INT *IERROR );
00063 void FLA_F2C( fla_conjugate_r_f ) ( F_INT *uplo, F_INT *A, F_INT *IERROR );
00064 void FLA_F2C( fla_hermitianize_f ) ( F_INT *uplo, F_INT *A, F_INT *IERROR );
00065 void FLA_F2C( fla_invert_f ) ( F_INT *alpha, F_INT *IERROR );
00066 void FLA_F2C( fla_max_abs_value_f ) ( F_INT *A, F_INT *amax, F_INT *IERROR );
00067 double FLA_F2C( fla_max_elemwise_diff_f ) ( F_INT *A, F_INT *B );
00068 void FLA_F2C( fla_mult_add_f ) ( F_INT *alpha, F_INT *beta, F_INT *gamma, F_INT *IERROR );
00069 void FLA_F2C( fla_negate_f ) ( F_INT *x, F_INT *IERROR );
00070 void FLA_F2C( fla_norm1_f ) ( F_INT *A, F_INT *norm, F_INT *IERROR );
00071 void FLA_F2C( fla_norm_inf_f ) ( F_INT *A, F_INT *norm, F_INT *IERROR );
00072 void FLA_F2C( fla_random_matrix_f ) ( F_INT *A, F_INT *IERROR );
00073 void FLA_F2C( fla_random_herm_matrix_f ) ( F_INT *uplo, F_INT *A, F_INT *IERROR );
00074 void FLA_F2C( fla_random_spd_matrix_f ) ( F_INT *uplo, F_INT *A, F_INT *IERROR );
00075 void FLA_F2C( fla_random_tri_matrix_f ) ( F_INT *uplo, F_INT* diag, F_INT *A, F_INT *IERROR );
00076 void FLA_F2C( fla_sqrt_f ) ( F_INT *alpha, F_INT *IERROR );
00077 void FLA_F2C( fla_symmetrize_f ) ( F_INT *uplo, F_INT *A, F_INT *IERROR );
00078 void FLA_F2C( fla_triangularize_f ) ( F_INT *uplo, F_INT *diag, F_INT *A, F_INT *IERROR );
00079 void FLA_F2C( fla_transpose_f ) ( F_INT *A, F_INT *IERROR );
00080
00081
00082
00083 FLA_Error FLA_Absolute_square_check( FLA_Obj alpha );
00084 FLA_Error FLA_Conjugate_check( FLA_Obj A );
00085 FLA_Error FLA_Conjugate_r_check( FLA_Uplo uplo, FLA_Obj A );
00086 FLA_Error FLA_Hermitianize_check( FLA_Uplo uplo, FLA_Obj A );
00087 FLA_Error FLA_Invert_check( FLA_Obj alpha );
00088 FLA_Error FLA_Max_abs_value_check( FLA_Obj A, FLA_Obj amax );
00089 FLA_Error FLA_Max_elemwise_diff_check( FLA_Obj A, FLA_Obj B );
00090 FLA_Error FLA_Mult_add_check( FLA_Obj alpha, FLA_Obj beta, FLA_Obj gamma );
00091 FLA_Error FLA_Negate_check( FLA_Obj x );
00092 FLA_Error FLA_Norm1_check( FLA_Obj A, FLA_Obj norm );
00093 FLA_Error FLA_Norm_inf_check( FLA_Obj A, FLA_Obj norm );
00094 FLA_Error FLA_Random_matrix_check( FLA_Obj A );
00095 FLA_Error FLA_Random_herm_matrix_check( FLA_Uplo uplo, FLA_Obj A );
00096 FLA_Error FLA_Random_spd_matrix_check( FLA_Uplo uplo, FLA_Obj A );
00097 FLA_Error FLA_Random_tri_matrix_check( FLA_Uplo uplo, FLA_Diag diag, FLA_Obj A );
00098 FLA_Error FLA_Sqrt_check( FLA_Obj alpha );
00099 FLA_Error FLA_Symmetrize_check( FLA_Uplo uplo, FLA_Obj A );
00100 FLA_Error FLA_Triangularize_check( FLA_Uplo uplo, FLA_Diag diag, FLA_Obj A );
00101 FLA_Error FLA_Transpose_check( FLA_Obj A );
00102
00103
00104
00105 FLA_Error FLA_Transpose_blk_var1( FLA_Obj A, fla_tpose_t* cntl );
00106 FLA_Error FLA_Transpose_blk_var2( FLA_Obj A, fla_tpose_t* cntl );
00107 FLA_Error FLA_Transpose_unb_var1( FLA_Obj A );
00108 FLA_Error FLA_Transpose_unb_var2( FLA_Obj A );
00109 FLA_Error FLA_Swap_t_blk_var1( FLA_Obj A, FLA_Obj B, fla_swap_t* cntl );
00110 FLA_Error FLA_Swap_t_blk_var2( FLA_Obj A, FLA_Obj B, fla_swap_t* cntl );
00111