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

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

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

trunk/finley/src/finley/Mesh_saveDX.c revision 201 by jgs, Wed Nov 23 04:10:21 2005 UTC trunk/finley/src/Mesh_saveDX.c revision 903 by gross, Fri Nov 17 01:59:49 2006 UTC
# Line 1  Line 1 
1  /*  /*
2   ******************************************************************************   ************************************************************
3   *                                                                            *   *          Copyright 2006 by ACcESS MNRF                   *
4   *       COPYRIGHT  ACcESS 2003,2004,2005 -  All Rights Reserved              *   *                                                          *
5   *                                                                            *   *              http://www.access.edu.au                    *
6   * This software is the property of ACcESS. No part of this code              *   *       Primary Business: Queensland, Australia            *
7   * may be copied in any form or by any means without the expressed written    *   *  Licensed under the Open Software License version 3.0    *
8   * consent of ACcESS.  Copying, use or modification of this software          *   *     http://www.opensource.org/licenses/osl-3.0.php       *
9   * by any unauthorised person is illegal unless that person has a software    *   *                                                          *
10   * license agreement with ACcESS.                                             *   ************************************************************
  *                                                                            *  
  ******************************************************************************  
11  */  */
12    
13    
# Line 243  void Finley_Mesh_saveDX(const char * fil Line 241  void Finley_Mesh_saveDX(const char * fil
241                  for (i=0;i<elements->numElements;i++) {                  for (i=0;i<elements->numElements;i++) {
242                      values=getSampleData(data_pp[i_data],i);                      values=getSampleData(data_pp[i_data],i);
243                      for (k=0;k<nComp;k++) {                      for (k=0;k<nComp;k++) {
244                          rtmp=0.;                          if ( isExpanded(data_pp[i_data]) ) {
245                          for (j=0;j<numPointsPerSample;j++) rtmp+=values[INDEX2(k,j,nComp)];                              rtmp=0.;
246                          fprintf(fileHandle_p, " %g", rtmp/numPointsPerSample);                              for (j=0;j<numPointsPerSample;j++) rtmp+=values[INDEX2(k,j,nComp)];
247                                fprintf(fileHandle_p, " %g", rtmp/numPointsPerSample);
248                            } else {
249                                fprintf(fileHandle_p, " %g", values[k]);
250                            }
251                      }                      }
252                  fprintf(fileHandle_p, "\n");                  fprintf(fileHandle_p, "\n");
253                  }                  }

Legend:
Removed from v.201  
changed lines
  Added in v.903

  ViewVC Help
Powered by ViewVC 1.1.26