/[escript]/trunk/escript/src/DataExpanded.cpp
ViewVC logotype

Diff of /trunk/escript/src/DataExpanded.cpp

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

revision 474 by jgs, Mon Jan 30 04:23:44 2006 UTC revision 964 by gross, Tue Feb 13 05:10:26 2007 UTC
# Line 1  Line 1 
1  // $Id$  // $Id$
2  /*  /*
3   ******************************************************************************   ************************************************************
4   *                                                                            *   *          Copyright 2006 by ACcESS MNRF                   *
5   *       COPYRIGHT  ACcESS 2004 -  All Rights Reserved                        *   *                                                          *
6   *                                                                            *   *              http://www.access.edu.au                    *
7   * This software is the property of ACcESS. No part of this code              *   *       Primary Business: Queensland, Australia            *
8   * may be copied in any form or by any means without the expressed written    *   *  Licensed under the Open Software License version 3.0    *
9   * consent of ACcESS.  Copying, use or modification of this software          *   *     http://www.opensource.org/licenses/osl-3.0.php       *
10   * by any unauthorised person is illegal unless that person has a software    *   *                                                          *
11   * license agreement with ACcESS.                                             *   ************************************************************
  *                                                                            *  
  ******************************************************************************  
12  */  */
13    
 #include "DataException.h"  
14  #include "DataExpanded.h"  #include "DataExpanded.h"
15    #include "DataException.h"
16  #include "DataConstant.h"  #include "DataConstant.h"
17  #include "DataTagged.h"  #include "DataTagged.h"
 #include "DataArrayView.h"  
18    
19  #include <boost/python/extract.hpp>  #include <boost/python/extract.hpp>
20    
 #include <iostream>  
   
21  using namespace std;  using namespace std;
22  using namespace boost::python;  using namespace boost::python;
23  using namespace boost;  using namespace boost;
# Line 159  DataExpanded::~DataExpanded() Line 154  DataExpanded::~DataExpanded()
154  {  {
155  }  }
156    
 void  
 DataExpanded::reshapeDataPoint(const DataArrayView::ShapeType& shape)  
 {  
   if (getPointDataView().getRank()!=0) {  
     stringstream temp;  
     temp << "Error - Can only reshape Data with data points of rank 0. "  
          << "This Data has data points with rank: "  
          << getPointDataView().getRank();  
     throw DataException(temp.str());  
   }  
   //  
   // create the new DataBlocks2D data array, and a corresponding DataArrayView  
   DataBlocks2D newData(getNumSamples(),getNumDPPSample(),DataArrayView::noValues(shape));  
   DataArrayView newView(newData.getData(),shape);  
   //  
   // Copy the original data to every value for the new shape  
   int i,j;  
   int nRows=m_data.getNumRows();  
   int nCols=m_data.getNumCols();  
   #pragma omp parallel for private(i,j) schedule(static)  
   for (i=0;i<nRows;i++) {  
     for (j=0;j<nCols;j++) {  
       // NOTE: An exception may be thown from this call if  
       // DOASSERT is on which of course will play  
       // havoc with the omp threads. Run single threaded  
       // if using DOASSERT.  
       newView.copy(newData.index(i,j),m_data(i,j));  
     }  
   }  
   // swap the new data array for the original  
   m_data.Swap(newData);  
   // set the corresponding DataArrayView  
   DataArrayView temp(m_data.getData(),shape);  
   setPointDataView(temp);  
 }  
   
157  DataAbstract*  DataAbstract*
158  DataExpanded::getSlice(const DataArrayView::RegionType& region) const  DataExpanded::getSlice(const DataArrayView::RegionType& region) const
159  {  {
# Line 218  DataExpanded::setSlice(const DataAbstrac Line 177  DataExpanded::setSlice(const DataAbstrac
177    if (getPointDataView().getRank()!=region.size()) {    if (getPointDataView().getRank()!=region.size()) {
178      throw DataException("Error - Invalid slice region.");      throw DataException("Error - Invalid slice region.");
179    }    }
180    if (tempDataExp->getPointDataView().getRank()>0 and !value->getPointDataView().checkShape(shape)) {    if (tempDataExp->getPointDataView().getRank()>0 && !value->getPointDataView().checkShape(shape)) {
181      throw DataException (value->getPointDataView().createShapeErrorMessage(      throw DataException (value->getPointDataView().createShapeErrorMessage(
182          "Error - Couldn't copy slice due to shape mismatch.",shape));          "Error - Couldn't copy slice due to shape mismatch.",shape));
183    }    }
# Line 294  string Line 253  string
253  DataExpanded::toString() const  DataExpanded::toString() const
254  {  {
255    stringstream temp;    stringstream temp;
256      FunctionSpace fs=getFunctionSpace();
257    //    //
258    // create a temporary view as the offset will be changed    // create a temporary view as the offset will be changed
259    DataArrayView tempView(getPointDataView().getData(),getPointDataView().getShape(),getPointDataView().getOffset());    DataArrayView tempView(getPointDataView().getData(),getPointDataView().getShape(),getPointDataView().getOffset());
# Line 301  DataExpanded::toString() const Line 261  DataExpanded::toString() const
261      for (int j=0;j<m_data.getNumCols();j++) {      for (int j=0;j<m_data.getNumCols();j++) {
262        tempView.setOffset(m_data.index(i,j));        tempView.setOffset(m_data.index(i,j));
263        stringstream suffix;        stringstream suffix;
264        suffix << "(" << i << "," << j << ")";        suffix << "( id: " << i << ", ref: " << fs.getReferenceIDOfSample(i) << ", pnt: " << j << ")";
265        temp << tempView.toString(suffix.str());        temp << tempView.toString(suffix.str());
266        if (!(i==(m_data.getNumRows()-1) && j==(m_data.getNumCols()-1))) {        if (!(i==(m_data.getNumRows()-1) && j==(m_data.getNumCols()-1))) {
267          temp << endl;          temp << endl;
# Line 332  DataExpanded::getLength() const Line 292  DataExpanded::getLength() const
292    return m_data.size();    return m_data.size();
293  }  }
294    
 void  
 DataExpanded::setRefValue(int ref,  
                           const DataArray& value)  
 {  
   //  
   // Get the number of samples and data-points per sample.  
   int numSamples = getNumSamples();  
   int numDPPSample = getNumDPPSample();  
   
   //  
   // Determine the sample number which corresponds to this reference number.  
   int sampleNo = -1;  
   int tempRef = -1;  
   for (int n=0; n<numSamples; n++) {  
     tempRef = getFunctionSpace().getReferenceNoFromSampleNo(n);  
     if (tempRef == ref) {  
       sampleNo = n;  
       break;  
     }  
   }  
   if (sampleNo == -1) {  
     throw DataException("DataExpanded::setRefValue error: invalid ref number supplied.");  
   }  
   
   for (int n=0; n<numDPPSample; n++) {  
     //  
     // Get *each* data-point in the sample in turn.  
     DataArrayView pointView = getDataPoint(sampleNo, n);  
     //  
     // Assign the values in the DataArray to this data-point.  
     pointView.copy(value.getView());  
   }  
 }  
   
 void  
 DataExpanded::getRefValue(int ref,  
                           DataArray& value)  
 {  
   //  
   // Get the number of samples and data-points per sample.  
   int numSamples = getNumSamples();  
   int numDPPSample = getNumDPPSample();  
   
   //  
   // Determine the sample number which corresponds to this reference number  
   int sampleNo = -1;  
   int tempRef = -1;  
   for (int n=0; n<numSamples; n++) {  
     tempRef = getFunctionSpace().getReferenceNoFromSampleNo(n);  
     if (tempRef == ref) {  
       sampleNo = n;  
       break;  
     }  
   }  
   if (sampleNo == -1) {  
     throw DataException("DataExpanded::getRefValue error: invalid ref number supplied.");  
   }  
   
   //  
   // Get the *first* data-point associated with this sample number.  
   DataArrayView pointView = getDataPoint(sampleNo, 0);  
   
   //  
   // Load the values from this data-point into the DataArray  
   value.getView().copy(pointView);  
 }  
   
295  int  int
296  DataExpanded::archiveData(ofstream& archiveFile,  DataExpanded::archiveData(ofstream& archiveFile,
297                            const DataArrayView::ValueType::size_type noValues) const                            const DataArrayView::ValueType::size_type noValues) const
# Line 413  DataExpanded::extractData(ifstream& arch Line 306  DataExpanded::extractData(ifstream& arch
306    return(m_data.extractData(archiveFile, noValues));    return(m_data.extractData(archiveFile, noValues));
307  }  }
308    
309    void
310    DataExpanded::copyToDataPoint(const int sampleNo, const int dataPointNo, const double value) {
311      //
312      // Get the number of samples and data-points per sample.
313      int numSamples = getNumSamples();
314      int numDataPointsPerSample = getNumDPPSample();
315      int dataPointRank = getPointDataView().getRank();
316      ShapeType dataPointShape = getPointDataView().getShape();
317      if (numSamples*numDataPointsPerSample > 0) {
318         //TODO: global error handling
319         if ((sampleNo >= numSamples) || (sampleNo < 0 )) {
320              throw DataException("Error - DataExpanded::copyDataPoint invalid sampleNo.");
321         }
322         if ((dataPointNo >= numDataPointsPerSample) || (dataPointNo < 0)) {
323               throw DataException("Error - DataExpanded::copyDataPoint invalid dataPointNoInSample.");
324         }
325         DataArrayView dataPointView = getDataPoint(sampleNo, dataPointNo);
326         if (dataPointRank==0) {
327             dataPointView()=value;
328         } else if (dataPointRank==1) {
329            for (int i=0; i<dataPointShape[0]; i++) {
330                dataPointView(i)=value;
331            }
332         } else if (dataPointRank==2) {
333            for (int i=0; i<dataPointShape[0]; i++) {
334               for (int j=0; j<dataPointShape[1]; j++) {
335                  dataPointView(i,j)=value;
336               }
337            }
338         } else if (dataPointRank==3) {
339            for (int i=0; i<dataPointShape[0]; i++) {
340               for (int j=0; j<dataPointShape[1]; j++) {
341                  for (int k=0; k<dataPointShape[2]; k++) {
342                     dataPointView(i,j,k)=value;
343                  }
344               }
345            }
346         } else if (dataPointRank==4) {
347             for (int i=0; i<dataPointShape[0]; i++) {
348               for (int j=0; j<dataPointShape[1]; j++) {
349                 for (int k=0; k<dataPointShape[2]; k++) {
350                   for (int l=0; l<dataPointShape[3]; l++) {
351                      dataPointView(i,j,k,l)=value;
352                   }
353                 }
354               }
355             }
356         }
357      }
358    }
359    void
360    DataExpanded::copyToDataPoint(const int sampleNo, const int dataPointNo, const boost::python::numeric::array& value) {
361      //
362      // Get the number of samples and data-points per sample.
363      int numSamples = getNumSamples();
364      int numDataPointsPerSample = getNumDPPSample();
365      int dataPointRank = getPointDataView().getRank();
366      ShapeType dataPointShape = getPointDataView().getShape();
367      //
368      // check rank:
369      if (value.getrank()!=dataPointRank)
370           throw DataException("Rank of numarray does not match Data object rank");
371      if (numSamples*numDataPointsPerSample > 0) {
372         //TODO: global error handling
373         if ((sampleNo >= numSamples) || (sampleNo < 0 )) {
374              throw DataException("Error - DataExpanded::copyDataPoint invalid sampleNo.");
375         }
376         if ((dataPointNo >= numDataPointsPerSample) || (dataPointNo < 0)) {
377               throw DataException("Error - DataExpanded::copyDataPoint invalid dataPointNoInSample.");
378         }
379         DataArrayView dataPointView = getDataPoint(sampleNo, dataPointNo);
380         if (dataPointRank==0) {
381             dataPointView()=extract<double>(value[0]);
382         } else if (dataPointRank==1) {
383            for (int i=0; i<dataPointShape[0]; i++) {
384                dataPointView(i)=extract<double>(value[i]);
385            }
386         } else if (dataPointRank==2) {
387            for (int i=0; i<dataPointShape[0]; i++) {
388               for (int j=0; j<dataPointShape[1]; j++) {
389                  dataPointView(i,j)=extract<double>(value[i][j]);
390               }
391            }
392         } else if (dataPointRank==3) {
393            for (int i=0; i<dataPointShape[0]; i++) {
394               for (int j=0; j<dataPointShape[1]; j++) {
395                  for (int k=0; k<dataPointShape[2]; k++) {
396                     dataPointView(i,j,k)=extract<double>(value[i][j][k]);
397                  }
398               }
399            }
400         } else if (dataPointRank==4) {
401             for (int i=0; i<dataPointShape[0]; i++) {
402               for (int j=0; j<dataPointShape[1]; j++) {
403                 for (int k=0; k<dataPointShape[2]; k++) {
404                   for (int l=0; l<dataPointShape[3]; l++) {
405                      dataPointView(i,j,k,l)=extract<double>(value[i][j][k][l]);
406                   }
407                 }
408               }
409             }
410         }
411      }
412    }
413  void  void
414  DataExpanded::copyAll(const boost::python::numeric::array& value) {  DataExpanded::copyAll(const boost::python::numeric::array& value) {
415    //    //
# Line 467  DataExpanded::copyAll(const boost::pytho Line 464  DataExpanded::copyAll(const boost::pytho
464      }      }
465    }    }
466  }  }
467    void
468    DataExpanded::symmetric(DataAbstract* ev)
469    {
470      int sampleNo,dataPointNo;
471      int numSamples = getNumSamples();
472      int numDataPointsPerSample = getNumDPPSample();
473      DataExpanded* temp_ev=dynamic_cast<DataExpanded*>(ev);
474      if (temp_ev==0) {
475        throw DataException("Error - DataExpanded::symmetric: casting to DataExpanded failed (propably a programming error).");
476      }
477      DataArrayView& thisView=getPointDataView();
478      DataArrayView& evView=ev->getPointDataView();
479      #pragma omp parallel for private(sampleNo,dataPointNo) schedule(static)
480      for (sampleNo = 0; sampleNo < numSamples; sampleNo++) {
481        for (dataPointNo = 0; dataPointNo < numDataPointsPerSample; dataPointNo++) {
482             DataArrayView::symmetric(thisView,getPointOffset(sampleNo,dataPointNo),
483                                        evView,ev->getPointOffset(sampleNo,dataPointNo));
484        }
485      }
486    }
487    void
488    DataExpanded::nonsymmetric(DataAbstract* ev)
489    {
490      int sampleNo,dataPointNo;
491      int numSamples = getNumSamples();
492      int numDataPointsPerSample = getNumDPPSample();
493      DataExpanded* temp_ev=dynamic_cast<DataExpanded*>(ev);
494      if (temp_ev==0) {
495        throw DataException("Error - DataExpanded::nonsymmetric: casting to DataExpanded failed (propably a programming error).");
496      }
497      DataArrayView& thisView=getPointDataView();
498      DataArrayView& evView=ev->getPointDataView();
499      #pragma omp parallel for private(sampleNo,dataPointNo) schedule(static)
500      for (sampleNo = 0; sampleNo < numSamples; sampleNo++) {
501        for (dataPointNo = 0; dataPointNo < numDataPointsPerSample; dataPointNo++) {
502             DataArrayView::nonsymmetric(thisView,getPointOffset(sampleNo,dataPointNo),
503                                        evView,ev->getPointOffset(sampleNo,dataPointNo));
504        }
505      }
506    }
507    void
508    DataExpanded::trace(DataAbstract* ev, int axis_offset)
509    {
510      int sampleNo,dataPointNo;
511      int numSamples = getNumSamples();
512      int numDataPointsPerSample = getNumDPPSample();
513      DataExpanded* temp_ev=dynamic_cast<DataExpanded*>(ev);
514      if (temp_ev==0) {
515        throw DataException("Error - DataExpanded::trace: casting to DataExpanded failed (propably a programming error).");
516      }
517      DataArrayView& thisView=getPointDataView();
518      DataArrayView& evView=ev->getPointDataView();
519      #pragma omp parallel for private(sampleNo,dataPointNo) schedule(static)
520      for (sampleNo = 0; sampleNo < numSamples; sampleNo++) {
521        for (dataPointNo = 0; dataPointNo < numDataPointsPerSample; dataPointNo++) {
522             DataArrayView::trace(thisView,getPointOffset(sampleNo,dataPointNo),
523                                        evView,ev->getPointOffset(sampleNo,dataPointNo),axis_offset);
524        }
525      }
526    }
527    
528    void
529    DataExpanded::transpose(DataAbstract* ev, int axis_offset)
530    {
531      int sampleNo,dataPointNo;
532      int numSamples = getNumSamples();
533      int numDataPointsPerSample = getNumDPPSample();
534      DataExpanded* temp_ev=dynamic_cast<DataExpanded*>(ev);
535      if (temp_ev==0) {
536        throw DataException("Error - DataExpanded::transpose: casting to DataExpanded failed (propably a programming error).");
537      }
538      DataArrayView& thisView=getPointDataView();
539      DataArrayView& evView=ev->getPointDataView();
540      #pragma omp parallel for private(sampleNo,dataPointNo) schedule(static)
541      for (sampleNo = 0; sampleNo < numSamples; sampleNo++) {
542        for (dataPointNo = 0; dataPointNo < numDataPointsPerSample; dataPointNo++) {
543             DataArrayView::transpose(thisView,getPointOffset(sampleNo,dataPointNo),
544                                        evView,ev->getPointOffset(sampleNo,dataPointNo),axis_offset);
545        }
546      }
547    }
548    
549    void
550    DataExpanded::swapaxes(DataAbstract* ev, int axis0, int axis1)
551    {
552      int sampleNo,dataPointNo;
553      int numSamples = getNumSamples();
554      int numDataPointsPerSample = getNumDPPSample();
555      DataExpanded* temp_ev=dynamic_cast<DataExpanded*>(ev);
556      if (temp_ev==0) {
557        throw DataException("Error - DataExpanded::swapaxes: casting to DataExpanded failed (propably a programming error).");
558      }
559      DataArrayView& thisView=getPointDataView();
560      DataArrayView& evView=ev->getPointDataView();
561      #pragma omp parallel for private(sampleNo,dataPointNo) schedule(static)
562      for (sampleNo = 0; sampleNo < numSamples; sampleNo++) {
563        for (dataPointNo = 0; dataPointNo < numDataPointsPerSample; dataPointNo++) {
564             DataArrayView::swapaxes(thisView,getPointOffset(sampleNo,dataPointNo),
565                                        evView,ev->getPointOffset(sampleNo,dataPointNo),axis0,axis1);
566        }
567      }
568    }
569    void
570    DataExpanded::eigenvalues(DataAbstract* ev)
571    {
572      int sampleNo,dataPointNo;
573      int numSamples = getNumSamples();
574      int numDataPointsPerSample = getNumDPPSample();
575      DataExpanded* temp_ev=dynamic_cast<DataExpanded*>(ev);
576      if (temp_ev==0) {
577        throw DataException("Error - DataExpanded::eigenvalues: casting to DataExpanded failed (propably a programming error).");
578      }
579      DataArrayView& thisView=getPointDataView();
580      DataArrayView& evView=ev->getPointDataView();
581      #pragma omp parallel for private(sampleNo,dataPointNo) schedule(static)
582      for (sampleNo = 0; sampleNo < numSamples; sampleNo++) {
583        for (dataPointNo = 0; dataPointNo < numDataPointsPerSample; dataPointNo++) {
584             DataArrayView::eigenvalues(thisView,getPointOffset(sampleNo,dataPointNo),
585                                        evView,ev->getPointOffset(sampleNo,dataPointNo));
586        }
587      }
588    }
589    void
590    DataExpanded::eigenvalues_and_eigenvectors(DataAbstract* ev,DataAbstract* V,const double tol)
591    {
592      int numSamples = getNumSamples();
593      int numDataPointsPerSample = getNumDPPSample();
594      int sampleNo,dataPointNo;
595      DataExpanded* temp_ev=dynamic_cast<DataExpanded*>(ev);
596      if (temp_ev==0) {
597        throw DataException("Error - DataExpanded::eigenvalues_and_eigenvectors: casting to DataExpanded failed (propably a programming error).");
598      }
599      DataExpanded* temp_V=dynamic_cast<DataExpanded*>(V);
600      if (temp_V==0) {
601        throw DataException("Error - DataExpanded::eigenvalues_and_eigenvectors: casting to DataExpanded failed (propably a programming error).");
602      }
603      DataArrayView& thisView=getPointDataView();
604      DataArrayView& evView=ev->getPointDataView();
605      DataArrayView& VView=V->getPointDataView();
606      #pragma omp parallel for private(sampleNo,dataPointNo) schedule(static)
607      for (sampleNo = 0; sampleNo < numSamples; sampleNo++) {
608        for (dataPointNo = 0; dataPointNo < numDataPointsPerSample; dataPointNo++) {
609             DataArrayView::eigenvalues_and_eigenvectors(thisView,getPointOffset(sampleNo,dataPointNo),
610                                                         evView,ev->getPointOffset(sampleNo,dataPointNo),
611                                                         VView,V->getPointOffset(sampleNo,dataPointNo),
612                                                         tol);
613        }
614      }
615    }
616    
617    void
618    DataExpanded::dump(const std::string fileName) const
619    {
620        throw DataException("Error - DataExpanded:: dump: not implemented.");
621    }
622    
623    
624  }  // end of namespace  }  // end of namespace

Legend:
Removed from v.474  
changed lines
  Added in v.964

  ViewVC Help
Powered by ViewVC 1.1.26