[1985] | 1 | /*! |
---|
| 2 | \file axis_algorithm_reduce_domain.cpp |
---|
| 3 | \author Ha NGUYEN |
---|
| 4 | \since 23 June 2016 |
---|
| 5 | \date 23 June 2016 |
---|
| 6 | |
---|
| 7 | \brief Algorithm for extract a domain to an axis |
---|
| 8 | */ |
---|
| 9 | #include "axis_algorithm_extract_domain.hpp" |
---|
| 10 | #include "extract_domain_to_axis.hpp" |
---|
| 11 | #include "axis.hpp" |
---|
| 12 | #include "domain.hpp" |
---|
| 13 | #include "grid.hpp" |
---|
| 14 | #include "grid_transformation_factory_impl.hpp" |
---|
| 15 | #include "reduction.hpp" |
---|
| 16 | |
---|
| 17 | namespace xios { |
---|
| 18 | CGenericAlgorithmTransformation* CAxisAlgorithmExtractDomain::create(bool isSource, CGrid* gridDst, CGrid* gridSrc, |
---|
| 19 | CTransformation<CAxis>* transformation, |
---|
| 20 | int elementPositionInGrid, |
---|
| 21 | std::map<int, int>& elementPositionInGridSrc2ScalarPosition, |
---|
| 22 | std::map<int, int>& elementPositionInGridSrc2AxisPosition, |
---|
| 23 | std::map<int, int>& elementPositionInGridSrc2DomainPosition, |
---|
| 24 | std::map<int, int>& elementPositionInGridDst2ScalarPosition, |
---|
| 25 | std::map<int, int>& elementPositionInGridDst2AxisPosition, |
---|
| 26 | std::map<int, int>& elementPositionInGridDst2DomainPosition) |
---|
| 27 | TRY |
---|
| 28 | { |
---|
| 29 | std::vector<CAxis*> axisListDestP = gridDst->getAxis(); |
---|
| 30 | std::vector<CDomain*> domainListSrcP = gridSrc->getDomains(); |
---|
| 31 | |
---|
| 32 | CExtractDomainToAxis* extractDomain = dynamic_cast<CExtractDomainToAxis*> (transformation); |
---|
| 33 | int axisDstIndex = elementPositionInGridDst2AxisPosition[elementPositionInGrid]; |
---|
| 34 | int domainSrcIndex = elementPositionInGridSrc2DomainPosition[elementPositionInGrid]; |
---|
| 35 | |
---|
[1988] | 36 | return (new CAxisAlgorithmExtractDomain(isSource, axisListDestP[axisDstIndex], domainListSrcP[domainSrcIndex], extractDomain)); |
---|
[1985] | 37 | } |
---|
| 38 | CATCH |
---|
| 39 | |
---|
| 40 | bool CAxisAlgorithmExtractDomain::dummyRegistered_ = CAxisAlgorithmExtractDomain::registerTrans(); |
---|
| 41 | bool CAxisAlgorithmExtractDomain::registerTrans() |
---|
| 42 | TRY |
---|
| 43 | { |
---|
| 44 | return CGridTransformationFactory<CAxis>::registerTransformation(TRANS_EXTRACT_DOMAIN_TO_AXIS, create); |
---|
| 45 | } |
---|
| 46 | CATCH |
---|
| 47 | |
---|
| 48 | |
---|
[1988] | 49 | CAxisAlgorithmExtractDomain::CAxisAlgorithmExtractDomain(bool isSource, CAxis* axisDestination, CDomain* domainSource, CExtractDomainToAxis* algo) |
---|
[1999] | 50 | : CAlgorithmTransformationTransfer(isSource), pos_(-1), axisDest_(axisDestination), domainSrc_(domainSource) |
---|
[1985] | 51 | TRY |
---|
| 52 | { |
---|
[2117] | 53 | axisDestination->checkAttributes() ; |
---|
[1985] | 54 | algo->checkValid(axisDestination, domainSource); |
---|
| 55 | StdString op = "extract"; |
---|
| 56 | |
---|
| 57 | switch (algo->direction) |
---|
| 58 | { |
---|
| 59 | case CExtractDomainToAxis::direction_attr::jDir: |
---|
| 60 | dir_ = jDir; |
---|
| 61 | break; |
---|
| 62 | case CExtractDomainToAxis::direction_attr::iDir: |
---|
| 63 | dir_ = iDir; |
---|
| 64 | break; |
---|
| 65 | default: |
---|
| 66 | break; |
---|
| 67 | } |
---|
| 68 | |
---|
| 69 | pos_ = algo->position; |
---|
| 70 | |
---|
[1999] | 71 | auto& transMap = this->transformationMapping_; |
---|
[1985] | 72 | |
---|
| 73 | CArray<int,1>& axisDstIndex = axisDest_->index; |
---|
| 74 | int ni_glo = domainSrc_->ni_glo, nj_glo = domainSrc_->nj_glo; |
---|
| 75 | if (jDir == dir_) |
---|
| 76 | { |
---|
| 77 | int nbAxisIdx = axisDstIndex.numElements(); |
---|
| 78 | for (int idxAxis = 0; idxAxis < nbAxisIdx; ++idxAxis) |
---|
| 79 | { |
---|
| 80 | int globalAxisIdx = axisDstIndex(idxAxis); |
---|
[1999] | 81 | transMap[globalAxisIdx] = globalAxisIdx * ni_glo + pos_; |
---|
[1985] | 82 | } |
---|
| 83 | } |
---|
| 84 | else if (iDir == dir_) |
---|
| 85 | { |
---|
| 86 | int nbAxisIdx = axisDstIndex.numElements(); |
---|
| 87 | for (int idxAxis = 0; idxAxis < nbAxisIdx; ++idxAxis) |
---|
| 88 | { |
---|
| 89 | int globalAxisIdx = axisDstIndex(idxAxis); |
---|
[1999] | 90 | transMap[globalAxisIdx] = globalAxisIdx + ni_glo * pos_; |
---|
[1985] | 91 | } |
---|
| 92 | } |
---|
| 93 | else |
---|
| 94 | {} |
---|
[1999] | 95 | |
---|
| 96 | axisDestination->checkAttributes() ; |
---|
| 97 | this->computeAlgorithm(domainSource->getLocalView(CElementView::WORKFLOW), axisDestination->getLocalView(CElementView::WORKFLOW)) ; |
---|
[1985] | 98 | } |
---|
| 99 | CATCH |
---|
[1999] | 100 | |
---|
| 101 | |
---|
| 102 | CAxisAlgorithmExtractDomain::~CAxisAlgorithmExtractDomain() |
---|
| 103 | TRY |
---|
| 104 | { |
---|
[1985] | 105 | } |
---|
[1999] | 106 | CATCH |
---|
| 107 | |
---|
| 108 | } |
---|