/[escript]/branches/diaplayground/dudley/src/CPPAdapter/dudleycpp.cpp
ViewVC logotype

Annotation of /branches/diaplayground/dudley/src/CPPAdapter/dudleycpp.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 3675 - (hide annotations)
Thu Nov 17 00:53:38 2011 UTC (7 years, 5 months ago) by jfenwick
Original Path: trunk/dudley/src/CPPAdapter/dudleycpp.cpp
File size: 13813 byte(s)
pasowrap joins the trunk.

1 jgs 102
2 ksteube 1312 /*******************************************************
3 ksteube 1811 *
4 jfenwick 2881 * Copyright (c) 2003-2010 by University of Queensland
5 ksteube 1811 * 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 ksteube 1312
14 ksteube 1811
15 jfenwick 3231 #ifdef ESYS_MPI
16     #include "esysUtils/Esys_MPI.h"
17 ksteube 817 #endif
18 jgs 102 extern "C" {
19 jfenwick 3082 #include "../Dudley.h"
20 jgs 102 }
21 jgs 472
22 jfenwick 3675 #include <pasowrap/SystemMatrixAdapter.h>
23     #include <pasowrap/TransportProblemAdapter.h>
24    
25 jgs 203 #include "MeshAdapter.h"
26     #include "MeshAdapterFactory.h"
27 jgs 102
28 jfenwick 3086 #include "DudleyAdapterException.h"
29 gross 727 // #include "esysUtils/EsysException.h"
30 robwdcock 682 #include "esysUtils/esysExceptionTranslator.h"
31 jgs 102
32 robwdcock 682 #include "escript/AbstractContinuousDomain.h"
33 jgs 102
34     #include <boost/python.hpp>
35     #include <boost/python/module.hpp>
36     #include <boost/python/def.hpp>
37     #include <boost/python/detail/defaults_gen.hpp>
38 jfenwick 2064 #include <boost/version.hpp>
39 jgs 102
40     using namespace boost::python;
41    
42     /**
43 jfenwick 3082 \page dudley Dudley
44 jfenwick 3086 Dudley is the python module name that contains the interfaces
45 jfenwick 3082 to the C++ wrapper to dudley.
46 jgs 102
47 jgs 121 \version 1.0.0
48 jgs 102
49 jgs 121 \section class_desc Class Description:
50 jgs 102 Data
51    
52 jgs 121 \section class_limits Class Limitations:
53 jgs 102 None
54    
55 jgs 121 \section class_conds Class Conditions of Use:
56 jgs 102 None
57    
58 jgs 121 \section throws Throws:
59 jgs 102 None
60    
61     */
62    
63 jfenwick 3082 BOOST_PYTHON_MODULE(dudleycpp)
64 jgs 102 {
65 jfenwick 2064 // This feature was added in boost v1.34
66 phornby 2076 #if ((BOOST_VERSION/100)%1000 > 34) || (BOOST_VERSION/100000 >1)
67 jfenwick 2061 // params are: bool show_user_defined, bool show_py_signatures, bool show_cpp_signatures
68     docstring_options docopt(true, true, false);
69 jfenwick 2064 #endif
70 jgs 102
71     //
72     // NOTE: The return_value_policy is necessary for functions that
73     // return pointers.
74 gross 1382 //
75 jfenwick 3086 register_exception_translator<dudley::DudleyAdapterException>(&(esysUtils::esysExceptionTranslator));
76 jgs 102
77 jfenwick 3082 def("LoadMesh",dudley::loadMesh,
78 jfenwick 2625 (arg("fileName")="file.nc"),":rtype: `Domain`"
79 jfenwick 1872 /* ,return_value_policy<manage_new_object>());*/
80     );
81    
82 jfenwick 3082 def("ReadMesh",dudley::readMesh,
83 jfenwick 1872 (arg("fileName")="file.fly",arg("integrationOrder")=-1, arg("reducedIntegrationOrder")=-1, arg("optimize")=true)
84     /* ,return_value_policy<manage_new_object>());*/
85 jfenwick 2625 ,"Read a mesh from a file. For MPI parallel runs fan out the mesh to multiple processes.\n\n"
86     ":rtype: `Domain`\n:param fileName:\n:type fileName: ``string``\n"
87     ":param integrationOrder: order of the quadrature scheme. If *integrationOrder<0* the integration order is selected independently.\n"
88     ":type integrationOrder: ``int``\n"
89     ":param reducedIntegrationOrder: order of the quadrature scheme. If *reducedIntegrationOrder<0* the integration order is selected independently.\n"
90     ":param optimize: Enable optimisation of node labels\n:type optimize: ``bool``");
91 jgs 102
92 jfenwick 3082 def("ReadGmsh",dudley::readGmsh,
93 gross 2722 (arg("fileName")="file.msh",
94     arg("numDim"),
95     arg("integrationOrder")=-1,
96     arg("reducedIntegrationOrder")=-1,
97     arg("optimize")=true,
98     arg("useMacroElements")=false)
99 jfenwick 1872 // ,return_value_policy<manage_new_object>());
100 jfenwick 2625 ,"Read a gmsh mesh file\n\n"
101     ":rtype: `Domain`\n:param fileName:\n:type fileName: ``string``\n"
102     ":param integrationOrder: order of the quadrature scheme. If *integrationOrder<0* the integration order is selected independently.\n"
103     ":type integrationOrder: ``int``\n"
104     ":param reducedIntegrationOrder: order of the quadrature scheme. If *reducedIntegrationOrder<0* the integration order is selected independently.\n"
105 gross 2722 ":param optimize: Enable optimisation of node labels\n:type optimize: ``bool``\n"
106     ":param useMacroElements: Enable the usage of macro elements instead of second order elements.\n:type useMacroElements: ``bool``"
107     );
108 gross 934
109 jfenwick 3082 def ("Brick",dudley::brick,
110 jgs 102 (arg("n0")=1,arg("n1")=1,arg("n2")=1,
111     arg("order")=1,
112     arg("l0")=1.0,arg("l1")=1.0,arg("l2")=1.0,
113     arg("periodic0")=false,arg("periodic1")=false,arg("periodic2")=false,
114 gross 1059 arg("integrationOrder")=-1, arg("reducedIntegrationOrder")=-1,
115 ksteube 1312 arg("useElementsOnFace")=false,
116     arg("useFullElementOrder")=false,
117 jfenwick 1872 arg("optimize")=false)
118 jfenwick 3469 ,"Creates a tetrahedral mesh by subdividing n0 x n1 x n2 rectangular elements over the brick [0,l0] x [0,l1] x [0,l2]."
119 jfenwick 2625 "\n\n:param n0:\n:type n0:\n:param n1:\n:type n1:\n:param n2:\n:type n2:\n"
120 gross 2722 ":param order: =1, =-1 or =2 gives the order of shape function. If -1 macro elements of order 1 are used.\n"
121 jfenwick 2625 ":param l0: length of side 0\n:param l1:\n:param l2:\n"
122     ":param integrationOrder: order of the quadrature scheme. If integrationOrder<0 the integration order is selected independently.\n"
123     ":param reducedIntegrationOrder: order of the quadrature scheme. If reducedIntegrationOrder<0 the integration order is selected independently.\n"
124     ":param useElementsOnFace: whether or not to use elements on face\n"
125     ":type useElementsOnFace: ``int``"
126     ":param periodic0: whether or not boundary conditions are periodic\n"
127     ":param periodic1:\n:param periodic2:\n"
128     ":param useFullElementOrder:\n:param optimize:\n"
129 gross 2722 ":param optimize: Enable optimisation of node labels\n:type optimize: ``bool``"
130 jfenwick 2625 );
131 jgs 102
132 jfenwick 3082 def ("Rectangle",dudley::rectangle,
133 jgs 102 (arg("n0")=1,arg("n1")=1,arg("order")=1,
134     arg("l0")=1.0,arg("l1")=1.0,
135     arg("periodic0")=false,arg("periodic1")=false,
136 gross 1059 arg("integrationOrder")=-1, arg("reducedIntegrationOrder")=-1,
137 ksteube 1312 arg("useElementsOnFace")=false,
138     arg("useFullElementOrder")=false,
139 jfenwick 1872 arg("optimize")=false)
140 jfenwick 3469 ,"Creates a triangular mesh by subdividing n0 x n1 rectangular elements over the brick [0,l0] x [0,l1]."
141 jfenwick 2625 "\n\n:param n0:\n:type n0:\n:param n1:\n:type n1:\n"
142 gross 2722 ":param order: =1, =-1 or =2 gives the order of shape function. If -1 macro elements of order 1 are used.\n"
143 jfenwick 2625 ":param l0: length of side 0\n:param l1:\n"
144     ":param integrationOrder: order of the quadrature scheme. If integrationOrder<0 the integration order is selected independently.\n"
145     ":param reducedIntegrationOrder: order of the quadrature scheme. If reducedIntegrationOrder<0 the integration order is selected independently.\n"
146     ":param useElementsOnFace: whether or not to use elements on face\n"
147     ":type useElementsOnFace: ``int``"
148     ":param periodic0: whether or not boundary conditions are periodic\n"
149     ":param periodic1:\n"
150 gross 2722 ":param useFullElementOrder:\n:param optimize:\n"
151     ":param useMacroElements: Enable the usage of first order macro elements.\n:type useMacroElements: ``bool``\n"
152     ":param optimize: Enable optimisation of node labels\n:type optimize: ``bool``"
153     );
154 jgs 102
155 jfenwick 3082 class_<dudley::MeshAdapter, bases<escript::AbstractContinuousDomain> >
156 jfenwick 3086 ("MeshAdapter","A concrete class representing a domain. For more details, please consult the c++ documentation.",init<optional <Dudley_Mesh*> >())
157 jfenwick 3082 .def(init<const dudley::MeshAdapter&>())
158     .def("write",&dudley::MeshAdapter::write,args("filename"),
159 jfenwick 2625 "Write the current mesh to a file with the given name.")
160 jfenwick 3082 .def("print_mesh_info",&dudley::MeshAdapter::Print_Mesh_Info,(arg("full")=false),
161 jfenwick 2625 ":param full:\n:type full: ``bool``")
162 jfenwick 3082 .def("dump",&dudley::MeshAdapter::dump,args("fileName")
163 jfenwick 2625 ,"dumps the mesh to a file with the given name.")
164 jfenwick 3082 .def("getDescription",&dudley::MeshAdapter::getDescription,
165 jfenwick 2625 ":return: a description for this domain\n:rtype: ``string``")
166 jfenwick 3082 .def("getDim",&dudley::MeshAdapter::getDim,":rtype: ``int``")
167     .def("getDataShape",&dudley::MeshAdapter::getDataShape, args("functionSpaceCode"),
168 jfenwick 2625 ":return: a pair (dps, ns) where dps=the number of data points per sample, and ns=the number of samples\n:rtype: ``tuple``")
169 jfenwick 3082 .def("getNumDataPointsGlobal",&dudley::MeshAdapter::getNumDataPointsGlobal,
170 jfenwick 2625 ":return: the number of data points summed across all MPI processes\n"
171     ":rtype: ``int``")
172 jfenwick 3082 .def("addPDEToSystem",&dudley::MeshAdapter::addPDEToSystem,
173 jfenwick 3269 args("mat", "rhs","A", "B", "C", "D", "X", "Y", "d", "y", "d_contact", "y_contact"),
174 jfenwick 2625 "adds a PDE onto the stiffness matrix mat and a rhs\n\n"
175     ":param mat:\n:type mat: `OperatorAdapter`\n:param rhs:\n:type rhs: `Data`\n"
176     ":param A:\n:type A: `Data`\n"
177     ":param B:\n:type B: `Data`\n"
178     ":param C:\n:type C: `Data`\n"
179     ":param D:\n:type D: `Data`\n"
180     ":param X:\n:type X: `Data`\n"
181     ":param Y:\n:type Y: `Data`\n"
182     ":param d:\n:type d: `Data`\n"
183 jfenwick 3269 ":param d_contact:\n:type d_contact: `Data`\n"
184     ":param y_contact:\n:type y_contact: `Data`\n"
185 jfenwick 2625 )
186 jfenwick 3082 .def("addPDEToLumpedSystem",&dudley::MeshAdapter::addPDEToLumpedSystem,
187 jfenwick 2625 args("mat", "D", "d"),
188     "adds a PDE onto the lumped stiffness matrix\n\n"
189     ":param mat:\n:type mat: `Data`\n"
190     ":param D:\n:type D: `Data`\n"
191 gross 3379 ":param d:\n:type d: `Data`\n"
192     ":param useHRZ:\n:type useHRZ: bool\n"
193     )
194 jfenwick 3082 .def("addPDEToRHS",&dudley::MeshAdapter::addPDEToRHS,
195 jfenwick 2625 args("rhs", "X", "Y", "y", "y_contact"),
196     "adds a PDE onto the stiffness matrix mat and a rhs\n\n"
197     ":param rhs:\n:type rhs: `Data`\n"
198     ":param X:\n:type X: `Data`\n"
199     ":param Y:\n:type Y: `Data`\n"
200     ":param y:\n:type y: `Data`\n"
201 jfenwick 3269 ":param y_contact:\n:type y_contact: `Data`"
202 jfenwick 2625 )
203 jfenwick 3082 .def("addPDEToTransportProblem",&dudley::MeshAdapter::addPDEToTransportProblem,
204 jfenwick 2625 args( "tp", "source", "M", "A", "B", "C", "D", "X", "Y", "d", "y", "d_contact", "y_contact"),
205     ":param tp:\n:type tp: `TransportProblemAdapter`\n"
206     ":param source:\n:type source: `Data`\n"
207     ":param M:\n:type M: `Data`\n"
208     ":param A:\n:type A: `Data`\n"
209     ":param B:\n:type B: `Data`\n"
210     ":param C:\n:type C: `Data`\n"
211     ":param D:\n:type D: `Data`\n"
212     ":param X:\n:type X: `Data`\n"
213     ":param Y:\n:type Y: `Data`\n"
214     ":param d:\n:type d: `Data`\n"
215     ":param y:\n:type y: `Data`\n"
216     ":param d_contact:\n:type d_contact: `Data`\n"
217     ":param y_contact:\n:type y_contact: `Data`\n"
218     )
219 jfenwick 3082 .def("newOperator",&dudley::MeshAdapter::newSystemMatrix,
220 jfenwick 2625 args("row_blocksize", "row_functionspace", "column_blocksize", "column_functionspace", "type"),
221     "creates a SystemMatrixAdapter stiffness matrix and initializes it with zeros\n\n"
222     ":param row_blocksize:\n:type row_blocksize: ``int``\n"
223     ":param row_functionspace:\n:type row_functionspace: `FunctionSpace`\n"
224     ":param column_blocksize:\n:type column_blocksize: ``int``\n"
225     ":param column_functionspace:\n:type column_functionspace: `FunctionSpace`\n"
226     ":param type:\n:type type: ``int``\n"
227     )
228 jfenwick 3082 .def("newTransportProblem",&dudley::MeshAdapter::newTransportProblem,
229 jfenwick 2625 args("theta", "blocksize", "functionspace", "type"),
230     "creates a TransportProblemAdapter\n\n"
231     ":param theta:\n:type theta: ``float``\n"
232     ":param blocksize:\n:type blocksize: ``int``\n"
233     ":param functionspace:\n:type functionspace: `FunctionSpace`\n"
234     ":param type:\n:type type: ``int``\n"
235     )
236 jfenwick 3082 .def("getSystemMatrixTypeId",&dudley::MeshAdapter::getSystemMatrixTypeId,
237 jfenwick 2625 args("solver", "preconditioner", "package", "symmetry"),
238     ":return: the identifier of the matrix type to be used for the global stiffness matrix when a particular solver, package, perconditioner, and symmetric matrix is used.\n"
239     ":rtype: ``int``\n"
240     ":param solver:\n:type solver: ``int``\n"
241     ":param preconditioner:\n:type preconditioner: ``int``\n"
242     ":param package:\n:type package: ``int``\n"
243     ":param symmetry:\n:type symmetry: ``int``\n"
244     )
245 jfenwick 3082 .def("getTransportTypeId",&dudley::MeshAdapter::getTransportTypeId,
246 jfenwick 2625 args("solver", "preconditioner", "package", "symmetry"),
247     ":return: the identifier of the transport problem type to be used when a particular solver, perconditioner, package and symmetric matrix is used.\n"
248     ":rtype: ``int``\n"
249     ":param solver:\n:type solver: ``int``\n"
250     ":param preconditioner:\n:type preconditioner: ``int``\n"
251     ":param package:\n:type package: ``int``\n"
252     ":param symmetry:\n:type symmetry: ``int``\n"
253     )
254 jfenwick 3082 .def("setX",&dudley::MeshAdapter::setNewX,
255 jfenwick 2625 args("arg"), "assigns new location to the domain\n\n:param arg:\n:type arg: `Data`")
256 jfenwick 3082 .def("getX",&dudley::MeshAdapter::getX, ":return: locations in the FEM nodes\n\n"
257 jfenwick 2625 ":rtype: `Data`")
258 jfenwick 3082 .def("getNormal",&dudley::MeshAdapter::getNormal,
259 jfenwick 2625 ":return: boundary normals at the quadrature point on the face elements\n"
260     ":rtype: `Data`")
261 jfenwick 3082 .def("getSize",&dudley::MeshAdapter::getSize,":return: the element size\n"
262 jfenwick 2625 ":rtype: `Data`")
263 jfenwick 3082 .def("saveDX",&dudley::MeshAdapter::saveDX,args("filename" ,"arg"),
264 jfenwick 2625 "Saves a dictonary of Data objects to an OpenDX input file. The keywords are used as identifier"
265     "\n\n:param filename: \n:type filename: ``string``\n"
266     "\n:param arg: \n:type arg: ``dict``\n")
267 jfenwick 3082 .def("saveVTK",&dudley::MeshAdapter::saveVTK,
268 jfenwick 2625 args("filename" ,"arg", "metadata", "metadata_schema"),
269     "Saves a dictonary of Data objects to an VTK XML input file. The keywords are used as identifier"
270     "\n\n:param filename:\n:type filename: ``string``\n"
271     ":param arg:\n:type arg: ``dict``\n"
272     ":param metadata:\n:type metadata: ``string``\n"
273     ":param metadata_schema:\n:type metadata_schema: ``string``\n"
274     )
275 jfenwick 3082 .def("setTagMap",&dudley::MeshAdapter::setTagMap,args("name","tag"),
276 jfenwick 2625 "Give a tag number a name.\n\n:param name: Name for the tag\n:type name: ``string``\n"
277     ":param tag: numeric id\n:type tag: ``int``\n:note: Tag names must be unique within a domain")
278 jfenwick 3082 .def("getTag",&dudley::MeshAdapter::getTag,args("name"),":return: tag id for "
279 jfenwick 2625 "``name``\n:rtype: ``string``")
280 jfenwick 3082 .def("isValidTagName",&dudley::MeshAdapter::isValidTagName,args("name"),
281 jfenwick 2625 ":return: True is ``name`` corresponds to a tag\n:rtype: ``bool``")
282 jfenwick 3082 .def("showTagNames",&dudley::MeshAdapter::showTagNames,":return: A space separated list of tag names\n:rtype: ``string``")
283     .def("getMPISize",&dudley::MeshAdapter::getMPISize,":return: the number of processes used for this `Domain`\n:rtype: ``int``")
284     .def("getMPIRank",&dudley::MeshAdapter::getMPIRank,":return: the rank of this process\n:rtype: ``int``")
285     .def("MPIBarrier",&dudley::MeshAdapter::MPIBarrier,"Wait until all processes have reached this point")
286     .def("onMasterProcessor",&dudley::MeshAdapter::onMasterProcessor,":return: True if this code is executing on the master process\n:rtype: `bool`");
287 jgs 102
288     }

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision
svn:mergeinfo /branches/lapack2681/finley/src/CPPAdapter/finleycpp.cpp:2682-2741 /branches/pasowrap/dudley/src/CPPAdapter/dudleycpp.cpp:3661-3674 /branches/restext/finley/src/CPPAdapter/finleycpp.cpp:2610-2624 /branches/stage3.0/finley/src/CPPAdapter/finleycpp.cpp:2569-2590 /release/3.0/finley/src/CPPAdapter/finleycpp.cpp:2591-2601

  ViewVC Help
Powered by ViewVC 1.1.26