~vcs-imports/escript-finley/trunk

« back to all changes in this revision

Viewing changes to finley/src/Assemble_PDE.c

  • Committer: jfenwick
  • Date: 2010-10-11 01:48:14 UTC
  • Revision ID: svn-v4:77569008-7704-0410-b7a0-a92fef0b09fd:trunk:3259
Merging dudley and scons updates from branches

Show diffs side-by-side

added added

removed removed

Lines of Context:
55
55
 
56
56
  bool_t reducedIntegrationOrder=FALSE;
57
57
  char error_msg[LenErrorMsg_MAX];
58
 
  Assemble_Parameters p;
 
58
  Finley_Assemble_Parameters p;
59
59
  double time0;
60
60
  dim_t dimensions[ESCRIPT_MAX_DATA_RANK];
61
61
  type_t funcspace;
63
63
 
64
64
  Finley_resetError();
65
65
 
66
 
  {
67
 
#ifdef Paso_MPI
68
 
  int iam, numCPUs;
69
 
  iam = elements->elementDistribution->MPIInfo->rank;
70
 
  numCPUs = elements->elementDistribution->MPIInfo->size;
71
 
#endif
72
 
  }
73
 
 
74
66
  if (nodes==NULL || elements==NULL) return;
75
67
  if (S==NULL && isEmpty(F)) return;
76
68
 
136
128
  if (! Finley_noError()) return;
137
129
 
138
130
  /* set all parameters in p*/
139
 
  Assemble_getAssembleParameters(nodes,elements,S,F, reducedIntegrationOrder, &p);
 
131
  Finley_Assemble_getAssembleParameters(nodes,elements,S,F, reducedIntegrationOrder, &p);
140
132
  if (! Finley_noError()) return;
141
133
 
142
134
  /* check if all function spaces are the same */