FLA_Tridiag_UT_cntl_init.c File Reference

(r12600)

Functions
void	FLA_Tridiag_UT_cntl_init ()
void	FLA_Tridiag_UT_cntl_finalize ()
Variables
fla_tridiagut_t *	fla_tridiagut_cntl_fused
fla_tridiagut_t *	fla_tridiagut_cntl_nofus
fla_tridiagut_t *	fla_tridiagut_cntl_plain
fla_blocksize_t *	fla_tridiagut_bsize_leaf

---

Function Documentation

void FLA_Tridiag_UT_cntl_finalize

(

void

)

References FLA_Blocksize_free(), and FLA_Cntl_obj_free().

Referenced by FLA_Cntl_finalize_flamec().

{
    FLA_Cntl_obj_free( fla_tridiagut_cntl_fused );
    FLA_Cntl_obj_free( fla_tridiagut_cntl_nofus );
    FLA_Cntl_obj_free( fla_tridiagut_cntl_plain );

    FLA_Blocksize_free( fla_tridiagut_bsize_leaf );
}

void FLA_Tridiag_UT_cntl_init

(

void

)

References FLA_Blocksize_scale(), FLA_Cntl_tridiagut_obj_create(), and FLA_Query_blocksizes().

Referenced by FLA_Cntl_init_flamec().

{
    // Set blocksizes with default values for conventional storage.
    fla_tridiagut_bsize_leaf = FLA_Query_blocksizes( FLA_DIMENSION_MIN );
    FLA_Blocksize_scale( fla_tridiagut_bsize_leaf, FLA_TRIDIAG_INNER_TO_OUTER_B_RATIO );

    // Create a control tree that uses fused subproblems.
    fla_tridiagut_cntl_fused = FLA_Cntl_tridiagut_obj_create( FLA_FLAT, 
                                                              FLA_BLK_FUS_VARIANT3,
                                                              fla_tridiagut_bsize_leaf );

    // Create a control tree that does not used any fusing.
    fla_tridiagut_cntl_nofus = FLA_Cntl_tridiagut_obj_create( FLA_FLAT, 
                                                              FLA_BLOCKED_VARIANT3,
                                                              fla_tridiagut_bsize_leaf );

    // Create a control tree that does not used any re-arrangement in house.
    fla_tridiagut_cntl_plain = FLA_Cntl_tridiagut_obj_create( FLA_FLAT, 
                                                              FLA_BLOCKED_VARIANT1,
                                                              fla_tridiagut_bsize_leaf );
}

---

Variable Documentation

fla_blocksize_t* fla_tridiagut_bsize_leaf

fla_tridiagut_t* fla_tridiagut_cntl_fused

fla_tridiagut_t* fla_tridiagut_cntl_nofus

fla_tridiagut_t* fla_tridiagut_cntl_plain