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

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

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

revision 938 by gross, Tue Jan 23 09:52:45 2007 UTC revision 939 by gross, Thu Jan 25 04:23:38 2007 UTC
# Line 49  Finley_Mesh* Finley_Mesh_read(char* fnam Line 49  Finley_Mesh* Finley_Mesh_read(char* fnam
49    sprintf(frm,"%%%d[^\n]",LenString_MAX-1);    sprintf(frm,"%%%d[^\n]",LenString_MAX-1);
50    fscanf(fileHandle_p, frm, name);    fscanf(fileHandle_p, frm, name);
51    
52      /* get the nodes */
53    
54      fscanf(fileHandle_p, "%1d%*s %d\n", &numDim,&numNodes);
55    /* allocate mesh */    /* allocate mesh */
56  #ifndef PASO_MPI  #ifndef PASO_MPI
57    mesh_p = Finley_Mesh_alloc(name,numDim,order);    mesh_p = Finley_Mesh_alloc(name,numDim,order);
58      if (! Finley_noError()) return NULL;
59  #else  #else
60    /* TODO */    /* TODO */
61  #endif  #endif
   if (! Finley_noError()) return NULL;  
   /* get the nodes */  
62    
   fscanf(fileHandle_p, "%1d%*s %d\n", &numDim,&numNodes);  
63  #ifndef PASO_MPI  #ifndef PASO_MPI
64    Finley_NodeFile_allocTable(mesh_p->Nodes, numNodes);    Finley_NodeFile_allocTable(mesh_p->Nodes, numNodes);
65    if (! Finley_noError()) return NULL;    if (! Finley_noError()) return NULL;

Legend:
Removed from v.938  
changed lines
  Added in v.939

  ViewVC Help
Powered by ViewVC 1.1.26