libflame
revision_anchor
|
00001 /* 00002 00003 Copyright (C) 2014, The University of Texas at Austin 00004 00005 This file is part of libflame and is available under the 3-Clause 00006 BSD license, which can be found in the LICENSE file at the top-level 00007 directory, or at http://opensource.org/licenses/BSD-3-Clause 00008 00009 */ 00010 00011 FLA_Error FLA_Hess_UT_blk_var1( FLA_Obj A, FLA_Obj T ); 00012 FLA_Error FLA_Hess_UT_unb_var1( FLA_Obj A, FLA_Obj T ); 00013 FLA_Error FLA_Hess_UT_step_unb_var1( FLA_Obj A, FLA_Obj T ); 00014 00015 FLA_Error FLA_Hess_UT_blk_var2( FLA_Obj A, FLA_Obj T ); 00016 FLA_Error FLA_Hess_UT_blf_var2( FLA_Obj A, FLA_Obj T ); 00017 FLA_Error FLA_Hess_UT_unb_var2( FLA_Obj A, FLA_Obj T ); 00018 FLA_Error FLA_Hess_UT_step_unb_var2( FLA_Obj A, FLA_Obj T ); 00019 00020 FLA_Error FLA_Hess_UT_blk_var3( FLA_Obj A, FLA_Obj T ); 00021 FLA_Error FLA_Hess_UT_blf_var3( FLA_Obj A, FLA_Obj T ); 00022 FLA_Error FLA_Hess_UT_unb_var3( FLA_Obj A, FLA_Obj T ); 00023 FLA_Error FLA_Hess_UT_step_unb_var3( FLA_Obj A, FLA_Obj T ); 00024 00025 FLA_Error FLA_Hess_UT_blk_var4( FLA_Obj A, FLA_Obj T ); 00026 FLA_Error FLA_Hess_UT_blf_var4( FLA_Obj A, FLA_Obj T ); 00027 FLA_Error FLA_Hess_UT_unb_var4( FLA_Obj A, FLA_Obj T ); 00028 FLA_Error FLA_Hess_UT_step_unb_var4( FLA_Obj A, FLA_Obj Y, FLA_Obj Z, FLA_Obj T ); 00029 00030 FLA_Error FLA_Hess_UT_blk_var5( FLA_Obj A, FLA_Obj T ); 00031 FLA_Error FLA_Hess_UT_unb_var5( FLA_Obj A, FLA_Obj T ); 00032 FLA_Error FLA_Hess_UT_step_unb_var5( FLA_Obj A, FLA_Obj U, FLA_Obj Z, FLA_Obj T ); 00033 00034 00035 FLA_Error FLA_Hess_UT_opt_var1( FLA_Obj A, FLA_Obj T ); 00036 FLA_Error FLA_Hess_UT_step_opt_var1( FLA_Obj A, FLA_Obj T ); 00037 FLA_Error FLA_Hess_UT_step_ops_var1( int m_A, 00038 int m_T, 00039 float* buff_A, int rs_A, int cs_A, 00040 float* buff_T, int rs_T, int cs_T ); 00041 FLA_Error FLA_Hess_UT_step_opd_var1( int m_A, 00042 int m_T, 00043 double* buff_A, int rs_A, int cs_A, 00044 double* buff_T, int rs_T, int cs_T ); 00045 FLA_Error FLA_Hess_UT_step_opc_var1( int m_A, 00046 int m_T, 00047 scomplex* buff_A, int rs_A, int cs_A, 00048 scomplex* buff_T, int rs_T, int cs_T ); 00049 FLA_Error FLA_Hess_UT_step_opz_var1( int m_A, 00050 int m_T, 00051 dcomplex* buff_A, int rs_A, int cs_A, 00052 dcomplex* buff_T, int rs_T, int cs_T ); 00053 00054 00055 FLA_Error FLA_Hess_UT_opt_var2( FLA_Obj A, FLA_Obj T ); 00056 FLA_Error FLA_Hess_UT_step_opt_var2( FLA_Obj A, FLA_Obj T ); 00057 FLA_Error FLA_Hess_UT_step_ops_var2( int m_A, 00058 int m_T, 00059 float* buff_A, int rs_A, int cs_A, 00060 float* buff_T, int rs_T, int cs_T ); 00061 FLA_Error FLA_Hess_UT_step_opd_var2( int m_A, 00062 int m_T, 00063 double* buff_A, int rs_A, int cs_A, 00064 double* buff_T, int rs_T, int cs_T ); 00065 FLA_Error FLA_Hess_UT_step_opc_var2( int m_A, 00066 int m_T, 00067 scomplex* buff_A, int rs_A, int cs_A, 00068 scomplex* buff_T, int rs_T, int cs_T ); 00069 FLA_Error FLA_Hess_UT_step_opz_var2( int m_A, 00070 int m_T, 00071 dcomplex* buff_A, int rs_A, int cs_A, 00072 dcomplex* buff_T, int rs_T, int cs_T ); 00073 00074 00075 FLA_Error FLA_Hess_UT_opt_var3( FLA_Obj A, FLA_Obj T ); 00076 FLA_Error FLA_Hess_UT_step_opt_var3( FLA_Obj A, FLA_Obj T ); 00077 FLA_Error FLA_Hess_UT_step_ops_var3( int m_A, 00078 int m_T, 00079 float* buff_A, int rs_A, int cs_A, 00080 float* buff_T, int rs_T, int cs_T ); 00081 FLA_Error FLA_Hess_UT_step_opd_var3( int m_A, 00082 int m_T, 00083 double* buff_A, int rs_A, int cs_A, 00084 double* buff_T, int rs_T, int cs_T ); 00085 FLA_Error FLA_Hess_UT_step_opc_var3( int m_A, 00086 int m_T, 00087 scomplex* buff_A, int rs_A, int cs_A, 00088 scomplex* buff_T, int rs_T, int cs_T ); 00089 FLA_Error FLA_Hess_UT_step_opz_var3( int m_A, 00090 int m_T, 00091 dcomplex* buff_A, int rs_A, int cs_A, 00092 dcomplex* buff_T, int rs_T, int cs_T ); 00093 00094 00095 FLA_Error FLA_Hess_UT_opt_var4( FLA_Obj A, FLA_Obj T ); 00096 FLA_Error FLA_Hess_UT_step_opt_var4( FLA_Obj A, FLA_Obj Y, FLA_Obj Z, FLA_Obj T ); 00097 FLA_Error FLA_Hess_UT_step_ops_var4( int m_A, 00098 int m_T, 00099 float* buff_A, int rs_A, int cs_A, 00100 float* buff_Y, int rs_Y, int cs_Y, 00101 float* buff_Z, int rs_Z, int cs_Z, 00102 float* buff_T, int rs_T, int cs_T ); 00103 FLA_Error FLA_Hess_UT_step_opd_var4( int m_A, 00104 int m_T, 00105 double* buff_A, int rs_A, int cs_A, 00106 double* buff_Y, int rs_Y, int cs_Y, 00107 double* buff_Z, int rs_Z, int cs_Z, 00108 double* buff_T, int rs_T, int cs_T ); 00109 FLA_Error FLA_Hess_UT_step_opc_var4( int m_A, 00110 int m_T, 00111 scomplex* buff_A, int rs_A, int cs_A, 00112 scomplex* buff_Y, int rs_Y, int cs_Y, 00113 scomplex* buff_Z, int rs_Z, int cs_Z, 00114 scomplex* buff_T, int rs_T, int cs_T ); 00115 FLA_Error FLA_Hess_UT_step_opz_var4( int m_A, 00116 int m_T, 00117 dcomplex* buff_A, int rs_A, int cs_A, 00118 dcomplex* buff_Y, int rs_Y, int cs_Y, 00119 dcomplex* buff_Z, int rs_Z, int cs_Z, 00120 dcomplex* buff_T, int rs_T, int cs_T ); 00121 00122 00123 FLA_Error FLA_Hess_UT_opt_var5( FLA_Obj A, FLA_Obj T ); 00124 FLA_Error FLA_Hess_UT_step_opt_var5( FLA_Obj A, FLA_Obj U, FLA_Obj Z, FLA_Obj T ); 00125 FLA_Error FLA_Hess_UT_step_ops_var5( int m_A, 00126 int m_T, 00127 float* buff_A, int rs_A, int cs_A, 00128 float* buff_U, int rs_U, int cs_U, 00129 float* buff_Z, int rs_Z, int cs_Z, 00130 float* buff_T, int rs_T, int cs_T ); 00131 FLA_Error FLA_Hess_UT_step_opd_var5( int m_A, 00132 int m_T, 00133 double* buff_A, int rs_A, int cs_A, 00134 double* buff_U, int rs_U, int cs_U, 00135 double* buff_Z, int rs_Z, int cs_Z, 00136 double* buff_T, int rs_T, int cs_T ); 00137 FLA_Error FLA_Hess_UT_step_opc_var5( int m_A, 00138 int m_T, 00139 scomplex* buff_A, int rs_A, int cs_A, 00140 scomplex* buff_U, int rs_U, int cs_U, 00141 scomplex* buff_Z, int rs_Z, int cs_Z, 00142 scomplex* buff_T, int rs_T, int cs_T ); 00143 FLA_Error FLA_Hess_UT_step_opz_var5( int m_A, 00144 int m_T, 00145 dcomplex* buff_A, int rs_A, int cs_A, 00146 dcomplex* buff_U, int rs_U, int cs_U, 00147 dcomplex* buff_Z, int rs_Z, int cs_Z, 00148 dcomplex* buff_T, int rs_T, int cs_T ); 00149 00150 00151 FLA_Error FLA_Hess_UT_ofu_var1( FLA_Obj A, FLA_Obj T ); 00152 FLA_Error FLA_Hess_UT_step_ofu_var1( FLA_Obj A, FLA_Obj T ); 00153 FLA_Error FLA_Hess_UT_step_ofs_var1( int m_A, 00154 int m_T, 00155 float* buff_A, int rs_A, int cs_A, 00156 float* buff_T, int rs_T, int cs_T ); 00157 FLA_Error FLA_Hess_UT_step_ofd_var1( int m_A, 00158 int m_T, 00159 double* buff_A, int rs_A, int cs_A, 00160 double* buff_T, int rs_T, int cs_T ); 00161 FLA_Error FLA_Hess_UT_step_ofc_var1( int m_A, 00162 int m_T, 00163 scomplex* buff_A, int rs_A, int cs_A, 00164 scomplex* buff_T, int rs_T, int cs_T ); 00165 FLA_Error FLA_Hess_UT_step_ofz_var1( int m_A, 00166 int m_T, 00167 dcomplex* buff_A, int rs_A, int cs_A, 00168 dcomplex* buff_T, int rs_T, int cs_T ); 00169 00170 00171 FLA_Error FLA_Hess_UT_ofu_var2( FLA_Obj A, FLA_Obj T ); 00172 FLA_Error FLA_Hess_UT_step_ofu_var2( FLA_Obj A, FLA_Obj T ); 00173 FLA_Error FLA_Hess_UT_step_ofs_var2( int m_A, 00174 int m_T, 00175 float* buff_A, int rs_A, int cs_A, 00176 float* buff_T, int rs_T, int cs_T ); 00177 FLA_Error FLA_Hess_UT_step_ofd_var2( int m_A, 00178 int m_T, 00179 double* buff_A, int rs_A, int cs_A, 00180 double* buff_T, int rs_T, int cs_T ); 00181 FLA_Error FLA_Hess_UT_step_ofc_var2( int m_A, 00182 int m_T, 00183 scomplex* buff_A, int rs_A, int cs_A, 00184 scomplex* buff_T, int rs_T, int cs_T ); 00185 FLA_Error FLA_Hess_UT_step_ofz_var2( int m_A, 00186 int m_T, 00187 dcomplex* buff_A, int rs_A, int cs_A, 00188 dcomplex* buff_T, int rs_T, int cs_T ); 00189 00190 00191 FLA_Error FLA_Hess_UT_ofu_var3( FLA_Obj A, FLA_Obj T ); 00192 FLA_Error FLA_Hess_UT_step_ofu_var3( FLA_Obj A, FLA_Obj T ); 00193 FLA_Error FLA_Hess_UT_step_ofs_var3( int m_A, 00194 int m_T, 00195 float* buff_A, int rs_A, int cs_A, 00196 float* buff_T, int rs_T, int cs_T ); 00197 FLA_Error FLA_Hess_UT_step_ofd_var3( int m_A, 00198 int m_T, 00199 double* buff_A, int rs_A, int cs_A, 00200 double* buff_T, int rs_T, int cs_T ); 00201 FLA_Error FLA_Hess_UT_step_ofc_var3( int m_A, 00202 int m_T, 00203 scomplex* buff_A, int rs_A, int cs_A, 00204 scomplex* buff_T, int rs_T, int cs_T ); 00205 FLA_Error FLA_Hess_UT_step_ofz_var3( int m_A, 00206 int m_T, 00207 dcomplex* buff_A, int rs_A, int cs_A, 00208 dcomplex* buff_T, int rs_T, int cs_T ); 00209 00210 00211 FLA_Error FLA_Hess_UT_ofu_var4( FLA_Obj A, FLA_Obj T ); 00212 FLA_Error FLA_Hess_UT_step_ofu_var4( FLA_Obj A, FLA_Obj Y, FLA_Obj Z, FLA_Obj T ); 00213 FLA_Error FLA_Hess_UT_step_ofs_var4( int m_A, 00214 int m_T, 00215 float* buff_A, int rs_A, int cs_A, 00216 float* buff_Y, int rs_Y, int cs_Y, 00217 float* buff_Z, int rs_Z, int cs_Z, 00218 float* buff_T, int rs_T, int cs_T ); 00219 FLA_Error FLA_Hess_UT_step_ofd_var4( int m_A, 00220 int m_T, 00221 double* buff_A, int rs_A, int cs_A, 00222 double* buff_Y, int rs_Y, int cs_Y, 00223 double* buff_Z, int rs_Z, int cs_Z, 00224 double* buff_T, int rs_T, int cs_T ); 00225 FLA_Error FLA_Hess_UT_step_ofc_var4( int m_A, 00226 int m_T, 00227 scomplex* buff_A, int rs_A, int cs_A, 00228 scomplex* buff_Y, int rs_Y, int cs_Y, 00229 scomplex* buff_Z, int rs_Z, int cs_Z, 00230 scomplex* buff_T, int rs_T, int cs_T ); 00231 FLA_Error FLA_Hess_UT_step_ofz_var4( int m_A, 00232 int m_T, 00233 dcomplex* buff_A, int rs_A, int cs_A, 00234 dcomplex* buff_Y, int rs_Y, int cs_Y, 00235 dcomplex* buff_Z, int rs_Z, int cs_Z, 00236 dcomplex* buff_T, int rs_T, int cs_T ); 00237 00238 00239 // --- Fused operations -------------------------------------------------------- 00240 00241 FLA_Error FLA_Fused_Ahx_Ax_ops_var1( int m_A, 00242 int n_A, 00243 float* buff_A, int rs_A, int cs_A, 00244 float* buff_x, int inc_x, 00245 float* buff_v, int inc_v, 00246 float* buff_w, int inc_w ); 00247 FLA_Error FLA_Fused_Ahx_Ax_opd_var1( int m_A, 00248 int n_A, 00249 double* buff_A, int rs_A, int cs_A, 00250 double* buff_x, int inc_x, 00251 double* buff_v, int inc_v, 00252 double* buff_w, int inc_w ); 00253 FLA_Error FLA_Fused_Ahx_Ax_opc_var1( int m_A, 00254 int n_A, 00255 scomplex* buff_A, int rs_A, int cs_A, 00256 scomplex* buff_x, int inc_x, 00257 scomplex* buff_v, int inc_v, 00258 scomplex* buff_w, int inc_w ); 00259 FLA_Error FLA_Fused_Ahx_Ax_opz_var1( int m_A, 00260 int n_A, 00261 dcomplex* buff_A, int rs_A, int cs_A, 00262 dcomplex* buff_x, int inc_x, 00263 dcomplex* buff_v, int inc_v, 00264 dcomplex* buff_w, int inc_w ); 00265 00266 00267 FLA_Error FLA_Fused_Gerc2_Ahx_Ax_ops_var1( int m_A, 00268 int n_A, 00269 float* buff_alpha, 00270 float* buff_u, int inc_u, 00271 float* buff_y, int inc_y, 00272 float* buff_z, int inc_z, 00273 float* buff_A, int rs_A, int cs_A, 00274 float* buff_x, int inc_x, 00275 float* buff_v, int inc_v, 00276 float* buff_w, int inc_w ); 00277 FLA_Error FLA_Fused_Gerc2_Ahx_Ax_opd_var1( int m_A, 00278 int n_A, 00279 double* buff_alpha, 00280 double* buff_u, int inc_u, 00281 double* buff_y, int inc_y, 00282 double* buff_z, int inc_z, 00283 double* buff_A, int rs_A, int cs_A, 00284 double* buff_x, int inc_x, 00285 double* buff_v, int inc_v, 00286 double* buff_w, int inc_w ); 00287 FLA_Error FLA_Fused_Gerc2_Ahx_Ax_opc_var1( int m_A, 00288 int n_A, 00289 scomplex* buff_alpha, 00290 scomplex* buff_u, int inc_u, 00291 scomplex* buff_y, int inc_y, 00292 scomplex* buff_z, int inc_z, 00293 scomplex* buff_A, int rs_A, int cs_A, 00294 scomplex* buff_x, int inc_x, 00295 scomplex* buff_v, int inc_v, 00296 scomplex* buff_w, int inc_w ); 00297 FLA_Error FLA_Fused_Gerc2_Ahx_Ax_opz_var1( int m_A, 00298 int n_A, 00299 dcomplex* buff_alpha, 00300 dcomplex* buff_u, int inc_u, 00301 dcomplex* buff_y, int inc_y, 00302 dcomplex* buff_z, int inc_z, 00303 dcomplex* buff_A, int rs_A, int cs_A, 00304 dcomplex* buff_x, int inc_x, 00305 dcomplex* buff_v, int inc_v, 00306 dcomplex* buff_w, int inc_w ); 00307 00308 00309 FLA_Error FLA_Fused_Uhu_Yhu_Zhu_ops_var1( int m_U, 00310 int n_U, 00311 float* buff_delta, 00312 float* buff_U, int rs_U, int cs_U, 00313 float* buff_Y, int rs_Y, int cs_Y, 00314 float* buff_Z, int rs_Z, int cs_Z, 00315 float* buff_t, int inc_t, 00316 float* buff_u, int inc_u, 00317 float* buff_y, int inc_y, 00318 float* buff_z, int inc_z ); 00319 FLA_Error FLA_Fused_Uhu_Yhu_Zhu_opd_var1( int m_U, 00320 int n_U, 00321 double* buff_delta, 00322 double* buff_U, int rs_U, int cs_U, 00323 double* buff_Y, int rs_Y, int cs_Y, 00324 double* buff_Z, int rs_Z, int cs_Z, 00325 double* buff_t, int inc_t, 00326 double* buff_u, int inc_u, 00327 double* buff_y, int inc_y, 00328 double* buff_z, int inc_z ); 00329 FLA_Error FLA_Fused_Uhu_Yhu_Zhu_opc_var1( int m_U, 00330 int n_U, 00331 scomplex* buff_delta, 00332 scomplex* buff_U, int rs_U, int cs_U, 00333 scomplex* buff_Y, int rs_Y, int cs_Y, 00334 scomplex* buff_Z, int rs_Z, int cs_Z, 00335 scomplex* buff_t, int inc_t, 00336 scomplex* buff_u, int inc_u, 00337 scomplex* buff_y, int inc_y, 00338 scomplex* buff_z, int inc_z ); 00339 FLA_Error FLA_Fused_Uhu_Yhu_Zhu_opz_var1( int m_U, 00340 int n_U, 00341 dcomplex* buff_delta, 00342 dcomplex* buff_U, int rs_U, int cs_U, 00343 dcomplex* buff_Y, int rs_Y, int cs_Y, 00344 dcomplex* buff_Z, int rs_Z, int cs_Z, 00345 dcomplex* buff_t, int inc_t, 00346 dcomplex* buff_u, int inc_u, 00347 dcomplex* buff_y, int inc_y, 00348 dcomplex* buff_z, int inc_z ); 00349