1 |
|
2 |
/******************************************************* |
3 |
* |
4 |
* Copyright (c) 2003-2008 by University of Queensland |
5 |
* Earth Systems Science Computational Center (ESSCC) |
6 |
* http://www.uq.edu.au/esscc |
7 |
* |
8 |
* Primary Business: Queensland, Australia |
9 |
* Licensed under the Open Software License version 3.0 |
10 |
* http://www.opensource.org/licenses/osl-3.0.php |
11 |
* |
12 |
*******************************************************/ |
13 |
|
14 |
|
15 |
/**************************************************************/ |
16 |
|
17 |
/* Paso finite element solver */ |
18 |
|
19 |
/**************************************************************/ |
20 |
|
21 |
/* Copyrights by ACcESS Australia, 2003,2004,2005 */ |
22 |
/* Author: gross@access.edu.au */ |
23 |
|
24 |
/**************************************************************/ |
25 |
|
26 |
#ifndef INC_PASO |
27 |
#define INC_PASO |
28 |
|
29 |
#include "Common.h" |
30 |
|
31 |
/**************************************************************/ |
32 |
|
33 |
enum Paso_ErrorCodeType { |
34 |
NO_ERROR, |
35 |
WARNING, |
36 |
VALUE_ERROR, |
37 |
TYPE_ERROR, |
38 |
MEMORY_ERROR, |
39 |
IO_ERROR, |
40 |
ZERO_DIVISION_ERROR, |
41 |
EOF_ERROR, |
42 |
FLOATING_POINT_ERROR, |
43 |
INDEX_ERROR, |
44 |
OS_ERROR, |
45 |
OVERFLOW_ERROR, |
46 |
SYSTEM_ERROR, |
47 |
PASO_MPI_ERROR |
48 |
}; |
49 |
|
50 |
typedef enum Paso_ErrorCodeType Paso_ErrorCodeType; |
51 |
|
52 |
/* interfaces */ |
53 |
|
54 |
double Paso_timer(void); |
55 |
bool_t Paso_checkPtr(void*); |
56 |
void Paso_resetError(void); |
57 |
void Paso_setError(Paso_ErrorCodeType err,__const char* msg); |
58 |
bool_t Paso_noError(void); |
59 |
Paso_ErrorCodeType Paso_getErrorType(void); |
60 |
char* Paso_getErrorMessage(void); |
61 |
#ifndef _OPENMP |
62 |
int omp_get_max_threads(void); |
63 |
#endif |
64 |
|
65 |
#endif /* #ifndef INC_PASO */ |