1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
|
//------------------------------------------------------------------------------
// GB_mx_create_full: create a full built-in matrix of a given GrB_Type
//------------------------------------------------------------------------------
// SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2022, All Rights Reserved.
// SPDX-License-Identifier: Apache-2.0
//------------------------------------------------------------------------------
#include "GB_mex.h"
mxArray *GB_mx_create_full // return new built-in full matrix
(
const GrB_Index nrows,
const GrB_Index ncols,
GrB_Type type // type of the matrix to create
)
{
//--------------------------------------------------------------------------
// allocate an dense matrix of the right type
//--------------------------------------------------------------------------
if (type == GrB_BOOL)
{
return (mxCreateLogicalMatrix (nrows, ncols)) ;
}
else if (type == GrB_FP32)
{
return (mxCreateNumericMatrix (nrows, ncols, mxSINGLE_CLASS, mxREAL)) ;
}
else if (type == GrB_FP64)
{
return (mxCreateNumericMatrix (nrows, ncols, mxDOUBLE_CLASS, mxREAL)) ;
}
else if (type == GrB_INT8)
{
return (mxCreateNumericMatrix (nrows, ncols, mxINT8_CLASS, mxREAL)) ;
}
else if (type == GrB_INT16)
{
return (mxCreateNumericMatrix (nrows, ncols, mxINT16_CLASS, mxREAL)) ;
}
else if (type == GrB_INT32)
{
return (mxCreateNumericMatrix (nrows, ncols, mxINT32_CLASS, mxREAL)) ;
}
else if (type == GrB_INT64)
{
return (mxCreateNumericMatrix (nrows, ncols, mxINT64_CLASS, mxREAL)) ;
}
else if (type == GrB_UINT8)
{
return (mxCreateNumericMatrix (nrows, ncols, mxUINT8_CLASS, mxREAL)) ;
}
else if (type == GrB_UINT16)
{
return (mxCreateNumericMatrix (nrows, ncols, mxUINT16_CLASS, mxREAL)) ;
}
else if (type == GrB_UINT32)
{
return (mxCreateNumericMatrix (nrows, ncols, mxUINT32_CLASS, mxREAL)) ;
}
else if (type == GrB_UINT64)
{
return (mxCreateNumericMatrix (nrows, ncols, mxUINT64_CLASS, mxREAL)) ;
}
else if (type == GxB_FC32)
{
return (mxCreateNumericMatrix (nrows, ncols, mxSINGLE_CLASS,
mxCOMPLEX)) ;
}
else if (type == GxB_FC64 || type == Complex)
{
return (mxCreateNumericMatrix (nrows, ncols, mxDOUBLE_CLASS,
mxCOMPLEX)) ;
}
else
{
mexErrMsgTxt ("unsupported type") ;
return (NULL) ;
}
}
|
