1 |
artak |
2160 |
|
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 |
|
|
#ifndef INC_PASO_TESTS |
16 |
|
|
#define INC_PASO_TESTS |
17 |
|
|
|
18 |
|
|
/**************************************************************/ |
19 |
|
|
|
20 |
|
|
/* Some testing routines: */ |
21 |
|
|
|
22 |
|
|
/**************************************************************/ |
23 |
|
|
|
24 |
|
|
/* Copyrights by ACcESS Australia, 2003,2004,2005 */ |
25 |
|
|
/* author: artak@uq.edu.au */ |
26 |
|
|
|
27 |
|
|
/**************************************************************/ |
28 |
|
|
|
29 |
|
|
#include "paso/Common.h" |
30 |
|
|
|
31 |
|
|
/**************************************************************/ |
32 |
|
|
|
33 |
|
|
void Paso_test_run(Paso_SystemMatrix* A,double* b,dim_t level) ; |
34 |
|
|
void Paso_test_matrix(Paso_SystemMatrix* A, double* b, Paso_Options* options ); |
35 |
|
|
void Paso_test_data(char *fileName_p, double* b, Paso_Options* options ); |
36 |
|
|
#endif /* #ifndef INC_PASO_TESTS */ |