/[escript]/trunk/paso/src/Functions.h
ViewVC logotype

Contents of /trunk/paso/src/Functions.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 4836 - (show annotations)
Mon Apr 7 05:51:55 2014 UTC (5 years, 6 months ago) by caltinay
File MIME type: text/plain
File size: 1369 byte(s)
"Some" SystemMatrix clean up.....

1
2 /*****************************************************************************
3 *
4 * Copyright (c) 2003-2014 by University of Queensland
5 * http://www.uq.edu.au
6 *
7 * Primary Business: Queensland, Australia
8 * Licensed under the Open Software License version 3.0
9 * http://www.opensource.org/licenses/osl-3.0.php
10 *
11 * Development until 2012 by Earth Systems Science Computational Center (ESSCC)
12 * Development 2012-2013 by School of Earth Sciences
13 * Development from 2014 by Centre for Geoscience Computing (GeoComp)
14 *
15 *****************************************************************************/
16
17
18 #ifndef __PASO_FUNCTIONS_H__
19 #define __PASO_FUNCTIONS_H__
20
21 #include "Common.h"
22 #include "esysUtils/Esys_MPI.h"
23 #include "performance.h"
24
25 enum Paso_FunctionType {
26 LINEAR_SYSTEM
27 };
28
29 typedef enum Paso_FunctionType Paso_FunctionType;
30
31 struct Paso_Function
32 {
33 Paso_FunctionType kind;
34 dim_t n;
35 Esys_MPIInfo *mpi_info;
36 double* b;
37 double* tmp;
38 };
39
40 err_t Paso_FunctionDerivative(double* J0w, const double* w, Paso_Function* F,
41 const double* f0, const double* x0,
42 double* setoff, Paso_Performance* pp);
43
44 err_t Paso_FunctionCall(Paso_Function* F, double* value, const double* arg,
45 Paso_Performance* pp);
46
47 void Paso_Function_free(Paso_Function* F);
48
49 #endif // __PASO_FUNCTIONS_H__
50

  ViewVC Help
Powered by ViewVC 1.1.26