74{
75 char *cname,*cname2,*ccomment;
76 int cname_len,cname_len1,ccomment_len;
77 int i,cpt_size;
78 float node[3];
79 H3D_ID node_id;
80 unsigned int elem_count = 1;
81
82 cname_len = *size1 + 1;
83 cname=(char*) malloc(sizeof(char)*cname_len);
84 for(i=0;i<*size1;i++) cname[i] = name1[i];
85
86 cpt_size = 0;
87 for(i=0;i<*size1;i++)
88 {
89 if(name1[i] != ' ') cpt_size = i;
90 }
91 cname[cpt_size+1]='\0';
92
93 ccomment_len = *s_comment + 1;
94 ccomment=(char*) malloc(sizeof(char)*ccomment_len);
95 for(i=0;i<*s_comment;i++) ccomment[i] = comment[i];
96 ccomment[*s_comment]='\0';
97
98 char * LAYERPOOL = new char [100];
99 LAYERPOOL[0] ='\0';
100 char * LAYER_STRING = new char [100];
101 LAYER_STRING[0] ='\0';
102 char * NUVAR_STRING = new char [100];
103 NUVAR_STRING[0] ='\0';
104 char * IR_STRING = new char [100];
105 IR_STRING[0] ='\0';
106 char * IS_STRING = new char [100];
107 IS_STRING[0] ='\0';
108 char * IT_STRING = new char [100];
109 IT_STRING[0] ='\0';
110 char * MID_STRING = new char [100];
111 MID_STRING[0] ='\0';
112
113
114 if( strncmp(cname,
"Strain",6) == 0 )
tensor_type = H3D_DS_STRAIN_2D;
115 if( strncmp(cname,
"Stress",6) == 0 )
tensor_type = H3D_DS_STRESS_2D;
116 if( strncmp(cname,
"Strn rate",9) == 0 )
tensor_type = H3D_DS_STRAIN_2D;
117
118 H3D_ID layer_pool_id = H3D_NULL_ID;
119 if(*layer > 0 || *nuvar > 0 || *ir > 0 || *is > 0 || *it > 0 )
120 {
121
122 if(*nuvar > 0 && *layer > 0 && *ir > 0 && *is > 0)
123 {
124 sprintf(LAYER_STRING, "USER VARIABLE %d / LAYER IR IS %d %d %d" ,*nuvar,*ir,*is,*it);
125#ifdef _WIN64
126 strcat_s(LAYERPOOL,100,LAYER_STRING);
127#else
128 LAYERPOOL = strcat(LAYERPOOL,LAYER_STRING);
129#endif
130 }
131 else if(*nuvar > 0 && *ir > 0 && *is > 0 && *it > 0)
132 {
133 sprintf(LAYER_STRING, "USER VARIABLE %d / IR IS IT %d %d %d" ,*nuvar,*ir,*is,*it);
134#ifdef _WIN64
135 strcat_s(LAYERPOOL,100,LAYER_STRING);
136#else
137 LAYERPOOL = strcat(LAYERPOOL,LAYER_STRING);
138#endif
139 }
140 else if(*nuvar > 0)
141 {
142 sprintf(LAYER_STRING, "USER VARIABLE %d " ,*nuvar);
143#ifdef _WIN64
144 strcat_s(LAYERPOOL,100,LAYER_STRING);
145#else
146 LAYERPOOL = strcat(LAYERPOOL,LAYER_STRING);
147#endif
148 }
149 else if(*layer > 0 && *ir > 0 && *is > 0 )
150 {
151 sprintf(LAYER_STRING, "LAYER IR IS %d %d %d " ,*layer,*ir,*is);
152#ifdef _WIN64
153 strcat_s(LAYERPOOL,100,LAYER_STRING);
154#else
155 LAYERPOOL = strcat(LAYERPOOL,LAYER_STRING);
156#endif
157 }
158 else if(*layer > 0)
159 {
160 sprintf(LAYER_STRING, "LAYER %d " ,*layer);
161#ifdef _WIN64
162 strcat_s(LAYERPOOL,100,LAYER_STRING);
163#else
164 LAYERPOOL = strcat(LAYERPOOL,LAYER_STRING);
165#endif
166 }
167 else if(*ir > 0 && *is > 0 && *it > 0)
168 {
169 sprintf(LAYER_STRING, "IR IS IT %d %d %d" ,*ir,*is,*it);
170#ifdef _WIN64
171 strcat_s(LAYERPOOL,100,LAYER_STRING);
172#else
173 LAYERPOOL = strcat(LAYERPOOL,LAYER_STRING);
174#endif
175 }
176 }
177 else if(*layer < -1 )
178 {
179 if(*layer == -2)
180 {
181 sprintf(LAYER_STRING, "Layer Lower " );
182#ifdef _WIN64
183 strcat_s(LAYERPOOL,100,LAYER_STRING);
184#else
185 LAYERPOOL = strcat(LAYERPOOL,LAYER_STRING);
186#endif
187 }
188 if(*layer == -3)
189 {
190 sprintf(LAYER_STRING, "Layer Upper " );
191#ifdef _WIN64
192 strcat_s(LAYERPOOL,100,LAYER_STRING);
193#else
194 LAYERPOOL = strcat(LAYERPOOL,LAYER_STRING);
195#endif
196 }
197 }
198 else
199 {
200 sprintf(LAYER_STRING, "OUTER" );
201#ifdef _WIN64
202 strcat_s(LAYERPOOL,100,LAYER_STRING);
203#else
204 LAYERPOOL = strcat(LAYERPOOL,LAYER_STRING);
205#endif
206 }
208
210
211 try {
212
214
217
219
222
226
227 if (strlen(ccomment) != 0)
228 {
231 }
232
236
239
240 }
241
242 catch(...) {
244 }
245 delete [] LAYERPOOL;
246 delete [] LAYER_STRING;
247 delete [] NUVAR_STRING;
248 delete [] IR_STRING;
249 delete [] IS_STRING;
250 delete [] IT_STRING;
251 delete [] MID_STRING;
252 free(cname);
253 free(ccomment);
254
255}
H3D_TENSOR_TYPE tensor_type
bool Hyper3DDatatypePools(H3DFileInfo *h3d_file, H3D_ID dt_id, H3D_ID poolname_id, unsigned int num_layers, H3D_ID *layername_ids, bool corners, H3D_TENSOR_TYPE tensor_type, float poisson)
bool Hyper3DAddString(H3DFileInfo *h3d_file, const char *const string, H3D_ID *const str_id)
bool Hyper3DDatatypeEnd(H3DFileInfo *h3d_file)
bool Hyper3DExportClearError(H3DFileInfo *h3d_file)
bool Hyper3DDatatypeDescriptionWrite(H3DFileInfo *h3d_file, H3D_ID dt_id, const char *description)
bool Hyper3DDatatypeWrite(H3DFileInfo *h3d_file, const char *label, H3D_ID dt_id, H3D_DS_FORMAT format, H3D_DS_TYPE type, unsigned int num_pools)
bool Hyper3DDatatypeBegin(H3DFileInfo *h3d_file, unsigned int count)