// // 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 ); }
// // 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 ); }