source: issm/trunk/src/mex/InputToResult/InputToResult.cpp@ 4218

Last change on this file since 4218 was 4218, checked in by Eric.Larour, 15 years ago

New class Materials

File size: 1.4 KB
RevLine 
[4138]1/*\file InputToResult.c
2 *\brief: duplicate input
3 */
4
5#include "./InputToResult.h"
6
7void mexFunction( int nlhs, mxArray* plhs[], int nrhs, const mxArray* prhs[]){
8
9 /*diverse: */
10 int noerr=1;
11
12 /*input datasets: */
[4215]13 Elements* elements=NULL;
[4211]14 Nodes* nodes=NULL;
[4213]15 Vertices* vertices=NULL;
[4214]16 Loads* loads=NULL;
[4218]17 Materials* materials=NULL;
[4138]18 Parameters* parameters=NULL;
19 int enum_type,step;
20 double time;
21
22 /*Boot module: */
23 MODULEBOOT();
24
25 /*checks on arguments on the matlab side: */
26 CheckNumMatlabArguments(nlhs,NLHS,nrhs,NRHS,__FUNCT__,&InputToResultUsage);
27
28 /*Input datasets: */
[4215]29 FetchData((DataSet**)&elements,ELEMENTS);
[4211]30 FetchData((DataSet**)&nodes,NODES);
[4213]31 FetchData((DataSet**)&vertices,VERTICES);
[4214]32 FetchData((DataSet**)&loads,LOADS);
[4218]33 FetchData((DataSet**)&materials,MATERIALS);
[4138]34 FetchParams(&parameters,PARAMETERS);
35
36 FetchData(&enum_type,ENUMTYPE);
37 FetchData(&step,STEP);
38 FetchData(&time,TIME);
39
40 /*!Call core code: */
41 InputToResultx( elements, nodes, vertices, loads, materials,parameters,enum_type, step,time);
42
43 /*write output : */
44 WriteData(ELEMENTSOUT,elements);
45
46 /*Free ressources: */
47 delete elements;
48 delete nodes;
49 delete vertices;
50 delete loads;
51 delete materials;
52 delete parameters;
53
54 /*end module: */
55 MODULEEND();
56
57}
58
59void InputToResultUsage(void)
60{
61 _printf_("\n");
62 _printf_(" usage: [elements] = %s(elements, nodes, vertices, loads, materials, parameters, enum_type,step,time);\n",__FUNCT__);
63 _printf_("\n");
64}
Note: See TracBrowser for help on using the repository browser.