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
|
function [nth chnk] = grbinfo
%GRBINFO print info about the GraphBLAS version
%
% nthreads = grbinfo
% SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2022, All Rights Reserved.
% SPDX-License-Identifier: Apache-2.0
[nthreads, format, hyper_switch, ...
name, version, date, about, license, compiledate, compiletime, api, ...
api_about, chunk, bitmap_switch ] = GB_mex_init ;
d = stat ;
fprintf ('\n%s version: %d.%d.%d\n', name, version) ;
if (d)
fprintf (' malloc debug: on\n') ;
else
fprintf (' malloc debug: off\n') ;
end
ncores = feature_numcores ;
[nthreads2 chunk2] = nthreads_get ;
fprintf (' # of threads to use: %d (%d)\n', nthreads, nthreads2) ;
fprintf (' chunk: %g (%g)\n', chunk, chunk2) ;
fprintf (' OpenMP max threads: %d\n', GB_mex_omp_max_threads) ;
fprintf (' # of cores for builtin %d\n', ncores) ;
switch (format)
case {0}
fprintf (' default format: CSR\n') ;
case {1}
fprintf (' default format: CSC\n') ;
otherwise
error ('?') ;
end
fprintf (' hyper_switch: %g\n', hyper_switch) ;
fprintf (' bitmap_switch: %g\n', bitmap_switch) ;
fprintf (' date: %s\n', date) ;
fprintf (' compile date: %s\n', compiledate) ;
fprintf (' compile time: %s\n\n', compiletime) ;
if (nargout > 0)
fprintf ('\n---------------------------------\n%s', about) ;
fprintf ('\n---------------------------------\n%s', license) ;
fprintf ('\n---------------------------------\n%s\n', api_about) ;
fprintf ('API version: %d.%d.%d\n', api) ;
nth = nthreads ;
chnk = chunk ;
end
|
