File: petscbt.h.html

package info (click to toggle)
petsc 3.23.1%2Bdfsg1-1exp1
  • links: PTS, VCS
  • area: main
  • in suites: experimental
  • size: 515,576 kB
  • sloc: ansic: 751,607; cpp: 51,542; python: 38,598; f90: 17,352; javascript: 3,493; makefile: 3,157; sh: 1,502; xml: 619; objc: 445; java: 13; csh: 1
file content (97 lines) | stat: -rw-r--r-- 7,999 bytes parent folder | download
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
85
86
87
88
89
90
91
92
93
94
95
96
97
<center><a href="https://gitlab.com/petsc/petsc/-/blob/966382dc56242773704ef5f5cee7aa2db3ebc577/include/petscbt.h">Actual source code: petscbt.h</a></center><br>

<html>
<head>
<title></title>
<meta name="generator" content="c2html 0.9.6">
<meta name="date" content="2025-04-30T18:14:50+00:00">
</head>

<body bgcolor="#FFFFFF">
<pre width=80>
<a name="line1">  1: </a><font color="#A020F0">#pragma once</font>

<a name="line3">  3: </a>#include <A href="../include/petscsystypes.h.html">&lt;petscsystypes.h&gt;</A>
<a name="line4">  4: </a>#include <A href="../include/petscviewertypes.h.html">&lt;petscviewertypes.h&gt;</A>
<a name="line5">  5: </a>#include <A href="../include/petscstring.h.html">&lt;petscstring.h&gt;</A>

<a name="line7">  7: </a><font color="#B22222">/* SUBMANSEC = Sys */</font>

<a name="line9">  9: </a><font color="#B22222">/* convert an index i to an index suitable for indexing a <a href="../manualpages/Sys/PetscBT.html">PetscBT</a>, such that</font>
<a name="line10"> 10: </a><font color="#B22222"> * bt[PetscBTIndex(i)] returns the i'th value of the bt */</font>
<a name="line11"> 11: </a><strong><font color="#4169E1"><a name="PetscBTIndex_Internal"></a>static inline size_t PetscBTIndex_Internal(<a href="../manualpages/Sys/PetscCount.html">PetscCount</a> index)</font></strong>
<a name="line12"> 12: </a>{
<a name="line13"> 13: </a>  <font color="#4169E1">return</font> (size_t)index / PETSC_BITS_PER_BYTE;
<a name="line14"> 14: </a>}

<a name="line16"> 16: </a><strong><font color="#4169E1"><a name="PetscBTMask_Internal"></a>static inline char PetscBTMask_Internal(<a href="../manualpages/Sys/PetscCount.html">PetscCount</a> index)</font></strong>
<a name="line17"> 17: </a>{
<a name="line18"> 18: </a>  <font color="#4169E1">return</font> (char)(1 &lt;&lt; index % PETSC_BITS_PER_BYTE);
<a name="line19"> 19: </a>}

<a name="line21"> 21: </a><strong><font color="#4169E1"><a name="PetscBTLength"></a>static inline size_t PetscBTLength(<a href="../manualpages/Sys/PetscCount.html">PetscCount</a> m)</font></strong>
<a name="line22"> 22: </a>{
<a name="line23"> 23: </a>  <font color="#4169E1">return</font> (size_t)m / PETSC_BITS_PER_BYTE + 1;
<a name="line24"> 24: </a>}

<a name="line26"> 26: </a><strong><font color="#4169E1"><a name="PetscBTMemzero"></a>static inline <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscBTMemzero(<a href="../manualpages/Sys/PetscCount.html">PetscCount</a> m, <a href="../manualpages/Sys/PetscBT.html">PetscBT</a> array)</font></strong>
<a name="line27"> 27: </a>{
<a name="line28"> 28: </a>  <font color="#4169E1">return</font> <a href="../manualpages/Sys/PetscArrayzero.html">PetscArrayzero</a>(array, PetscBTLength(m));
<a name="line29"> 29: </a>}

<a name="line31"> 31: </a><strong><font color="#4169E1"><a name="PetscBTDestroy"></a>static inline <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscBTDestroy(<a href="../manualpages/Sys/PetscBT.html">PetscBT</a> *array)</font></strong>
<a name="line32"> 32: </a>{
<a name="line33"> 33: </a>  <font color="#4169E1">return</font> (*array) ? <a href="../manualpages/Sys/PetscFree.html">PetscFree</a>(*array) : <a href="../manualpages/Sys/PetscErrorCode.html">PETSC_SUCCESS</a>;
<a name="line34"> 34: </a>}

<a name="line36"> 36: </a><strong><font color="#4169E1"><a name="PetscBTCreate"></a>static inline <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscBTCreate(<a href="../manualpages/Sys/PetscCount.html">PetscCount</a> m, <a href="../manualpages/Sys/PetscBT.html">PetscBT</a> *array)</font></strong>
<a name="line37"> 37: </a>{
<a name="line38"> 38: </a>  <font color="#4169E1">return</font> <a href="../manualpages/Sys/PetscCalloc1.html">PetscCalloc1</a>(PetscBTLength(m), array);
<a name="line39"> 39: </a>}

<a name="line41"> 41: </a><strong><font color="#4169E1"><a name="PetscBTLookup"></a>static inline char PetscBTLookup(<a href="../manualpages/Sys/PetscBT.html">PetscBT</a> array, <a href="../manualpages/Sys/PetscCount.html">PetscCount</a> index)</font></strong>
<a name="line42"> 42: </a>{
<a name="line43"> 43: </a>  <font color="#4169E1">return</font> array[PetscBTIndex_Internal(index)] &amp; PetscBTMask_Internal(index);
<a name="line44"> 44: </a>}

<a name="line46"> 46: </a><strong><font color="#4169E1"><a name="PetscBTSet"></a>static inline <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscBTSet(<a href="../manualpages/Sys/PetscBT.html">PetscBT</a> array, <a href="../manualpages/Sys/PetscCount.html">PetscCount</a> index)</font></strong>
<a name="line47"> 47: </a>{
<a name="line48"> 48: </a>  <a href="../manualpages/Sys/PetscFunctionBegin.html">PetscFunctionBegin</a>;
<a name="line49"> 49: </a>  array[PetscBTIndex_Internal(index)] |= PetscBTMask_Internal(index);
<a name="line50"> 50: </a>  <a href="../manualpages/Sys/PetscFunctionReturn.html">PetscFunctionReturn</a>(<a href="../manualpages/Sys/PetscErrorCode.html">PETSC_SUCCESS</a>);
<a name="line51"> 51: </a>}

<a name="line53"> 53: </a><strong><font color="#4169E1"><a name="PetscBTNegate"></a>static inline <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscBTNegate(<a href="../manualpages/Sys/PetscBT.html">PetscBT</a> array, <a href="../manualpages/Sys/PetscCount.html">PetscCount</a> index)</font></strong>
<a name="line54"> 54: </a>{
<a name="line55"> 55: </a>  <a href="../manualpages/Sys/PetscFunctionBegin.html">PetscFunctionBegin</a>;
<a name="line56"> 56: </a>  array[PetscBTIndex_Internal(index)] ^= PetscBTMask_Internal(index);
<a name="line57"> 57: </a>  <a href="../manualpages/Sys/PetscFunctionReturn.html">PetscFunctionReturn</a>(<a href="../manualpages/Sys/PetscErrorCode.html">PETSC_SUCCESS</a>);
<a name="line58"> 58: </a>}

<a name="line60"> 60: </a><strong><font color="#4169E1"><a name="PetscBTClear"></a>static inline <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscBTClear(<a href="../manualpages/Sys/PetscBT.html">PetscBT</a> array, <a href="../manualpages/Sys/PetscCount.html">PetscCount</a> index)</font></strong>
<a name="line61"> 61: </a>{
<a name="line62"> 62: </a>  <a href="../manualpages/Sys/PetscFunctionBegin.html">PetscFunctionBegin</a>;
<a name="line63"> 63: </a>  array[PetscBTIndex_Internal(index)] &amp;= (char)~PetscBTMask_Internal(index);
<a name="line64"> 64: </a>  <a href="../manualpages/Sys/PetscFunctionReturn.html">PetscFunctionReturn</a>(<a href="../manualpages/Sys/PetscErrorCode.html">PETSC_SUCCESS</a>);
<a name="line65"> 65: </a>}

<a name="line67"> 67: </a><strong><font color="#4169E1"><a name="PetscBTLookupSet"></a>static inline char PetscBTLookupSet(<a href="../manualpages/Sys/PetscBT.html">PetscBT</a> array, <a href="../manualpages/Sys/PetscCount.html">PetscCount</a> index)</font></strong>
<a name="line68"> 68: </a>{
<a name="line69"> 69: </a>  const char ret = PetscBTLookup(array, index);
<a name="line70"> 70: </a>  PetscCallContinue(PetscBTSet(array, index));
<a name="line71"> 71: </a>  <font color="#4169E1">return</font> ret;
<a name="line72"> 72: </a>}

<a name="line74"> 74: </a><strong><font color="#4169E1"><a name="PetscBTLookupClear"></a>static inline char PetscBTLookupClear(<a href="../manualpages/Sys/PetscBT.html">PetscBT</a> array, <a href="../manualpages/Sys/PetscCount.html">PetscCount</a> index)</font></strong>
<a name="line75"> 75: </a>{
<a name="line76"> 76: </a>  const char ret = PetscBTLookup(array, index);
<a name="line77"> 77: </a>  PetscCallContinue(PetscBTClear(array, index));
<a name="line78"> 78: </a>  <font color="#4169E1">return</font> ret;
<a name="line79"> 79: </a>}

<a name="line81"> 81: </a><strong><font color="#4169E1">PETSC_EXTERN <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscBTView(<a href="../manualpages/Sys/PetscCount.html">PetscCount</a>, const <a href="../manualpages/Sys/PetscBT.html">PetscBT</a>, <a href="../manualpages/Viewer/PetscViewer.html">PetscViewer</a>)</font></strong>;
</pre>
</body>

</html>