File: petscctable.h.html

package info (click to toggle)
petsc 3.22.5%2Bdfsg1-2
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 516,740 kB
  • sloc: ansic: 814,333; cpp: 50,948; python: 37,416; f90: 17,187; javascript: 3,493; makefile: 3,198; sh: 1,502; xml: 619; objc: 445; java: 13; csh: 1
file content (164 lines) | stat: -rw-r--r-- 19,798 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
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
<center><a href="https://gitlab.com/petsc/petsc/-/blob/9fe822445bcdd45fb93170ff68fa7403d3f52f09/include/petscctable.h">Actual source code: petscctable.h</a></center><br>

<html>
<head>
<title></title>
<meta name="generator" content="c2html 0.9.6">
<meta name="date" content="2025-03-28T21:10:40+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/petscsys.h.html">&lt;petscsys.h&gt;</A>

<a name="line5">  5: </a><font color="#A020F0">#if defined(PETSC_SKIP_PETSCTABLE_DEPRECATION_WARNING)</font>
<a name="line6">  6: </a><strong><font color="#228B22">  #define PETSC_TABLE_DEPRECATION_WARNING(...)</font></strong>
<a name="line7">  7: </a><font color="#A020F0">#else</font>
<a name="line8">  8: </a><strong><font color="#228B22">  #define PETSC_TABLE_DEPRECATION_WARNING(repl) PETSC_DEPRECATED_FUNCTION(3, 19, 0, repl, )</font></strong>
<a name="line9">  9: </a><font color="#A020F0">#endif</font>

<a name="line11"> 11: </a><font color="#4169E1"><a name="_n_PetscTable"></a>struct _n_PetscTable </font>{
<a name="line12"> 12: </a>  <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> *keytable;
<a name="line13"> 13: </a>  <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> *table;
<a name="line14"> 14: </a>  <a href="../manualpages/Sys/PetscInt.html">PetscInt</a>  count;
<a name="line15"> 15: </a>  <a href="../manualpages/Sys/PetscInt.html">PetscInt</a>  tablesize;
<a name="line16"> 16: </a>  <a href="../manualpages/Sys/PetscInt.html">PetscInt</a>  head;
<a name="line17"> 17: </a>  <a href="../manualpages/Sys/PetscInt.html">PetscInt</a>  maxkey; <font color="#B22222">/* largest key allowed */</font>
<a name="line18"> 18: </a>};

<a name="line20"> 20: </a><font color="#4169E1">typedef struct _n_PetscTable *PetscTable;</font>
<a name="line21"> 21: </a><font color="#4169E1">typedef <a href="../manualpages/Sys/PetscInt.html">PetscInt</a>             *PetscTablePosition;</font>

<a name="line23"> 23: </a><strong><font color="#228B22">#define PetscHashMacroImplToGetAroundDeprecationWarning_Private(ta, x) (((unsigned long)(x)) % ((unsigned long)((ta)-&gt;tablesize)))</font></strong>

<a name="line25"> 25: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"&lt;no direct replacement!&gt;"</font>) static inline unsigned long PetscHash(PetscTable ta, unsigned long x)
<a name="line26"> 26: </a>{
<a name="line27"> 27: </a>  <font color="#4169E1">return</font> PetscHashMacroImplToGetAroundDeprecationWarning_Private(ta, x);
<a name="line28"> 28: </a>}

<a name="line30"> 30: </a><strong><font color="#228B22">#define PetscHashStepMacroImplToGetAroundDeprecationWarning_Private(ta, x) (1 + (((unsigned long)(x)) % ((unsigned long)((ta)-&gt;tablesize - 1))))</font></strong>

<a name="line32"> 32: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"&lt;no direct replacement!&gt;"</font>) static inline unsigned long PetscHashStep(PetscTable ta, unsigned long x)
<a name="line33"> 33: </a>{
<a name="line34"> 34: </a>  <font color="#4169E1">return</font> PetscHashStepMacroImplToGetAroundDeprecationWarning_Private(ta, x);
<a name="line35"> 35: </a>}

<a name="line37"> 37: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"<a href="../manualpages/PetscH/PetscHMapICreateWithSize.html">PetscHMapICreateWithSize</a>()"</font>) PETSC_EXTERN <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscTableCreate(<a href="../manualpages/Sys/PetscInt.html">PetscInt</a>, <a href="../manualpages/Sys/PetscInt.html">PetscInt</a>, PetscTable *);
<a name="line38"> 38: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"<a href="../manualpages/PetscH/PetscHMapIDuplicate.html">PetscHMapIDuplicate</a>()"</font>) PETSC_EXTERN <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscTableCreateCopy(PetscTable, PetscTable *);
<a name="line39"> 39: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"<a href="../manualpages/PetscH/PetscHMapIDestroy.html">PetscHMapIDestroy</a>()"</font>) PETSC_EXTERN <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscTableDestroy(PetscTable *);
<a name="line40"> 40: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"<a href="../manualpages/PetscH/PetscHMapIGetSize.html">PetscHMapIGetSize</a>()"</font>) PETSC_EXTERN <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscTableGetCount(PetscTable, <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> *);
<a name="line41"> 41: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"<a href="../manualpages/PetscH/PetscHMapIGetSize.html">PetscHMapIGetSize</a>()"</font>) PETSC_EXTERN <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscTableIsEmpty(PetscTable, <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> *);
<a name="line42"> 42: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"<a href="../manualpages/PetscH/PetscHMapISetWithMode.html">PetscHMapISetWithMode</a>()"</font>) PETSC_EXTERN <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscTableAddExpand(PetscTable, <a href="../manualpages/Sys/PetscInt.html">PetscInt</a>, <a href="../manualpages/Sys/PetscInt.html">PetscInt</a>, <a href="../manualpages/Sys/InsertMode.html">InsertMode</a>);
<a name="line43"> 43: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"&lt;no direct replacement!&gt;"</font>) PETSC_EXTERN <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscTableAddCountExpand(PetscTable, <a href="../manualpages/Sys/PetscInt.html">PetscInt</a>);
<a name="line44"> 44: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"PetscHashIterBegin()"</font>) PETSC_EXTERN <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscTableGetHeadPosition(PetscTable, PetscTablePosition *);
<a name="line45"> 45: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"PetscHashIterNext(), PetscHashIterGetKey(), and PetscHashIterGetVal()"</font>) PETSC_EXTERN <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscTableGetNext(PetscTable, PetscTablePosition *, <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> *, <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> *);
<a name="line46"> 46: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"<a href="../manualpages/PetscH/PetscHMapIClear.html">PetscHMapIClear</a>()"</font>) PETSC_EXTERN <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscTableRemoveAll(PetscTable);

<a name="line48"> 48: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"<a href="../manualpages/PetscH/PetscHMapISetWithMode.html">PetscHMapISetWithMode</a>()"</font>) static inline <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscTableAdd(PetscTable ta, <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> key, <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> data, <a href="../manualpages/Sys/InsertMode.html">InsertMode</a> imode)
<a name="line49"> 49: </a>{
<a name="line50"> 50: </a>  <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> i, hash = (<a href="../manualpages/Sys/PetscInt.html">PetscInt</a>)PetscHashMacroImplToGetAroundDeprecationWarning_Private(ta, key);
<a name="line51"> 51: </a>  <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> hashstep = (<a href="../manualpages/Sys/PetscInt.html">PetscInt</a>)PetscHashStepMacroImplToGetAroundDeprecationWarning_Private(ta, key);

<a name="line53"> 53: </a>  <a href="../manualpages/Sys/PetscFunctionBegin.html">PetscFunctionBegin</a>;
<a name="line54"> 54: </a>  <a href="../manualpages/Sys/PetscCheck.html">PetscCheck</a>(key &gt; 0, <a href="../manualpages/Sys/PETSC_COMM_SELF.html">PETSC_COMM_SELF</a>, <a href="../manualpages/Sys/PetscErrorCode.html">PETSC_ERR_ARG_OUTOFRANGE</a>, <font color="#666666">"key (value %"</font> PetscInt_FMT <font color="#666666">") &lt;= 0"</font>, key);
<a name="line55"> 55: </a>  <a href="../manualpages/Sys/PetscCheck.html">PetscCheck</a>(key &lt;= ta-&gt;maxkey, <a href="../manualpages/Sys/PETSC_COMM_SELF.html">PETSC_COMM_SELF</a>, <a href="../manualpages/Sys/PetscErrorCode.html">PETSC_ERR_ARG_OUTOFRANGE</a>, <font color="#666666">"key %"</font> PetscInt_FMT <font color="#666666">" is greater than largest key allowed %"</font> PetscInt_FMT, key, ta-&gt;maxkey);
<a name="line56"> 56: </a>  <a href="../manualpages/Sys/PetscCheck.html">PetscCheck</a>(data, <a href="../manualpages/Sys/PETSC_COMM_SELF.html">PETSC_COMM_SELF</a>, <a href="../manualpages/Sys/PetscErrorCode.html">PETSC_ERR_ARG_OUTOFRANGE</a>, <font color="#666666">"Null data"</font>);

<a name="line58"> 58: </a>  <font color="#4169E1">for</font> (i = 0; i &lt; ta-&gt;tablesize; i++) {
<a name="line59"> 59: </a>    <font color="#4169E1">if</font> (ta-&gt;keytable[hash] == key) {
<a name="line60"> 60: </a>      <font color="#4169E1">switch</font> (imode) {
<a name="line61"> 61: </a>      <font color="#4169E1">case</font> <a href="../manualpages/Sys/INSERT_VALUES.html">INSERT_VALUES</a>:
<a name="line62"> 62: </a>        ta-&gt;table[hash] = data; <font color="#B22222">/* over write */</font>
<a name="line63"> 63: </a>        <font color="#4169E1">break</font>;
<a name="line64"> 64: </a>      <font color="#4169E1">case</font> <a href="../manualpages/Sys/ADD_VALUES.html">ADD_VALUES</a>:
<a name="line65"> 65: </a>        ta-&gt;table[hash] += data;
<a name="line66"> 66: </a>        <font color="#4169E1">break</font>;
<a name="line67"> 67: </a>      <font color="#4169E1">case</font> <a href="../manualpages/Sys/MAX_VALUES.html">MAX_VALUES</a>:
<a name="line68"> 68: </a>        ta-&gt;table[hash] = <a href="../manualpages/Sys/PetscMax.html">PetscMax</a>(ta-&gt;table[hash], data);
<a name="line69"> 69: </a>        <font color="#4169E1">break</font>;
<a name="line70"> 70: </a>      <font color="#4169E1">case</font> <a href="../manualpages/Sys/MIN_VALUES.html">MIN_VALUES</a>:
<a name="line71"> 71: </a>        ta-&gt;table[hash] = <a href="../manualpages/Sys/PetscMin.html">PetscMin</a>(ta-&gt;table[hash], data);
<a name="line72"> 72: </a>        <font color="#4169E1">break</font>;
<a name="line73"> 73: </a>      <font color="#4169E1">case</font> <a href="../manualpages/Sys/InsertMode.html">NOT_SET_VALUES</a>:
<a name="line74"> 74: </a>      <font color="#4169E1">case</font> <a href="../manualpages/Sys/InsertMode.html">INSERT_ALL_VALUES</a>:
<a name="line75"> 75: </a>      <font color="#4169E1">case</font> <a href="../manualpages/Sys/InsertMode.html">ADD_ALL_VALUES</a>:
<a name="line76"> 76: </a>      <font color="#4169E1">case</font> <a href="../manualpages/Sys/InsertMode.html">INSERT_BC_VALUES</a>:
<a name="line77"> 77: </a>      <font color="#4169E1">case</font> <a href="../manualpages/Sys/InsertMode.html">ADD_BC_VALUES</a>:
<a name="line78"> 78: </a>        <a href="../manualpages/Sys/SETERRQ.html">SETERRQ</a>(<a href="../manualpages/Sys/PETSC_COMM_SELF.html">PETSC_COMM_SELF</a>, <a href="../manualpages/Sys/PetscErrorCode.html">PETSC_ERR_SUP</a>, <font color="#666666">"Unsupported <a href="../manualpages/Sys/InsertMode.html">InsertMode</a>"</font>);
<a name="line79"> 79: </a>      }
<a name="line80"> 80: </a>      <a href="../manualpages/Sys/PetscFunctionReturn.html">PetscFunctionReturn</a>(<a href="../manualpages/Sys/PetscErrorCode.html">PETSC_SUCCESS</a>);
<a name="line81"> 81: </a>    } <font color="#4169E1">else</font> <font color="#4169E1">if</font> (!ta-&gt;keytable[hash]) {
<a name="line82"> 82: </a>      <font color="#4169E1">if</font> (ta-&gt;count &lt; 5 * (ta-&gt;tablesize / 6) - 1) {
<a name="line83"> 83: </a>        ta-&gt;count++; <font color="#B22222">/* add */</font>
<a name="line84"> 84: </a>        ta-&gt;keytable[hash] = key;
<a name="line85"> 85: </a>        ta-&gt;table[hash]    = data;
<a name="line86"> 86: </a>      } <font color="#4169E1">else</font> <a href="../manualpages/Sys/PetscCall.html">PetscCall</a>(PetscTableAddExpand(ta, key, data, imode));
<a name="line87"> 87: </a>      <a href="../manualpages/Sys/PetscFunctionReturn.html">PetscFunctionReturn</a>(<a href="../manualpages/Sys/PetscErrorCode.html">PETSC_SUCCESS</a>);
<a name="line88"> 88: </a>    }
<a name="line89"> 89: </a>    hash = (hash + hashstep) % ta-&gt;tablesize;
<a name="line90"> 90: </a>  }
<a name="line91"> 91: </a>  <a href="../manualpages/Sys/SETERRQ.html">SETERRQ</a>(<a href="../manualpages/Sys/PETSC_COMM_SELF.html">PETSC_COMM_SELF</a>, <a href="../manualpages/Sys/PetscErrorCode.html">PETSC_ERR_COR</a>, <font color="#666666">"Full table"</font>);
<a name="line92"> 92: </a>  <font color="#B22222">/* <a href="../manualpages/Sys/PetscFunctionReturn.html">PetscFunctionReturn</a>(<a href="../manualpages/Sys/PetscErrorCode.html">PETSC_SUCCESS</a>); */</font>
<a name="line93"> 93: </a>}

<a name="line95"> 95: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"&lt;no direct replacement!&gt;"</font>) static inline <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscTableAddCount(PetscTable ta, <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> key)
<a name="line96"> 96: </a>{
<a name="line97"> 97: </a>  <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> i, hash = (<a href="../manualpages/Sys/PetscInt.html">PetscInt</a>)PetscHashMacroImplToGetAroundDeprecationWarning_Private(ta, key);
<a name="line98"> 98: </a>  <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> hashstep = (<a href="../manualpages/Sys/PetscInt.html">PetscInt</a>)PetscHashStepMacroImplToGetAroundDeprecationWarning_Private(ta, key);

<a name="line100">100: </a>  <a href="../manualpages/Sys/PetscFunctionBegin.html">PetscFunctionBegin</a>;
<a name="line101">101: </a>  <a href="../manualpages/Sys/PetscCheck.html">PetscCheck</a>(key &gt; 0, <a href="../manualpages/Sys/PETSC_COMM_SELF.html">PETSC_COMM_SELF</a>, <a href="../manualpages/Sys/PetscErrorCode.html">PETSC_ERR_ARG_OUTOFRANGE</a>, <font color="#666666">"key (value %"</font> PetscInt_FMT <font color="#666666">") &lt;= 0"</font>, key);
<a name="line102">102: </a>  <a href="../manualpages/Sys/PetscCheck.html">PetscCheck</a>(key &lt;= ta-&gt;maxkey, <a href="../manualpages/Sys/PETSC_COMM_SELF.html">PETSC_COMM_SELF</a>, <a href="../manualpages/Sys/PetscErrorCode.html">PETSC_ERR_ARG_OUTOFRANGE</a>, <font color="#666666">"key %"</font> PetscInt_FMT <font color="#666666">" is greater than largest key allowed %"</font> PetscInt_FMT, key, ta-&gt;maxkey);

<a name="line104">104: </a>  <font color="#4169E1">for</font> (i = 0; i &lt; ta-&gt;tablesize; i++) {
<a name="line105">105: </a>    <font color="#4169E1">if</font> (ta-&gt;keytable[hash] == key) {
<a name="line106">106: </a>      <a href="../manualpages/Sys/PetscFunctionReturn.html">PetscFunctionReturn</a>(<a href="../manualpages/Sys/PetscErrorCode.html">PETSC_SUCCESS</a>);
<a name="line107">107: </a>    } <font color="#4169E1">else</font> <font color="#4169E1">if</font> (!ta-&gt;keytable[hash]) {
<a name="line108">108: </a>      <font color="#4169E1">if</font> (ta-&gt;count &lt; 5 * (ta-&gt;tablesize / 6) - 1) {
<a name="line109">109: </a>        ta-&gt;count++; <font color="#B22222">/* add */</font>
<a name="line110">110: </a>        ta-&gt;keytable[hash] = key;
<a name="line111">111: </a>        ta-&gt;table[hash]    = ta-&gt;count;
<a name="line112">112: </a>      } <font color="#4169E1">else</font> <a href="../manualpages/Sys/PetscCall.html">PetscCall</a>(PetscTableAddCountExpand(ta, key));
<a name="line113">113: </a>      <a href="../manualpages/Sys/PetscFunctionReturn.html">PetscFunctionReturn</a>(<a href="../manualpages/Sys/PetscErrorCode.html">PETSC_SUCCESS</a>);
<a name="line114">114: </a>    }
<a name="line115">115: </a>    hash = (hash + hashstep) % ta-&gt;tablesize;
<a name="line116">116: </a>  }
<a name="line117">117: </a>  <a href="../manualpages/Sys/SETERRQ.html">SETERRQ</a>(<a href="../manualpages/Sys/PETSC_COMM_SELF.html">PETSC_COMM_SELF</a>, <a href="../manualpages/Sys/PetscErrorCode.html">PETSC_ERR_COR</a>, <font color="#666666">"Full table"</font>);
<a name="line118">118: </a>  <font color="#B22222">/* <a href="../manualpages/Sys/PetscFunctionReturn.html">PetscFunctionReturn</a>(<a href="../manualpages/Sys/PetscErrorCode.html">PETSC_SUCCESS</a>); */</font>
<a name="line119">119: </a>}

<a name="line121">121: </a><font color="#B22222">/*</font>
<a name="line122">122: </a><font color="#B22222">    PetscTableFind - finds data in table from a given key, if the key is valid but not in the table returns 0</font>
<a name="line123">123: </a><font color="#B22222">*/</font>
<a name="line124">124: </a>PETSC_TABLE_DEPRECATION_WARNING(<font color="#666666">"<a href="../manualpages/PetscH/PetscHMapIGetWithDefault.html">PetscHMapIGetWithDefault</a>()"</font>) static inline <a href="../manualpages/Sys/PetscErrorCode.html">PetscErrorCode</a> PetscTableFind(PetscTable ta, <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> key, <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> *data)
<a name="line125">125: </a>{
<a name="line126">126: </a>  <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> ii       = 0;
<a name="line127">127: </a>  <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> hash     = (<a href="../manualpages/Sys/PetscInt.html">PetscInt</a>)PetscHashMacroImplToGetAroundDeprecationWarning_Private(ta, key);
<a name="line128">128: </a>  <a href="../manualpages/Sys/PetscInt.html">PetscInt</a> hashstep = (<a href="../manualpages/Sys/PetscInt.html">PetscInt</a>)PetscHashStepMacroImplToGetAroundDeprecationWarning_Private(ta, key);

<a name="line130">130: </a>  <a href="../manualpages/Sys/PetscFunctionBegin.html">PetscFunctionBegin</a>;
<a name="line131">131: </a>  *data = 0;
<a name="line132">132: </a>  <a href="../manualpages/Sys/PetscCheck.html">PetscCheck</a>(key &gt; 0, <a href="../manualpages/Sys/PETSC_COMM_SELF.html">PETSC_COMM_SELF</a>, <a href="../manualpages/Sys/PetscErrorCode.html">PETSC_ERR_ARG_OUTOFRANGE</a>, <font color="#666666">"key (value %"</font> PetscInt_FMT <font color="#666666">") &lt;= 0"</font>, key);
<a name="line133">133: </a>  <a href="../manualpages/Sys/PetscCheck.html">PetscCheck</a>(key &lt;= ta-&gt;maxkey, <a href="../manualpages/Sys/PETSC_COMM_SELF.html">PETSC_COMM_SELF</a>, <a href="../manualpages/Sys/PetscErrorCode.html">PETSC_ERR_ARG_OUTOFRANGE</a>, <font color="#666666">"key %"</font> PetscInt_FMT <font color="#666666">" is greater than largest key allowed %"</font> PetscInt_FMT, key, ta-&gt;maxkey);

<a name="line135">135: </a>  <font color="#4169E1">while</font> (ii++ &lt; ta-&gt;tablesize) {
<a name="line136">136: </a>    <font color="#4169E1">if</font> (!ta-&gt;keytable[hash]) <font color="#4169E1">break</font>;
<a name="line137">137: </a>    <font color="#4169E1">else</font> <font color="#4169E1">if</font> (ta-&gt;keytable[hash] == key) {
<a name="line138">138: </a>      *data = ta-&gt;table[hash];
<a name="line139">139: </a>      <font color="#4169E1">break</font>;
<a name="line140">140: </a>    }
<a name="line141">141: </a>    hash = (hash + hashstep) % ta-&gt;tablesize;
<a name="line142">142: </a>  }
<a name="line143">143: </a>  <a href="../manualpages/Sys/PetscFunctionReturn.html">PetscFunctionReturn</a>(<a href="../manualpages/Sys/PetscErrorCode.html">PETSC_SUCCESS</a>);
<a name="line144">144: </a>}

<a name="line146">146: </a><strong><font color="#228B22">#undef PetscHashMacroImplToGetAroundDeprecationWarning_Private</font></strong>
<a name="line147">147: </a><strong><font color="#228B22">#undef PetscHashStepMacroImplToGetAroundDeprecationWarning_Private</font></strong>
<a name="line148">148: </a><strong><font color="#228B22">#undef PETSC_TABLE_DEPRECATION_WARNING</font></strong>
</pre>
</body>

</html>