Beispiel #1
0
//
// Define object-based interface.
//
void bli_hemm( side_t  side,
               obj_t*  alpha,
               obj_t*  a,
               obj_t*  b,
               obj_t*  beta,
               obj_t*  c )
{
	if ( bli_4m_is_enabled( bli_obj_datatype( *c ) ) )
		bli_hemm4m_entry( side, alpha, a, b, beta, c );
	else
		bli_hemm_entry( side, alpha, a, b, beta, c );
}
Beispiel #2
0
//
// Define object-based interface.
//
void bli_hemm3mh( side_t  side,
                 obj_t*  alpha,
                 obj_t*  a,
                 obj_t*  b,
                 obj_t*  beta,
                 obj_t*  c )
{
    // Since 3mh only applies to the complex domain, we use the regular
    // implementation for real domain cases.
    if ( bli_obj_is_complex( *c ) )
        bli_hemm3mh_entry( side, alpha, a, b, beta, c );
    else
        bli_hemm_entry( side, alpha, a, b, beta, c );
}