コード例 #1
0
ファイル: SundanceListExpr.cpp プロジェクト: 00liujj/trilinos
Expr ListExpr::join(const Expr& other) const 
{
  Expr rtn = new ListExpr(elements_);
  
  for (int i=0; i<other.size(); i++)
    {
      rtn.append(other[i]);
    }

  return rtn;
}
コード例 #2
0
void L2Projector::init(const DiscreteSpace& space,
                       const CoordinateSystem& coordSys,
                       const Expr& expr,
                       const LinearSolver<double>& solver)
{
    TEST_FOR_EXCEPTION(space.basis().size() != expr.size(),
                       RuntimeError,
                       "mismatched vector structure between basis and expr");

    TEST_FOR_EXCEPTION(space.basis().size() == 0,
                       RuntimeError,
                       "Empty basis?");

    Expr v = new TestFunction(space.basis()[0], "dummy_v[0]");
    Expr u = new UnknownFunction(space.basis()[0], "dummy_u[0]");

    for (int i=1; i<space.basis().size(); i++)
    {
        v.append(new TestFunction(space.basis()[i], "dummy_v["
                                  + Teuchos::toString(i)+"]"));
        u.append(new UnknownFunction(space.basis()[i], "dummy_u["
                                     + Teuchos::toString(i)+"]"));
    }

    CellFilter interior = new MaximalCellFilter();

    Expr eqn = 0.0;
    Expr J = coordSys.jacobian();

    for (int i=0; i<space.basis().size(); i++)
    {
        eqn = eqn + Integral(space.cellFilters(i),
                             J*v[i]*(u[i]-expr[i]),
                             new GaussianQuadrature(4));
    }
    Expr bc;

    prob_ = LinearProblem(space.mesh(), eqn, bc, v, u, space.vecType());
    solver_ = solver;
}
コード例 #3
0
ファイル: SundanceListExpr.cpp プロジェクト: 00liujj/trilinos
Expr ListExpr::flatten() const 
{
  Expr rtn = new ListExpr();

  for (int i=0; i<this->size(); i++)
    {
      Expr e = element(i).flatten();
      for (int j=0; j<e.size(); j++)
        {
          rtn.append(e[j]);
        }
    }

  return rtn;
}