amroc/amr/Interfaces/SchemeBrepOutput.h

Go to the documentation of this file.

// -*- C++ -*-

// Copyright (C) 2012 Oak Ridge National Laboratory
// Ralf Deiterding, deiterdingr@ornl.gov

#ifndef AMROC_SCHEME_BREP_OUTPUT_H
#define AMROC_SCHEME_BREP_OUTPUT_H

#include "Interfaces/SchemeFileOutput.h"
#include "BrepOutput.h"

template <class SchemeType, int dim>
class SchemeBrepOutput : public SchemeOutBase<SchemeType,dim>,
  public BrepOutput<typename SchemeType::VectorType,dim> {
  typedef typename SchemeType::VectorType VectorType;
  typedef typename VectorType::InternalDataType DataType;
  typedef BrepOutput<VectorType,dim> base;
  typedef SchemeOutBase<SchemeType,dim> out_base;
public:
  typedef typename base::vec_grid_fct_type vec_grid_fct_type;  
  typedef typename base::grid_fct_type grid_fct_type;
  typedef typename base::interpolation_type interpolation_type;
  typedef typename base::point_type point_type;
  typedef GridData<VectorType,dim> vec_grid_data_type;  
  typedef GridData<DataType,dim> grid_data_type;  

  SchemeBrepOutput(interpolation_type* interpol, SchemeType &lbm) : out_base(lbm), base(interpol) {}

  virtual ~SchemeBrepOutput() {}

  virtual void WriteOut(vec_grid_fct_type& u, 
                        const int num_vertices, const DataType* vertices,
                        const int num_connections, const int* connections) {

    VectorType* data = new VectorType[num_vertices];
    int Time = CurrentTime(base::GH(),0);
    double t = GetPhysicalTime(u,Time,0);
    base::Interpolation().PointsValues(u,t,num_vertices,(const point_type*)vertices,data);
    int NValues = num_vertices*base::NEquations();
    base::Interpolation().ArrayCombine(VizServer,NValues,(DataType *)data);

    if (MY_PROC==VizServer) {
      DataType* output_data = new DataType[base::Ncnt()*num_vertices];
      BBox bb(dim,1);
      bb.lower() = 0; bb.upper() = 0;
      bb.upper()(0) = num_vertices-1;
      vec_grid_data_type val(bb,data);
      for (int cnt=1;cnt<=base::Ncnt(); cnt++) {
        if (base::OutputName(cnt-1).c_str()[0] == '-') continue;
        grid_data_type output(bb,output_data+(cnt-1)*num_vertices);
        out_base::Scheme().Output(val,output,cnt,0);
        for (register int i=0; i<num_vertices; i++)
          if (data[i](0)==base::Interpolation().ErrorValue())
            output_data[(cnt-1)*num_vertices+i]=base::Interpolation().ErrorValue();

        DataType* dummy;
        output.deallocate(dummy);
      }
      VectorType* dummy;
      val.deallocate(dummy);

      base::WriteMesh(num_vertices,vertices,num_connections,connections,Time,t,output_data);

      delete [] output_data;
    }
    delete [] data;
  } 
};

#endif      

---