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_z.c
Go to the documentation of this file.
1 
17 #include "common.h"
18 #include "workspace.h"
19 
20 /***************************************************************************/
40 int PLASMA_Alloc_Workspace_zgeev(int N, PLASMA_desc **descT) {
41  return plasma_alloc_ibnb_tile(N, N, PLASMA_FUNC_ZGEEV, PlasmaComplexDouble, descT); }
42 
43 /***************************************************************************/
63 int PLASMA_Alloc_Workspace_zgehrd(int N, PLASMA_desc **descT) {
64  return plasma_alloc_ibnb_tile(N, N, PLASMA_FUNC_ZGEHRD, PlasmaComplexDouble, descT); }
65 
66 /***************************************************************************/
89 int PLASMA_Alloc_Workspace_zgebrd(int M, int N, PLASMA_desc **descT) {
90  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_ZGEBRD, PlasmaComplexDouble, descT); }
91 
92 /***************************************************************************/
116 int PLASMA_Alloc_Workspace_zgels(int M, int N, PLASMA_Complex64_t **T) {
117  return plasma_alloc_ibnb(M, N, PLASMA_FUNC_ZGELS, PlasmaComplexDouble, (void**)T); }
118 
119  /***************************************************************************/
144 int PLASMA_Alloc_Workspace_zgels_Tile(int M, int N, PLASMA_desc **descT) {
145  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_ZGELS, PlasmaComplexDouble, descT); }
146 
147 /***************************************************************************/
171 int PLASMA_Alloc_Workspace_zgeqrf(int M, int N, PLASMA_Complex64_t **T) {
172  return plasma_alloc_ibnb(M, N, PLASMA_FUNC_ZGELS, PlasmaComplexDouble, (void**)T); }
173 
174 /***************************************************************************/
198 int PLASMA_Alloc_Workspace_zgeqrf_Tile(int M, int N, PLASMA_desc **descT) {
199  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_ZGELS, PlasmaComplexDouble, descT); }
200 
201 /***************************************************************************/
225 int PLASMA_Alloc_Workspace_zgelqf(int M, int N, PLASMA_Complex64_t **T) {
226  return plasma_alloc_ibnb(M, N, PLASMA_FUNC_ZGELS, PlasmaComplexDouble, (void**)T); }
227 
228 /***************************************************************************/
252 int PLASMA_Alloc_Workspace_zgelqf_Tile(int M, int N, PLASMA_desc **descT) {
253  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_ZGELS, PlasmaComplexDouble, descT); }
254 
255 /***************************************************************************/
280 int PLASMA_Alloc_Workspace_zgesv_incpiv(int N, PLASMA_Complex64_t **L, int **IPIV) {
281  int status = plasma_alloc_ibnb(N, N, PLASMA_FUNC_ZGESV, PlasmaComplexDouble, (void**)L);
282  if (status != PLASMA_SUCCESS)
283  return status;
284  return plasma_alloc_ipiv(N, N, PLASMA_FUNC_ZGESV, (void**)IPIV); }
285 
286 /***************************************************************************/
311 int PLASMA_Alloc_Workspace_zgesv_incpiv_Tile(int N, PLASMA_desc **descL, int **IPIV)
312 {
313  int status = plasma_alloc_ibnb_tile(N, N, PLASMA_FUNC_ZGESV, PlasmaComplexDouble, descL);
314  if (status != PLASMA_SUCCESS)
315  return status;
316  return plasma_alloc_ipiv(N, N, PLASMA_FUNC_ZGESV, (void **)IPIV);
317 }
318 /***************************************************************************/
341 int PLASMA_Alloc_Workspace_zgesvd(int M, int N, PLASMA_desc **descT) {
342  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_ZGESVD, PlasmaComplexDouble, descT); }
343 
344 /***************************************************************************/
379 int PLASMA_Alloc_Workspace_zgetrf_incpiv(int M, int N, PLASMA_Complex64_t **L, int **IPIV) {
380  int status = plasma_alloc_ibnb(M, N, PLASMA_FUNC_ZGESV, PlasmaComplexDouble, (void**)L);
381  if (status != PLASMA_SUCCESS)
382  return status;
383  return plasma_alloc_ipiv(M, N, PLASMA_FUNC_ZGESV, (void**)IPIV); }
384 
385 /***************************************************************************/
411 int PLASMA_Alloc_Workspace_zgetrf_incpiv_Tile(int N, PLASMA_desc **descL, int **IPIV)
412 {
413  int status = plasma_alloc_ibnb_tile(N, N, PLASMA_FUNC_ZGESV, PlasmaComplexDouble, descL);
414  if (status != PLASMA_SUCCESS)
415  return status;
416  return plasma_alloc_ipiv(N, N, PLASMA_FUNC_ZGESV, (void **)IPIV);
417 }
418 /***************************************************************************/
441 int PLASMA_Alloc_Workspace_zheev(int M, int N, PLASMA_desc **descT) {
442  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_ZHEEV, PlasmaComplexDouble, descT); }
443 
444 /***************************************************************************/
467 int PLASMA_Alloc_Workspace_zhegv(int M, int N, PLASMA_desc **descT) {
468  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_ZHEGV, PlasmaComplexDouble, descT); }
469 
470  /***************************************************************************/
493 int PLASMA_Alloc_Workspace_zhetrd(int M, int N, PLASMA_desc **descT) {
494  return plasma_alloc_ibnb_tile(M, N, PLASMA_FUNC_ZHETRD, PlasmaComplexDouble, descT); }