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

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

Parent Directory Parent Directory | Revision Log Revision Log


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


1 gross 1476 /* $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 gross 1639
21     enum Paso_FunctionType {
22     LINEAR_SYSTEM,
23     FCT
24     };
25    
26     typedef enum Paso_FunctionType Paso_FunctionType;
27    
28 gross 1476 typedef struct Paso_Function {
29 gross 1639 Paso_FunctionType kind;
30     dim_t n;
31 gross 1476 Paso_MPIInfo *mpi_info;
32 gross 1639 double *b;
33     double *tmp;
34     void *more;
35 gross 1476 } 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 gross 1639 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 gross 1476 #endif

  ViewVC Help
Powered by ViewVC 1.1.26