/[escript]/trunk/dudley/src/Assemble_LumpedSystem.c
ViewVC logotype

Diff of /trunk/dudley/src/Assemble_LumpedSystem.c

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

revision 3489 by gross, Wed Nov 24 04:48:49 2010 UTC revision 3490 by caltinay, Wed Mar 30 02:24:33 2011 UTC
# Line 45  void Dudley_Assemble_LumpedSystem(Dudley Line 45  void Dudley_Assemble_LumpedSystem(Dudley
45      const double *S = NULL;      const double *S = NULL;
46      double *EM_lumpedMat = NULL, *lumpedMat_p = NULL;      double *EM_lumpedMat = NULL, *lumpedMat_p = NULL;
47      register double rtmp;      register double rtmp;
     size_t len_EM_lumpedMat_size;  
48      register double m_t = 0., diagS = 0.;      register double m_t = 0., diagS = 0.;
49    
50    
# Line 127  void Dudley_Assemble_LumpedSystem(Dudley Line 126  void Dudley_Assemble_LumpedSystem(Dudley
126      requireWrite(lumpedMat);      requireWrite(lumpedMat);
127      lumpedMat_p = getSampleDataRW(lumpedMat, 0);      lumpedMat_p = getSampleDataRW(lumpedMat, 0);
128      len_EM_lumpedMat = p.numShapes * p.numEqu;      len_EM_lumpedMat = p.numShapes * p.numEqu;
     len_EM_lumpedMat_size = len_EM_lumpedMat * sizeof(double);  
129    
130      expandedD = isExpanded(D);      expandedD = isExpanded(D);
131      if (!getQuadShape(elements->numDim, reducedIntegrationOrder, &S))      if (!getQuadShape(elements->numDim, reducedIntegrationOrder, &S))

Legend:
Removed from v.3489  
changed lines
  Added in v.3490

  ViewVC Help
Powered by ViewVC 1.1.26