/[escript]/branches/trilinos_from_5897/dudley/src/Mesh_tet4.cpp
ViewVC logotype

Diff of /branches/trilinos_from_5897/dudley/src/Mesh_tet4.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 5962 by caltinay, Fri Feb 5 03:37:49 2016 UTC revision 5963 by caltinay, Mon Feb 22 06:59:27 2016 UTC
# Line 191  Dudley_Mesh *Dudley_TriangularMesh_Tet4( Line 191  Dudley_Mesh *Dudley_TriangularMesh_Tet4(
191              global_i0 = i0 + offset0;              global_i0 = i0 + offset0;
192              global_i1 = i1 + offset1;              global_i1 = i1 + offset1;
193              global_i2 = i2 + offset2;              global_i2 = i2 + offset2;
194              out->Nodes->Coordinates[INDEX2(0, k, DIM)] = DBLE(global_i0) / DBLE(N0 - 1) * Length[0];              out->Nodes->Coordinates[INDEX2(0, k, DIM)] = (double)global_i0 / (double)(N0 - 1) * Length[0];
195              out->Nodes->Coordinates[INDEX2(1, k, DIM)] = DBLE(global_i1) / DBLE(N1 - 1) * Length[1];              out->Nodes->Coordinates[INDEX2(1, k, DIM)] = (double)global_i1 / (double)(N1 - 1) * Length[1];
196              out->Nodes->Coordinates[INDEX2(2, k, DIM)] = DBLE(global_i2) / DBLE(N2 - 1) * Length[2];              out->Nodes->Coordinates[INDEX2(2, k, DIM)] = (double)global_i2 / (double)(N2 - 1) * Length[2];
197              out->Nodes->Id[k] = Nstride0 * global_i0 + Nstride1 * global_i1 + Nstride2 * global_i2;              out->Nodes->Id[k] = Nstride0 * global_i0 + Nstride1 * global_i1 + Nstride2 * global_i2;
198              out->Nodes->Tag[k] = 0;              out->Nodes->Tag[k] = 0;
199              out->Nodes->globalDegreesOfFreedom[k] = Nstride0 * (global_i0 % NDOF0)              out->Nodes->globalDegreesOfFreedom[k] = Nstride0 * (global_i0 % NDOF0)

Legend:
Removed from v.5962  
changed lines
  Added in v.5963

  ViewVC Help
Powered by ViewVC 1.1.26