1 /*
2
3 Copyright (C) 2014, The University of Texas at Austin
4
5 This file is part of libflame and is available under the 3-Clause
6 BSD license, which can be found in the LICENSE file at the top-level
7 directory, or at http://opensource.org/licenses/BSD-3-Clause
8
9 */
10
11 #include "FLAME.h"
12
13 extern fla_apq2ut_t* fla_apq2ut_cntl_leaf;
14
FLA_Apply_Q2_UT_lnfc(FLA_Obj D,FLA_Obj T,FLA_Obj W,FLA_Obj C,FLA_Obj E,fla_apq2ut_t * cntl)15 FLA_Error FLA_Apply_Q2_UT_lnfc( FLA_Obj D, FLA_Obj T, FLA_Obj W, FLA_Obj C,
16 FLA_Obj E, fla_apq2ut_t* cntl )
17 {
18 FLA_Error r_val = FLA_SUCCESS;
19
20 if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT1 )
21 {
22 r_val = FLA_Apply_Q2_UT_lnfc_blk_var1( D, T, W, C, E, cntl );
23 }
24 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT2 )
25 {
26 r_val = FLA_Apply_Q2_UT_lnfc_blk_var2( D, T, W, C, E, cntl );
27 }
28 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT3 )
29 {
30 r_val = FLA_Apply_Q2_UT_lnfc_blk_var3( D, T, W, C, E, cntl );
31 }
32 else
33 {
34 FLA_Check_error_code( FLA_NOT_YET_IMPLEMENTED );
35 }
36
37 return r_val;
38 }
39
40