FLA_Herk_cntl_init.c File Reference

(r)


Functions

void FLA_Herk_cntl_init ()
void FLA_Herk_cntl_finalize ()

Variables

fla_gemm_tfla_gemm_cntl_blas
fla_herk_tfla_herk_cntl_blas
fla_herk_tfla_herk_cntl_ip
fla_herk_tfla_herk_cntl_op
fla_herk_tfla_herk_cntl_sq
fla_blocksize_tfla_herk_var2_bsize
fla_blocksize_tfla_herk_var5_bsize

Function Documentation

void FLA_Herk_cntl_finalize ( void   ) 

void FLA_Herk_cntl_init ( void   ) 

References FLA_Cntl_herk_obj_create(), and FLA_Query_blocksizes().

Referenced by FLA_Cntl_init_flamec().

00045 {
00046     // Set blocksizes with default values for conventional storage.
00047     fla_herk_var2_bsize = FLA_Query_blocksizes( FLA_DIMENSION_MIN );
00048     fla_herk_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_herk_cntl_blas  = FLA_Cntl_herk_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_herk_cntl_ip    = FLA_Cntl_herk_obj_create( FLA_FLAT,
00059                                                     FLA_BLOCKED_VARIANT5,
00060                                                     fla_herk_var5_bsize,
00061                                                     fla_herk_cntl_blas,
00062                                                     NULL );
00063 
00064     // Create a control tree that assumes A * A' forms an outer panel product.
00065     fla_herk_cntl_op    = FLA_Cntl_herk_obj_create( FLA_FLAT,
00066                                                     FLA_BLOCKED_VARIANT2,
00067                                                     fla_herk_var2_bsize,
00068                                                     fla_herk_cntl_blas,
00069                                                     fla_gemm_cntl_blas );
00070 
00071     // Create a control tree that assumes A is large.
00072     fla_herk_cntl_sq    = FLA_Cntl_herk_obj_create( FLA_FLAT,
00073                                                     FLA_BLOCKED_VARIANT5,
00074                                                     fla_herk_var5_bsize,
00075                                                     fla_herk_cntl_op,
00076                                                     NULL );
00077 }


Variable Documentation


Generated on Mon Jul 6 05:45:51 2009 for libflame by  doxygen 1.5.9