/[escript]/trunk/finley/src/Assemble_NodeCoordinates.c
ViewVC logotype

Diff of /trunk/finley/src/Assemble_NodeCoordinates.c

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

revision 471 by jgs, Fri Jan 27 01:33:02 2006 UTC revision 584 by gross, Thu Mar 9 23:03:38 2006 UTC
# Line 37  void Finley_Assemble_NodeCoordinates(Fin Line 37  void Finley_Assemble_NodeCoordinates(Fin
37    Finley_resetError();    Finley_resetError();
38    if (nodes==NULL) return;    if (nodes==NULL) return;
39    if (! numSamplesEqual(x,1,nodes->numNodes)) {    if (! numSamplesEqual(x,1,nodes->numNodes)) {
40         Finley_setError(TYPE_ERROR,"__FILE__: illegal number of samples of Data object");         Finley_setError(TYPE_ERROR,"Finley_Assemble_NodeCoordinates: illegal number of samples of Data object");
41    } else if (getFunctionSpaceType(x)!=FINLEY_NODES) {    } else if (getFunctionSpaceType(x)!=FINLEY_NODES) {
42         Finley_setError(TYPE_ERROR,"__FILE__: Data object is not defined on nodes.");         Finley_setError(TYPE_ERROR,"Finley_Assemble_NodeCoordinates: Data object is not defined on nodes.");
43    } else if (! isExpanded(x)) {    } else if (! isExpanded(x)) {
44         Finley_setError(TYPE_ERROR,"__FILE__: expanded Data object expected");         Finley_setError(TYPE_ERROR,"Finley_Assemble_NodeCoordinates: expanded Data object expected");
45    } else if (! isDataPointShapeEqual(x,1, &(nodes->numDim))) {    } else if (! isDataPointShapeEqual(x,1, &(nodes->numDim))) {
46         sprintf(error_msg,"__FILE__: Data object of shape (%d,) expected",nodes->numDim);         sprintf(error_msg,"Finley_Assemble_NodeCoordinates: Data object of shape (%d,) expected",nodes->numDim);
47         Finley_setError(TYPE_ERROR,error_msg);         Finley_setError(TYPE_ERROR,error_msg);
48    } else {    } else {
49         #pragma omp parallel for private(n)         #pragma omp parallel for private(n)

Legend:
Removed from v.471  
changed lines
  Added in v.584

  ViewVC Help
Powered by ViewVC 1.1.26