Ice Sheet System Model  4.18
Code documentation
InterpFromMeshToMesh2d.h
Go to the documentation of this file.
1 
5 #ifndef _INTERPFROMMESHTOMESH2d_H
6 #define _INTERPFROMMESHTOMESH2d_H
7 
8 #ifdef HAVE_CONFIG_H
9  #include <config.h>
10 #else
11  #error "Cannot compile with HAVE_CONFIG_H symbol! run configure first!"
12 #endif
13 
14 /*For python modules: needs to come before header files inclusion*/
15 #ifdef _HAVE_PYTHON_
16 #define PY_ARRAY_UNIQUE_SYMBOL PythonIOSymbol
17 #endif
18 
19 /*Header files: */
20 #include "../bindings.h"
21 #include "../../c/main/globals.h"
22 #include "../../c/toolkits/toolkits.h"
23 #include "../../c/modules/modules.h"
24 #include "../../c/shared/shared.h"
25 #include "../../c/shared/io/io.h"
26 
27 #undef __FUNCT__
28 #define __FUNCT__ "InterpFromMeshToMesh2d"
29 
30 #ifdef _HAVE_MATLAB_MODULES_
31 /* serial input macros: */
32 #define INDEX prhs[0]
33 #define X prhs[1]
34 #define Y prhs[2]
35 #define DATA prhs[3]
36 #define XINTERP prhs[4]
37 #define YINTERP prhs[5]
38 #define ARGUMENTS prhs
39 /* serial output macros: */
40 #define DATAINTERP (mxArray**)&plhs[0]
41 #endif
42 
43 #ifdef _HAVE_PYTHON_MODULES_
44 /* serial input macros: */
45 #define INDEX PyTuple_GetItem(args,0)
46 #define X PyTuple_GetItem(args,1)
47 #define Y PyTuple_GetItem(args,2)
48 #define DATA PyTuple_GetItem(args,3)
49 #define XINTERP PyTuple_GetItem(args,4)
50 #define YINTERP PyTuple_GetItem(args,5)
51 #define ARGUMENTS args
52 /* serial output macros: */
53 #define DATAINTERP output,0
54 #endif
55 
56 #ifdef _HAVE_JAVASCRIPT_MODULES_
57 /* serial input macros: */
58 #define INDEX indexin,nelin,3
59 #define X xin,nodsin
60 #define Y yin,nodsin
61 #define DATA datain,nodsin,1
62 #define XINTERP x_interpin, nods_interpin
63 #define YINTERP y_interpin, nods_interpin
64 #define ARGUMENTS "default_value",default_value
65 /* serial output macros: */
66 #define DATAINTERP pdata_interp,NULL,NULL
67 #define WRAPPER(modulename) extern "C" { int InterpFromMeshToMesh2dModule(double** pdata_interp,int* indexin,double* xin,double* yin,double* datain,double* x_interpin,double* y_interpin,int nelin,int nodsin,int nods_interpin,double default_value)
68 #define nrhs 6
69 #endif
70 
71 /* serial arg counts: */
72 #undef NLHS
73 #define NLHS 1
74 #undef NRHS
75 #define NRHS 6
76 
77 #endif