(r)

Functions
void	FLA_Bidiag_UT_cntl_init ()

void	FLA_Bidiag_UT_cntl_finalize ()

Variables
fla_bidiagut_t *	fla_bidiagut_cntl_fused

fla_bidiagut_t *	fla_bidiagut_cntl_nofus

fla_bidiagut_t *	fla_bidiagut_cntl_plain

fla_blocksize_t *	fla_bidiagut_bsize_leaf

Function Documentation

◆ FLA_Bidiag_UT_cntl_finalize()

void FLA_Bidiag_UT_cntl_finalize ( void )

 {
     FLA_Cntl_obj_free( fla_bidiagut_cntl_fused );
     FLA_Cntl_obj_free( fla_bidiagut_cntl_nofus );
     FLA_Cntl_obj_free( fla_bidiagut_cntl_plain );
  
     FLA_Blocksize_free( fla_bidiagut_bsize_leaf );
 }

References fla_bidiagut_bsize_leaf, fla_bidiagut_cntl_fused, fla_bidiagut_cntl_nofus, fla_bidiagut_cntl_plain, FLA_Blocksize_free(), and FLA_Cntl_obj_free().

Referenced by FLA_Cntl_finalize_flamec().

◆ FLA_Bidiag_UT_cntl_init()

void FLA_Bidiag_UT_cntl_init ( void )

 {
     // Set blocksizes with default values for conventional storage.
     fla_bidiagut_bsize_leaf = FLA_Query_blocksizes( FLA_DIMENSION_MIN );
     FLA_Blocksize_scale( fla_bidiagut_bsize_leaf, FLA_BIDIAG_INNER_TO_OUTER_B_RATIO );
  
     // Create a control tree that uses fused subproblems.
     fla_bidiagut_cntl_fused = FLA_Cntl_bidiagut_obj_create( FLA_FLAT, 
                                                             FLA_BLK_FUS_VARIANT4,
                                                             fla_bidiagut_bsize_leaf );
  
     // Create a control tree that does not used any fusing.
     fla_bidiagut_cntl_nofus = FLA_Cntl_bidiagut_obj_create( FLA_FLAT, 
                                                             FLA_BLOCKED_VARIANT4,
                                                             fla_bidiagut_bsize_leaf );
  
     // Create a control tree that reflects the basic algorithm.
     fla_bidiagut_cntl_plain = FLA_Cntl_bidiagut_obj_create( FLA_FLAT, 
                                                             FLA_BLOCKED_VARIANT1,
                                                             fla_bidiagut_bsize_leaf );
 }