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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1639 - (show annotations)
Mon Jul 14 08:55:25 2008 UTC (10 years, 11 months ago) by gross
File MIME type: text/plain
File size: 1160 byte(s)


1 /* $Id:$ */
2
3 /*******************************************************
4 *
5 * Copyright 2008 by University of Queensland
6 *
7 * http://esscc.uq.edu.au
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 #ifndef INC_PASO_FUNCTIONS
15 #define INC_PASO_FUNCTIONS
16
17
18 #include "Common.h"
19 #include "Paso_MPI.h"
20
21 enum Paso_FunctionType {
22 LINEAR_SYSTEM,
23 FCT
24 };
25
26 typedef enum Paso_FunctionType Paso_FunctionType;
27
28 typedef struct Paso_Function {
29 Paso_FunctionType kind;
30 dim_t n;
31 Paso_MPIInfo *mpi_info;
32 double *b;
33 double *tmp;
34 void *more;
35 } Paso_Function;
36
37 err_t Paso_FunctionDerivative(double* J0w, const double* w, Paso_Function* F, const double *f0, const double *x0, double* setoff);
38 err_t Paso_FunctionCall(Paso_Function * F,double* value, const double* arg);
39
40 Paso_Function * Paso_Function_FCT_alloc(Paso_MPIInfo *mpi_info);
41 err_t Paso_Function_FCT_call(Paso_Function * F,double* value, const double* arg);
42 void Paso_Function_FCT_free(Paso_Function * F);
43
44 #endif

  ViewVC Help
Powered by ViewVC 1.1.26