PLASMA  2.4.5
PLASMA - Parallel Linear Algebra for Scalable Multi-core Architectures
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Groups
workspace_c.c
Go to the documentation of this file.
1 
17 #include "common.h"
18 #include "workspace.h"
19 
20 /***************************************************************************/
40 int PLASMA_Alloc_Workspace_cgeev(int N, PLASMA_desc **descT) {
41  return plasma_alloc_ibnb_tile(N, N, PLASMA_FUNC_CGEEV, PlasmaComplexFloat, descT); }
42 
43 /***************************************************************************/
63 int PLASMA_Alloc_Workspace_cgehrd(int N, PLASMA_desc **descT) {
64  return plasma_alloc_ibnb_tile(N, N, PLASMA_FUNC_CGEHRD, PlasmaComplexFloat, descT); }
65 
66 /***************************************************************************/
89 int PLASMA_Alloc_Workspace_cgebrd(int M, int N, PLASMA_desc **descT) {
90  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_CGEBRD, PlasmaComplexFloat, descT); }
91 
92 /***************************************************************************/
116 int PLASMA_Alloc_Workspace_cgels(int M, int N, PLASMA_Complex32_t **T) {
117  return plasma_alloc_ibnb(M, N, PLASMA_FUNC_CGELS, PlasmaComplexFloat, (void**)T); }
118 
119  /***************************************************************************/
144 int PLASMA_Alloc_Workspace_cgels_Tile(int M, int N, PLASMA_desc **descT) {
145  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_CGELS, PlasmaComplexFloat, descT); }
146 
147 /***************************************************************************/
171 int PLASMA_Alloc_Workspace_cgeqrf(int M, int N, PLASMA_Complex32_t **T) {
172  return plasma_alloc_ibnb(M, N, PLASMA_FUNC_CGELS, PlasmaComplexFloat, (void**)T); }
173 
174 /***************************************************************************/
198 int PLASMA_Alloc_Workspace_cgeqrf_Tile(int M, int N, PLASMA_desc **descT) {
199  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_CGELS, PlasmaComplexFloat, descT); }
200 
201 /***************************************************************************/
225 int PLASMA_Alloc_Workspace_cgelqf(int M, int N, PLASMA_Complex32_t **T) {
226  return plasma_alloc_ibnb(M, N, PLASMA_FUNC_CGELS, PlasmaComplexFloat, (void**)T); }
227 
228 /***************************************************************************/
252 int PLASMA_Alloc_Workspace_cgelqf_Tile(int M, int N, PLASMA_desc **descT) {
253  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_CGELS, PlasmaComplexFloat, descT); }
254 
255 /***************************************************************************/
280 int PLASMA_Alloc_Workspace_cgesv_incpiv(int N, PLASMA_Complex32_t **L, int **IPIV) {
281  int status = plasma_alloc_ibnb(N, N, PLASMA_FUNC_CGESV, PlasmaComplexFloat, (void**)L);
282  if (status != PLASMA_SUCCESS)
283  return status;
284  return plasma_alloc_ipiv(N, N, PLASMA_FUNC_CGESV, (void**)IPIV); }
285 
286 /***************************************************************************/
311 int PLASMA_Alloc_Workspace_cgesv_incpiv_Tile(int N, PLASMA_desc **descL, int **IPIV)
312 {
313  int status = plasma_alloc_ibnb_tile(N, N, PLASMA_FUNC_CGESV, PlasmaComplexFloat, descL);
314  if (status != PLASMA_SUCCESS)
315  return status;
316  return plasma_alloc_ipiv(N, N, PLASMA_FUNC_CGESV, (void **)IPIV);
317 }
318 /***************************************************************************/
341 int PLASMA_Alloc_Workspace_cgesvd(int M, int N, PLASMA_desc **descT) {
342  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_CGESVD, PlasmaComplexFloat, descT); }
343 
344 /***************************************************************************/
379 int PLASMA_Alloc_Workspace_cgetrf_incpiv(int M, int N, PLASMA_Complex32_t **L, int **IPIV) {
380  int status = plasma_alloc_ibnb(M, N, PLASMA_FUNC_CGESV, PlasmaComplexFloat, (void**)L);
381  if (status != PLASMA_SUCCESS)
382  return status;
383  return plasma_alloc_ipiv(M, N, PLASMA_FUNC_CGESV, (void**)IPIV); }
384 
385 /***************************************************************************/
411 int PLASMA_Alloc_Workspace_cgetrf_incpiv_Tile(int N, PLASMA_desc **descL, int **IPIV)
412 {
413  int status = plasma_alloc_ibnb_tile(N, N, PLASMA_FUNC_CGESV, PlasmaComplexFloat, descL);
414  if (status != PLASMA_SUCCESS)
415  return status;
416  return plasma_alloc_ipiv(N, N, PLASMA_FUNC_CGESV, (void **)IPIV);
417 }
418 /***************************************************************************/
441 int PLASMA_Alloc_Workspace_cheev(int M, int N, PLASMA_desc **descT) {
442  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_CHEEV, PlasmaComplexFloat, descT); }
443 
444 /***************************************************************************/
467 int PLASMA_Alloc_Workspace_chegv(int M, int N, PLASMA_desc **descT) {
468  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_CHEGV, PlasmaComplexFloat, descT); }
469 
470  /***************************************************************************/
493 int PLASMA_Alloc_Workspace_chetrd(int M, int N, PLASMA_desc **descT) {
494  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_CHETRD, PlasmaComplexFloat, descT); }