Functions | |
void | FLA_Syrk_cntl_init () |
void | FLA_Syrk_cntl_finalize () |
Variables | |
fla_gemm_t * | fla_gemm_cntl_blas |
fla_syrk_t * | fla_syrk_cntl_blas |
fla_syrk_t * | fla_syrk_cntl_ip |
fla_syrk_t * | fla_syrk_cntl_op |
fla_syrk_t * | fla_syrk_cntl_sq |
fla_blocksize_t * | fla_syrk_var2_bsize |
fla_blocksize_t * | fla_syrk_var5_bsize |
void FLA_Syrk_cntl_finalize | ( | void | ) |
References FLA_Blocksize_free(), and FLA_Cntl_obj_free().
Referenced by FLA_Cntl_finalize_flamec().
00080 { 00081 FLA_Cntl_obj_free( fla_syrk_cntl_blas ); 00082 00083 FLA_Cntl_obj_free( fla_syrk_cntl_ip ); 00084 FLA_Cntl_obj_free( fla_syrk_cntl_op ); 00085 FLA_Cntl_obj_free( fla_syrk_cntl_sq ); 00086 00087 FLA_Blocksize_free( fla_syrk_var2_bsize ); 00088 FLA_Blocksize_free( fla_syrk_var5_bsize ); 00089 }
void FLA_Syrk_cntl_init | ( | void | ) |
References FLA_Cntl_syrk_obj_create(), and FLA_Query_blocksizes().
Referenced by FLA_Cntl_init_flamec().
00045 { 00046 // Set blocksizes with default values for conventional storage. 00047 fla_syrk_var2_bsize = FLA_Query_blocksizes( FLA_DIMENSION_MIN ); 00048 fla_syrk_var5_bsize = FLA_Query_blocksizes( FLA_DIMENSION_MIN ); 00049 00050 // Create a control tree that assumes A is a b x b block. 00051 fla_syrk_cntl_blas = FLA_Cntl_syrk_obj_create( FLA_FLAT, 00052 FLA_SUBPROBLEM, 00053 NULL, 00054 NULL, 00055 NULL ); 00056 00057 // Create a control tree that assumes A * A' forms an inner panel product. 00058 fla_syrk_cntl_ip = FLA_Cntl_syrk_obj_create( FLA_FLAT, 00059 FLA_BLOCKED_VARIANT5, 00060 fla_syrk_var5_bsize, 00061 fla_syrk_cntl_blas, 00062 NULL ); 00063 00064 // Create a control tree that assumes A * A' forms an outer panel product. 00065 fla_syrk_cntl_op = FLA_Cntl_syrk_obj_create( FLA_FLAT, 00066 FLA_BLOCKED_VARIANT2, 00067 fla_syrk_var2_bsize, 00068 fla_syrk_cntl_blas, 00069 fla_gemm_cntl_blas ); 00070 00071 // Create a control tree that assumes A is large. 00072 fla_syrk_cntl_sq = FLA_Cntl_syrk_obj_create( FLA_FLAT, 00073 FLA_BLOCKED_VARIANT5, 00074 fla_syrk_var5_bsize, 00075 fla_syrk_cntl_op, 00076 NULL ); 00077 }