Context Navigation

← Previous Revision
Latest Revision
Next Revision →
Blame
Revision Log

petscsys.h90@ 11896

Last change on this file since 11896 was 11896, checked in by habbalf, 13 years ago
petsc-dev : Petsc development code in external packages. Mercurial updates
File size: 12.3 KB

Line
1	subroutine PetscBagCreate(comm, bagsize, bag ,ierr)
2	integer comm ! MPI_Comm
3	size_t bagsize ! size_t
4	PetscBag bag ! PetscBag
5	integer ierr
6	end subroutine
7	subroutine PetscFListDestroy(fl ,ierr)
8	PetscFList fl ! PetscFList
9	integer ierr
10	end subroutine
11	subroutine PetscFListView(list, viewer ,ierr)
12	PetscFList list ! PetscFList
13	PetscViewer viewer ! PetscViewer
14	integer ierr
15	end subroutine
16	subroutine PetscFListGet(list, array, n ,ierr)
17	PetscFList list ! PetscFList
18	character array ! char
19	integer n ! int
20	integer ierr
21	end subroutine
22	subroutine PetscFListDuplicate(fl, nl ,ierr)
23	PetscFList fl ! PetscFList
24	PetscFList nl ! PetscFList
25	integer ierr
26	end subroutine
27	subroutine PetscSetDefaultDebugger(ierr)
28	integer ierr
29	end subroutine
30	subroutine PetscAttachDebugger(ierr)
31	integer ierr
32	end subroutine
33	subroutine PetscPopErrorHandler(ierr)
34	integer ierr
35	end subroutine
36	subroutine PetscFPTrapPush(trap ,ierr)
37	PetscFPTrap trap ! PetscFPTrap
38	integer ierr
39	end subroutine
40	subroutine PetscFPTrapPop(ierr)
41	integer ierr
42	end subroutine
43	subroutine PetscSetFPTrap(flag ,ierr)
44	PetscFPTrap flag ! PetscFPTrap
45	integer ierr
46	end subroutine
47	subroutine PetscDefaultSignalHandler(sig, ptr ,ierr)
48	integer sig ! int
49	PetscVoid ptr ! void
50	integer ierr
51	end subroutine
52	subroutine PetscPopSignalHandler(ierr)
53	integer ierr
54	end subroutine
55	subroutine PetscFClose(comm, fd ,ierr)
56	integer comm ! MPI_Comm
57	FILE fd ! FILE
58	integer ierr
59	end subroutine
60	subroutine PetscSynchronizedFlush(comm ,ierr)
61	integer comm ! MPI_Comm
62	integer ierr
63	end subroutine
64	subroutine PetscBinaryRead(fd, p, n, type ,ierr)
65	integer fd ! int
66	PetscVoid p ! void
67	PetscInt n ! PetscInt
68	PetscDataType type ! PetscDataType
69	integer ierr
70	end subroutine
71	subroutine PetscBinaryWrite(fd, p, n, type, istemp ,ierr)
72	integer fd ! int
73	PetscVoid p ! void
74	PetscInt n ! PetscInt
75	PetscDataType type ! PetscDataType
76	PetscBool istemp ! PetscBool
77	integer ierr
78	end subroutine
79	subroutine PetscBinaryClose(fd ,ierr)
80	integer fd ! int
81	integer ierr
82	end subroutine
83	subroutine PetscBinarySeek(fd, off, whence, offset ,ierr)
84	integer fd ! int
85	off_t off ! off_t
86	PetscBinarySeekType whence ! PetscBinarySeekType
87	off_t offset ! off_t
88	integer ierr
89	end subroutine
90	subroutine PetscMatlabEngineDestroy(v ,ierr)
91	PetscMatlabEngine v ! PetscMatlabEngine
92	integer ierr
93	end subroutine
94	subroutine PetscMatlabEnginePut(mengine, obj ,ierr)
95	PetscMatlabEngine mengine ! PetscMatlabEngine
96	PetscObject obj ! PetscObject
97	integer ierr
98	end subroutine
99	subroutine PetscMatlabEngineGet(mengine, obj ,ierr)
100	PetscMatlabEngine mengine ! PetscMatlabEngine
101	PetscObject obj ! PetscObject
102	integer ierr
103	end subroutine
104	subroutine PetscMemoryGetCurrentUsage(mem ,ierr)
105	PetscLogDouble mem ! PetscLogDouble
106	integer ierr
107	end subroutine
108	subroutine PetscMemoryGetMaximumUsage(mem ,ierr)
109	PetscLogDouble mem ! PetscLogDouble
110	integer ierr
111	end subroutine
112	subroutine PetscObjectDestroy(obj ,ierr)
113	PetscObject obj ! PetscObject
114	integer ierr
115	end subroutine
116	subroutine PetscObjectGetTabLevel(obj, tab ,ierr)
117	PetscObject obj ! PetscObject
118	PetscInt tab ! PetscInt
119	integer ierr
120	end subroutine
121	subroutine PetscObjectSetTabLevel(obj, tab ,ierr)
122	PetscObject obj ! PetscObject
123	PetscInt tab ! PetscInt
124	integer ierr
125	end subroutine
126	subroutine PetscObjectIncrementTabLevel(obj, oldobj, tab ,ierr)
127	PetscObject obj ! PetscObject
128	PetscObject oldobj ! PetscObject
129	PetscInt tab ! PetscInt
130	integer ierr
131	end subroutine
132	subroutine PetscObjectReference(obj ,ierr)
133	PetscObject obj ! PetscObject
134	integer ierr
135	end subroutine
136	subroutine PetscObjectGetReference(obj, cnt ,ierr)
137	PetscObject obj ! PetscObject
138	PetscInt cnt ! PetscInt
139	integer ierr
140	end subroutine
141	subroutine PetscObjectDereference(obj ,ierr)
142	PetscObject obj ! PetscObject
143	integer ierr
144	end subroutine
145	subroutine PetscObjectSetFromOptions(obj ,ierr)
146	PetscObject obj ! PetscObject
147	integer ierr
148	end subroutine
149	subroutine PetscObjectSetUp(obj ,ierr)
150	PetscObject obj ! PetscObject
151	integer ierr
152	end subroutine
153	subroutine PetscOptionsValidKey(in_str, key ,ierr)
154	character in_str (*) ! char
155	PetscBool key ! PetscBool
156	integer ierr
157	end subroutine
158	subroutine PetscOptionsPrefixPush(prefix ,ierr)
159	character prefix (*) ! char
160	integer ierr
161	end subroutine
162	subroutine PetscOptionsPrefixPop(ierr)
163	integer ierr
164	end subroutine
165	subroutine PetscOptionsLeft(ierr)
166	integer ierr
167	end subroutine
168	subroutine PetscOptionsSetFromOptions(ierr)
169	integer ierr
170	end subroutine
171	subroutine PetscOptionsMonitorCancel(ierr)
172	integer ierr
173	end subroutine
174	subroutine PetscInitialized(isInitialized ,ierr)
175	PetscBool isInitialized ! PetscBool
176	integer ierr
177	end subroutine
178	subroutine PetscFinalized(isFinalized ,ierr)
179	PetscBool isFinalized ! PetscBool
180	integer ierr
181	end subroutine
182	subroutine PetscDataTypeGetSize(ptype, size ,ierr)
183	PetscDataType ptype ! PetscDataType
184	size_t size ! size_t
185	integer ierr
186	end subroutine
187	subroutine PetscCommGetNewTag(comm, tag ,ierr)
188	integer comm ! MPI_Comm
189	PetscMPIInt tag ! PetscMPIInt
190	integer ierr
191	end subroutine
192	subroutine PetscRandomGetValue(r, val ,ierr)
193	PetscRandom r ! PetscRandom
194	PetscScalar val ! PetscScalar
195	integer ierr
196	end subroutine
197	subroutine PetscRandomGetValueReal(r, val ,ierr)
198	PetscRandom r ! PetscRandom
199	PetscReal val ! PetscReal
200	integer ierr
201	end subroutine
202	subroutine PetscRandomGetInterval(r, low, high ,ierr)
203	PetscRandom r ! PetscRandom
204	PetscScalar low ! PetscScalar
205	PetscScalar high ! PetscScalar
206	integer ierr
207	end subroutine
208	subroutine PetscRandomSetInterval(r, low, high ,ierr)
209	PetscRandom r ! PetscRandom
210	PetscScalar low ! PetscScalar
211	PetscScalar high ! PetscScalar
212	integer ierr
213	end subroutine
214	subroutine PetscRandomDestroy(r ,ierr)
215	PetscRandom r ! PetscRandom
216	integer ierr
217	end subroutine
218	subroutine PetscRandomGetSeed(r, seed ,ierr)
219	PetscRandom r ! PetscRandom
220	unsigned long seed ! unsigned long
221	integer ierr
222	end subroutine
223	subroutine PetscRandomSetSeed(r, seed ,ierr)
224	PetscRandom r ! PetscRandom
225	unsigned long seed ! unsigned long
226	integer ierr
227	end subroutine
228	subroutine PetscRandomSetFromOptions(rnd ,ierr)
229	PetscRandom rnd ! PetscRandom
230	integer ierr
231	end subroutine
232	subroutine PetscRandomViewFromOptions(rnd, title ,ierr)
233	PetscRandom rnd ! PetscRandom
234	character title ! char
235	integer ierr
236	end subroutine
237	subroutine PetscRandomCreate(comm, r ,ierr)
238	integer comm ! MPI_Comm
239	PetscRandom r ! PetscRandom
240	integer ierr
241	end subroutine
242	subroutine PetscRandomSeed(r ,ierr)
243	PetscRandom r ! PetscRandom
244	integer ierr
245	end subroutine
246	subroutine PetscGetCPUTime(t ,ierr)
247	PetscLogDouble t ! PetscLogDouble
248	integer ierr
249	end subroutine
250	subroutine PetscGetTime(t ,ierr)
251	PetscLogDouble t ! PetscLogDouble
252	integer ierr
253	end subroutine
254	subroutine PetscMemcmp(str1, str2, len, e ,ierr)
255	PetscVoid str1 ! void
256	PetscVoid str2 ! void
257	size_t len ! size_t
258	PetscBool e ! PetscBool
259	integer ierr
260	end subroutine
261	subroutine PetscMemmove(a, b, n ,ierr)
262	PetscVoid a ! void
263	PetscVoid b ! void
264	size_t n ! size_t
265	integer ierr
266	end subroutine
267	subroutine PetscSequentialPhaseBegin(comm, ng ,ierr)
268	integer comm ! MPI_Comm
269	integer ng ! int
270	integer ierr
271	end subroutine
272	subroutine PetscSequentialPhaseEnd(comm, ng ,ierr)
273	integer comm ! MPI_Comm
274	integer ng ! int
275	integer ierr
276	end subroutine
277	subroutine PetscSleep(s ,ierr)
278	PetscReal s ! PetscReal
279	integer ierr
280	end subroutine
281	subroutine PetscSplitOwnershipBlock(comm, bs, n, nupper ,ierr)
282	integer comm ! MPI_Comm
283	PetscInt bs ! PetscInt
284	PetscInt n ! PetscInt
285	PetscInt nupper ! PetscInt
286	integer ierr
287	end subroutine
288	subroutine PetscSplitOwnership(comm, n, nupper ,ierr)
289	integer comm ! MPI_Comm
290	PetscInt n ! PetscInt
291	PetscInt nupper ! PetscInt
292	integer ierr
293	end subroutine
294	subroutine PetscSortReal(n, v ,ierr)
295	PetscInt n ! PetscInt
296	PetscReal v (*) ! PetscReal
297	integer ierr
298	end subroutine
299	subroutine PetscSortSplit(ncut, n, a, idx ,ierr)
300	PetscInt ncut ! PetscInt
301	PetscInt n ! PetscInt
302	PetscScalar a (*) ! PetscScalar
303	PetscInt idx (*) ! PetscInt
304	integer ierr
305	end subroutine
306	subroutine PetscSortSplitReal(ncut, n, a, idx ,ierr)
307	PetscInt ncut ! PetscInt
308	PetscInt n ! PetscInt
309	PetscReal a (*) ! PetscReal
310	PetscInt idx (*) ! PetscInt
311	integer ierr
312	end subroutine
313	subroutine PetscSortInt(n, i ,ierr)
314	PetscInt n ! PetscInt
315	PetscInt i (*) ! PetscInt
316	integer ierr
317	end subroutine
318	subroutine PetscSortRemoveDupsInt(n, ii ,ierr)
319	PetscInt n ! PetscInt
320	PetscInt ii (*) ! PetscInt
321	integer ierr
322	end subroutine
323	subroutine PetscSortIntWithArray(n, i, Ii ,ierr)
324	PetscInt n ! PetscInt
325	PetscInt i (*) ! PetscInt
326	PetscInt Ii (*) ! PetscInt
327	integer ierr
328	end subroutine
329	subroutine PetscSortIntWithArrayPair(n, L, J, K ,ierr)
330	PetscInt n ! PetscInt
331	PetscInt L ! PetscInt
332	PetscInt J ! PetscInt
333	PetscInt K ! PetscInt
334	integer ierr
335	end subroutine
336	subroutine PetscSortMPIIntWithArray(n, i, Ii ,ierr)
337	PetscMPIInt n ! PetscMPIInt
338	PetscMPIInt i (*) ! PetscMPIInt
339	PetscMPIInt Ii (*) ! PetscMPIInt
340	integer ierr
341	end subroutine
342	subroutine PetscSortIntWithScalarArray(n, i, Ii ,ierr)
343	PetscInt n ! PetscInt
344	PetscInt i (*) ! PetscInt
345	PetscScalar Ii (*) ! PetscScalar
346	integer ierr
347	end subroutine
348	subroutine PetscMergeIntArrayPair(an, aI, aJ, bn, bI, bJ, n, L, &
349	&J ,ierr)
350	PetscInt an ! PetscInt
351	PetscInt aI ! PetscInt
352	PetscInt aJ ! PetscInt
353	PetscInt bn ! PetscInt
354	PetscInt bI ! PetscInt
355	PetscInt bJ ! PetscInt
356	PetscInt n ! PetscInt
357	PetscInt L ! PetscInt
358	PetscInt J ! PetscInt
359	integer ierr
360	end subroutine
361	subroutine PetscProcessTree(n, mask, parentid, Nlevels, Level, &
362	&Levelcnt, Idbylevel, Column ,ierr)
363	PetscInt n ! PetscInt
364	PetscBool mask (*) ! PetscBool
365	PetscInt parentid (*) ! PetscInt
366	PetscInt Nlevels ! PetscInt
367	PetscInt Level ! PetscInt
368	PetscInt Levelcnt ! PetscInt
369	PetscInt Idbylevel ! PetscInt
370	PetscInt Column ! PetscInt
371	integer ierr
372	end subroutine
373	subroutine PetscSortIntWithPermutation(n, i, idx ,ierr)
374	PetscInt n ! PetscInt
375	PetscInt i (*) ! PetscInt
376	PetscInt idx (*) ! PetscInt
377	integer ierr
378	end subroutine
379	subroutine PetscSortRealWithPermutation(n, i, idx ,ierr)
380	PetscInt n ! PetscInt
381	PetscReal i (*) ! PetscReal
382	PetscInt idx (*) ! PetscInt
383	integer ierr
384	end subroutine

Note: See TracBrowser for help on using the repository browser.

Download in other formats:

Original Format