238 {
239 PetscFunctionBegin;
240
241 double x,y,z;
242 for(unsigned int gg = 0;gg<data.getN().size1();gg++) {
243
244 double area;
246 area = norm_2(getNormalsAtGaussPts(gg))*0.5;
247 } else {
248 area = getArea();
249 }
250 double val = getGaussPts()(2,gg)*area;
251
252 x = getCoordsAtGaussPts()(gg,0);
253 y = getCoordsAtGaussPts()(gg,1);
254 z = getCoordsAtGaussPts()(gg,2);
255
257 case 3:
258 X_mat.resize(3,6,
false);
264 break;
265 case 1:
266 X_mat.resize(3,3,
false);
269 break;
270 default:
271 SETERRQ(PETSC_COMM_SELF,1,"not implemented");
272 }
273
274 int shape_size = data.getN().size2();
277
278
279 {
280 int kk=0;
281 for(int ii=0; ii<shape_size; ii++){
282
283 double val = data.getN()(gg,ii);
284 for(
int jj=0; jj<
rank; jj++) {
286 kk++;
287 }
288 }
289 if(gg==0) {
291 } else{
293 }
294 }
295
296 }
297
298 PetscFunctionReturn(0);
299 }