ExpressionImpl.cc

// -*- tab-width: 2; indent-tabs-mode: nil; coding: utf-8-with-signature -*-
//-----------------------------------------------------------------------------
// Copyright 2000-2026 CEA (www.cea.fr) IFPEN (www.ifpenergiesnouvelles.com)
// See the top-level COPYRIGHT file for details.
// SPDX-License-Identifier: Apache-2.0
//-----------------------------------------------------------------------------
/*---------------------------------------------------------------------------*/
/* ExpressionImpl.cc                                           (C) 2000-2014 */
/*                                                                           */
/* Implementation of an expression.                                          */
/*---------------------------------------------------------------------------*/
/*---------------------------------------------------------------------------*/
 
#include "arcane/utils/Iostream.h"
#include "arcane/utils/Array.h"
#include "arcane/expr/ExpressionImpl.h"
#include "arcane/expr/OperatorMng.h"
 
/*---------------------------------------------------------------------------*/
/*---------------------------------------------------------------------------*/
 
namespace Arcane
{
 
/*---------------------------------------------------------------------------*/
/*---------------------------------------------------------------------------*/
 
ExpressionImpl::
ExpressionImpl()
: m_op_mng(OperatorMng::instance())
, m_nb_reference(0)
, m_do_trace(false)
{
}
 
/*---------------------------------------------------------------------------*/
/*---------------------------------------------------------------------------*/
 
void ExpressionImpl::
addRef()
{
  ++m_nb_reference;
}
 
/*---------------------------------------------------------------------------*/
/*---------------------------------------------------------------------------*/
 
void ExpressionImpl::
removeRef()
{
  --m_nb_reference;
  if (m_nb_reference == 0) {
    //cout << "** DELETE\n";
    delete this;
  }
}
 
/*---------------------------------------------------------------------------*/
/*---------------------------------------------------------------------------*/

void ExpressionImpl::
dumpIf(IExpressionImpl* test_expr, Array<Expression>& add_exprs)
{
  UniqueArray<Expression> exprs(add_exprs.size() + 1);
  exprs[0] = this;
  for (Integer i = 0; i < add_exprs.size(); ++i)
    exprs[i + 1] = add_exprs[i];
 
  Integer size = vectorSize();
  UniqueArray<bool> test_values(size);
  // Le variant appartient ensuite à résult qui le détruira
  ArrayVariant* test_variant = new ArrayVariant(test_values);
  ExpressionResult test_expr_result(test_variant);
 
  test_expr->apply(&test_expr_result);
 
  Integer nb_expr = exprs.size();
  SharedArray<SharedArray<Real>> display_values(nb_expr);
  for (Integer i = 0; i < nb_expr; ++i) {
    display_values[i].resize(size);
    ArrayVariant* expr_variant = new ArrayVariant(display_values[i]);
    ExpressionResult expr_result(expr_variant);
    exprs[i]->apply(&expr_result);
  }
 
  cout.flags(std::ios::scientific);
  std::streamsize ss = std::cout.precision();
  cout.precision(10);
 
  for (Integer i = 0; i < size; ++i) {
    if (test_values[i]) {
      cout << "valeur [" << i << "] ";
      for (Integer j = 0; j < nb_expr; ++j) {
        cout << ' ' << display_values[j][i];
      }
      cout << '\n';
    }
  }
  std::cout.precision(ss);
}
 
/*---------------------------------------------------------------------------*/
/*---------------------------------------------------------------------------*/
 
} // namespace Arcane
 
/*---------------------------------------------------------------------------*/
/*---------------------------------------------------------------------------*/