libflame revision_anchor
|
00001 /* 00002 libflame 00003 An object-based infrastructure for developing high-performance 00004 dense linear algebra libraries. 00005 00006 Copyright (C) 2011, The University of Texas 00007 00008 libflame is free software; you can redistribute it and/or modify 00009 it under the terms of the GNU Lesser General Public License as 00010 published by the Free Software Foundation; either version 2.1 of 00011 the License, or (at your option) any later version. 00012 00013 libflame is distributed in the hope that it will be useful, but 00014 WITHOUT ANY WARRANTY; without even the implied warranty of 00015 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 00016 Lesser General Public License for more details. 00017 00018 You should have received a copy of the GNU Lesser General Public 00019 License along with libflame; if you did not receive a copy, see 00020 http://www.gnu.org/licenses/. 00021 00022 For more information, please contact us at flame@cs.utexas.edu or 00023 send mail to: 00024 00025 Field G. Van Zee and/or 00026 Robert A. van de Geijn 00027 The University of Texas at Austin 00028 Department of Computer Sciences 00029 1 University Station C0500 00030 Austin TX 78712 00031 */ 00032 00033 #include "FLAME.h" 00034 00035 FLA_Error FLA_Apply_H2_UT_r_unb_var1( FLA_Obj tau, FLA_Obj u2h, 00036 FLA_Obj a1, FLA_Obj A2 ); 00037 00038 FLA_Error FLA_Apply_H2_UT_r_opt_var1( FLA_Obj tau, FLA_Obj u2h, 00039 FLA_Obj a1, FLA_Obj A2 ); 00040 00041 FLA_Error FLA_Apply_H2_UT_r_ops_var1( int n_u2h_A2, 00042 int m_a1, 00043 float* tau, 00044 float* u2h, int inc_u2h, 00045 float* a1, int inc_a1, 00046 float* A2, int rs_A2, int cs_A2 ); 00047 00048 FLA_Error FLA_Apply_H2_UT_r_opd_var1( int n_u2h_A2, 00049 int m_a1, 00050 double* tau, 00051 double* u2h, int inc_u2h, 00052 double* a1, int inc_a1, 00053 double* A2, int rs_A2, int cs_A2 ); 00054 00055 FLA_Error FLA_Apply_H2_UT_r_opc_var1( int n_u2h_A2, 00056 int m_a1, 00057 scomplex* tau, 00058 scomplex* u2h, int inc_u2h, 00059 scomplex* a1, int inc_a1, 00060 scomplex* A2, int rs_A2, int cs_A2 ); 00061 00062 FLA_Error FLA_Apply_H2_UT_r_opz_var1( int n_u2h_A2, 00063 int m_a1, 00064 dcomplex* tau, 00065 dcomplex* u2h, int inc_u2h, 00066 dcomplex* a1, int inc_a1, 00067 dcomplex* A2, int rs_A2, int cs_A2 ); 00068