C++ (Cpp) libblis_test_printf_error Examples

Example #1

File: test_gemm.c Project: flame/blis

void libblis_test_gemm_impl
     (
       iface_t   iface,
       obj_t*    alpha,
       obj_t*    a,
       obj_t*    b,
       obj_t*    beta,
       obj_t*    c
     )
{
	switch ( iface )
	{
		case BLIS_TEST_SEQ_FRONT_END:
#if 0
//bli_printm( "alpha", alpha, "%5.2f", "" );
//bli_printm( "beta", beta, "%5.2f", "" );
bli_printm( "a", a, "%5.2f", "" );
bli_printm( "b", b, "%5.2f", "" );
bli_printm( "c", c, "%5.2f", "" );
#endif
//if ( bli_obj_length( b ) == 16 &&
//     bli_obj_stor3_from_strides( c, a, b ) == BLIS_CRR )
//bli_printm( "c before", c, "%6.3f", "" );
		bli_gemm( alpha, a, b, beta, c );
#if 0
if ( bli_obj_length( c ) == 12 &&
     bli_obj_stor3_from_strides( c, a, b ) == BLIS_RRR )
bli_printm( "c after", c, "%6.3f", "" );
#endif
		break;

		default:
		libblis_test_printf_error( "Invalid interface type.\n" );
	}
}

Example #2

File: test_trsm.c Project: figual/blis

void libblis_test_trsm_impl
     (
       iface_t   iface,
       side_t    side,
       obj_t*    alpha,
       obj_t*    a,
       obj_t*    b
     )
{
	switch ( iface )
	{
		case BLIS_TEST_SEQ_FRONT_END:
#if 0
bli_printm( "a", a, "%5.2f", "" );
bli_printm( "b", b, "%5.2f", "" );
//bli_printm( "alpha", alpha, "%5.2f", "" );
#endif
		bli_trsm( side, alpha, a, b );
#if 0
bli_printm( "b after", b, "%5.2f", "" );
#endif
		break;

		default:
		libblis_test_printf_error( "Invalid interface type.\n" );
	}
}

Example #3

File: test_randm.c Project: tlrmchlsmth/blis-mt

void libblis_test_randm_impl( mt_impl_t impl,
                              obj_t*    x )
{
	switch ( impl )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_randm( x );
		break;

		default:
		libblis_test_printf_error( "Invalid implementation type.\n" );
	}
}

Example #4

File: test_scalm.c Project: jmhautbois/blis

void libblis_test_scalm_impl( iface_t   iface,
                              obj_t*    beta,
                              obj_t*    y )
{
	switch ( iface )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_scalm( beta, y );
		break;

		default:
		libblis_test_printf_error( "Invalid interface type.\n" );
	}
}

Example #5

File: test_normfm.c Project: jmhautbois/blis

void libblis_test_normfm_impl( iface_t   iface,
                               obj_t*    x,
                               obj_t*    norm )
{
	switch ( iface )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_normfm( x, norm );
		break;

		default:
		libblis_test_printf_error( "Invalid interface type.\n" );
	}
}

Example #6

File: test_fnormv.c Project: audiofilter/blis

void libblis_test_fnormv_impl( mt_impl_t impl,
                               obj_t*    x,
                               obj_t*    norm )
{
	switch ( impl )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_fnormv( x, norm );
		break;

		default:
		libblis_test_printf_error( "Invalid implementation type.\n" );
	}
}

Example #7

File: test_syr.c Project: tlrmchlsmth/blis-mt

void libblis_test_syr_impl( mt_impl_t impl,
                            obj_t*    alpha,
                            obj_t*    x,
                            obj_t*    a )
{
	switch ( impl )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_syr( alpha, x, a );
		break;

		default:
		libblis_test_printf_error( "Invalid implementation type.\n" );
	}
}

Example #8

File: test_her.c Project: ShawnLess/blis

void libblis_test_her_impl( iface_t   iface,
                            obj_t*    alpha,
                            obj_t*    x,
                            obj_t*    a )
{
	switch ( iface )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_her( alpha, x, a );
		break;

		default:
		libblis_test_printf_error( "Invalid interface type.\n" );
	}
}

Example #9

File: test_axpyf.c Project: elemental/blis

void libblis_test_axpyf_impl( iface_t   iface,
                              obj_t*    alpha,
                              obj_t*    a,
                              obj_t*    x,
                              obj_t*    y )
{
	switch ( iface )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_axpyf_kernel( alpha, a, x, y );
		break;

		default:
		libblis_test_printf_error( "Invalid interface type.\n" );
	}
}

Example #10

File: test_herk.c Project: audiofilter/blis

void libblis_test_herk_impl( mt_impl_t impl,
                             obj_t*    alpha,
                             obj_t*    a,
                             obj_t*    beta,
                             obj_t*    c )
{
	switch ( impl )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_herk( alpha, a, beta, c );
		break;

		default:
		libblis_test_printf_error( "Invalid implementation type.\n" );
	}
}

Example #11

File: test_randv.c Project: jeffhammond/blis

void libblis_test_randv_impl
     (
       iface_t   iface,
       obj_t*    x
     )
{
	switch ( iface )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_randv( x );
		break;

		default:
		libblis_test_printf_error( "Invalid interface type.\n" );
	}
}

Example #12

File: test_axpy2v.c Project: audiofilter/blis

void libblis_test_axpy2v_impl( mt_impl_t impl,
                               obj_t*    alpha1,
                               obj_t*    alpha2,
                               obj_t*    x,
                               obj_t*    y,
                               obj_t*    z )
{
	switch ( impl )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_axpy2v_ker( alpha1, alpha2, x, y, z );
		break;

		default:
		libblis_test_printf_error( "Invalid implementation type.\n" );
	}
}

Example #13

File: test_axpy2v.c Project: ShawnLess/blis

void libblis_test_axpy2v_impl( iface_t   iface,
                               obj_t*    alpha1,
                               obj_t*    alpha2,
                               obj_t*    x,
                               obj_t*    y,
                               obj_t*    z,
                               cntx_t*   cntx )
{
	switch ( iface )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_axpy2v_ex( alpha1, alpha2, x, y, z, cntx );
		break;

		default:
		libblis_test_printf_error( "Invalid interface type.\n" );
	}
}

Example #14

File: test_dotaxpyv.c Project: jmhautbois/blis

void libblis_test_dotaxpyv_impl( iface_t   iface,
                                 obj_t*    alpha,
                                 obj_t*    xt,
                                 obj_t*    x,
                                 obj_t*    y,
                                 obj_t*    rho,
                                 obj_t*    z )
{
	switch ( iface )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_dotaxpyv_kernel( alpha, xt, x, y, rho, z );
		break;

		default:
		libblis_test_printf_error( "Invalid interface type.\n" );
	}
}

Example #15

File: test_gemmtrsm_ukr.c Project: audiofilter/blis

void libblis_test_gemmtrsm_ukr_impl( mt_impl_t impl,
                                     side_t    side,
                                     obj_t*    alpha,
                                     obj_t*    a1x,
                                     obj_t*    a11,
                                     obj_t*    bx1,
                                     obj_t*    b11,
                                     obj_t*    c11 )
{
	switch ( impl )
	{
		case BLIS_TEST_SEQ_UKERNEL:
		bli_gemmtrsm_ukr( alpha, a1x, a11, bx1, b11, c11 );
		break;

		default:
		libblis_test_printf_error( "Invalid implementation type.\n" );
	}
}

Example #16

File: test_gemm.c Project: ipolkovn/blis

void libblis_test_gemm_impl( iface_t   iface,
                             obj_t*    alpha,
                             obj_t*    a,
                             obj_t*    b,
                             obj_t*    beta,
                             obj_t*    c )
{
	switch ( iface )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_gemm( alpha, a, b, beta, c );
		//bli_gemm4m( alpha, a, b, beta, c );
		//bli_gemm3m( alpha, a, b, beta, c );
		break;

		default:
		libblis_test_printf_error( "Invalid interface type.\n" );
	}
}

Example #17

File: test_trsm.c Project: santanu-thangaraj/blis

void libblis_test_trsm_impl
     (
       iface_t   iface,
       side_t    side,
       obj_t*    alpha,
       obj_t*    a,
       obj_t*    b
     )
{
	switch ( iface )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_trsm( side, alpha, a, b );
		//bli_trsm4m( side, alpha, a, b );
		//bli_trsm3m( side, alpha, a, b );
		break;

		default:
		libblis_test_printf_error( "Invalid interface type.\n" );
	}
}

Example #18

File: test_dotxaxpyf.c Project: santanu-thangaraj/blis

void libblis_test_dotxaxpyf_impl
     (
       iface_t   iface,
       obj_t*    alpha,
       obj_t*    at,
       obj_t*    a,
       obj_t*    w,
       obj_t*    x,
       obj_t*    beta,
       obj_t*    y,
       obj_t*    z,
       cntx_t*   cntx
     )
{
	switch ( iface )
	{
		case BLIS_TEST_SEQ_FRONT_END:
		bli_dotxaxpyf_ex( alpha, at, a, w, x, beta, y, z, cntx );
		break;

		default:
		libblis_test_printf_error( "Invalid interface type.\n" );
	}
}