meshToMesh.H

Go to the documentation of this file.

/*---------------------------------------------------------------------------*\
  =========                 |
  \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
   \\    /   O peration     |
    \\  /    A nd           | Copyright (C) 2012-2014 OpenFOAM Foundation
     \\/     M anipulation  | Copyright (C) 2015 OpenCFD Ltd.
-------------------------------------------------------------------------------
License
    This file is part of OpenFOAM.
 
    OpenFOAM is free software: you can redistribute it and/or modify it
    under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.
 
    OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
    ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
    FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
    for more details.
 
    You should have received a copy of the GNU General Public License
    along with OpenFOAM.  If not, see <http://www.gnu.org/licenses/>.
 
Class
    Foam::meshToMesh
 
Description
    Class to calculate the cell-addressing between two overlapping meshes
 
    Mapping is performed using a run-time selectable interpolation mothod
 
SeeAlso
    meshToMeshMethod
 
SourceFiles
    meshToMesh.C
    meshToMeshParallelOps.C
    meshToMeshTemplates.C
 
\*---------------------------------------------------------------------------*/
 
#ifndef meshToMesh_H
#define meshToMesh_H
 
#include "polyMesh.H"
#include "treeBoundBox.H"
#include "mapDistribute.H"
#include "volFieldsFwd.H"
#include "NamedEnum.H"
#include "AMIPatchToPatchInterpolation.H"
#include "pointList.H"
 
// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
namespace Foam
{
 
/*---------------------------------------------------------------------------*\
                          Class meshToMesh Declaration
\*---------------------------------------------------------------------------*/
 
class meshToMesh
{
public:
 
    // Public data types
 
        //- Enumeration specifying interpolation method
        enum interpolationMethod
        {
            imDirect,
            imMapNearest,
            imCellVolumeWeight,
            imCorrectedCellVolumeWeight
        };
 
        static const NamedEnum<interpolationMethod, 4>
            interpolationMethodNames_;
 
private:
 
    // Private data
 
        //- Reference to the source mesh
        const polyMesh& srcRegion_;
 
        //- Reference to the target mesh
        const polyMesh& tgtRegion_;
 
        //- List of target patch IDs per source patch (local index)
        List<label> srcPatchID_;
 
        //- List of source patch IDs per target patch (local index)
        List<label> tgtPatchID_;
 
        //- List of AMIs between source and target patches
        PtrList<AMIPatchToPatchInterpolation> patchAMIs_;
 
        //- Cutting patches whose values are set using a zero-gradient condition
        List<label> cuttingPatches_;
 
        //- Source to target cell addressing
        labelListList srcToTgtCellAddr_;
 
        //- Target to source cell addressing
        labelListList tgtToSrcCellAddr_;
 
        //- Source to target cell interplation weights
        scalarListList srcToTgtCellWght_;
 
        //- Target to source cell interpolation weights
        scalarListList tgtToSrcCellWght_;
 
        // Vectors from cell centre to overlap volume for 2nd order correction
        // (only set for corrected methods)
 
            //- Source to target cell offset vectors
            pointListList srcToTgtCellVec_;
 
            //- Target to source cell offset vectors
            pointListList tgtToSrcCellVec_;
 
        //- Cell total volume in overlap region [m3]
        scalar V_;
 
        //- Index of processor that holds all of both sides. -1 in all other
        //  cases
        label singleMeshProc_;
 
        //- Source map pointer - parallel running only
        autoPtr<mapDistribute> srcMapPtr_;
 
        //- Target map pointer - parallel running only
        autoPtr<mapDistribute> tgtMapPtr_;
 
 
    // Private Member Functions
 
        //- Helper function to add a constant offset to a list
        template<class Type>
        void add(UList<Type>& fld, const label offset) const;
 
        //- Helper function to interpolate internal field. Optionally uses
        //  gradient. Template specialisations for tensor types below
        template<class Type, class CombineOp>
        void mapInternalSrcToTgt
        (
            const GeometricField<Type, fvPatchField, volMesh>& field,
            const CombineOp& cop,
            GeometricField<Type, fvPatchField, volMesh>& result,
            const bool secondOrder
        ) const;
 
        //- Helper function to interpolate internal field. Optionally uses
        //  gradient. Template specialisations for tensor types below
        template<class Type, class CombineOp>
        void mapInternalTgtToSrc
        (
            const GeometricField<Type, fvPatchField, volMesh>& field,
            const CombineOp& cop,
            GeometricField<Type, fvPatchField, volMesh>& result,
            const bool secondOrder
        ) const;
 
        //- Helper function to interpolate patch field. Template
        //  specialisations  below
        template<class Type, class CombineOp>
        void mapAndOpSrcToTgt
        (
            const AMIPatchToPatchInterpolation& AMI,
            const Field<Type>& srcField,
            Field<Type>& tgtField,
            const CombineOp& cop
        ) const;
 
        //- Helper function to interpolate patch field. Template
        //  specialisations  below
        template<class Type, class CombineOp>
        void mapAndOpTgtToSrc
        (
            const AMIPatchToPatchInterpolation& AMI,
            Field<Type>& srcField,
            const Field<Type>& tgtField,
            const CombineOp& cop
        ) const;
 
        //- Return src cell IDs for the overlap region
        labelList maskCells(const polyMesh& src, const polyMesh& tgt) const;
 
        //- Normalise the interpolation weights
        void normaliseWeights
        (
            const word& descriptor,
            const labelListList& addr,
            scalarListList& wght
        ) const;
 
        //- Calculate the addressing between overlapping regions of src and tgt
        //  meshes
        void calcAddressing
        (
            const word& methodName,
            const polyMesh& src,
            const polyMesh& tgt
        );
 
        //- Calculate - main driver function
        void calculate(const word& methodName);
 
        //- Calculate patch overlap
        void calculatePatchAMIs(const word& amiMethodName);
 
        //- Constructor helper
        void constructNoCuttingPatches
        (
            const word& methodName,
            const word& AMIMethodName,
            const bool interpAllPatches
        );
 
        //- Constructor helper
        void constructFromCuttingPatches
        (
            const word& methodName,
            const word& AMIMethodName,
            const HashTable<word>& patchMap,
            const wordList& cuttingPatches
        );
 
        // Parallel operations
 
            //- Determine whether the meshes are split across multiple pocessors
            label calcDistribution
            (
                const polyMesh& src,
                const polyMesh& tgt
            ) const;
 
            //- Determine which processor bounding-boxes overlap
            label calcOverlappingProcs
            (
                const List<treeBoundBoxList>& procBb,
                const boundBox& bb,
                boolList& overlaps
            ) const;
 
            //- Calculate the mapping between processors
            autoPtr<mapDistribute> calcProcMap
            (
                const polyMesh& src,
                const polyMesh& tgt
            ) const;
 
            //- Distribute mesh info from 'my' processor to others
            void distributeCells
            (
                const mapDistribute& map,
                const polyMesh& tgtMesh,
                const globalIndex& globalI,
                List<pointField>& points,
                List<label>& nInternalFaces,
                List<faceList>& faces,
                List<labelList>& faceOwner,
                List<labelList>& faceNeighbour,
                List<labelList>& cellIDs,
                List<labelList>& nbrProcIDs,
                List<labelList>& procLocalFaceIDs
            ) const;
 
            //- Collect pieces of tgt mesh from other procssors and restructure
            void distributeAndMergeCells
            (
                const mapDistribute& map,
                const polyMesh& tgt,
                const globalIndex& globalI,
                pointField& tgtPoints,
                faceList& tgtFaces,
                labelList& tgtFaceOwners,
                labelList& tgtFaceNeighbours,
                labelList& tgtCellIDs
            ) const;
 
 
        //- Disallow default bitwise copy construct
        meshToMesh(const meshToMesh&);
 
        //- Disallow default bitwise assignment
        void operator=(const meshToMesh&);
 
 
public:
 
    //- Run-time type information
    TypeName("meshToMesh");
 
 
    //- Construct from source and target meshes
    meshToMesh
    (
        const polyMesh& src,
        const polyMesh& tgt,
        const interpolationMethod& method,
        const bool interpAllPatches = true
    );
 
    //- Construct from source and target meshes, generic mapping methods
    meshToMesh
    (
        const polyMesh& src,
        const polyMesh& tgt,
        const word& methodName,     // internal mapping
        const word& AMIMethodName,  // boundary mapping
        const bool interpAllPatches = true
    );
 
    //- Construct from source and target meshes
    meshToMesh
    (
        const polyMesh& src,
        const polyMesh& tgt,
        const interpolationMethod& method,
        const HashTable<word>& patchMap,
        const wordList& cuttingPatches
    );
 
 
    //- Construct from source and target meshes, generic mapping methods
    meshToMesh
    (
        const polyMesh& src,
        const polyMesh& tgt,
        const word& methodName,     // internal mapping
        const word& AMIMethodName,  // boundary mapping
        const HashTable<word>& patchMap,
        const wordList& cuttingPatches
    );
 
 
    //- Destructor
    virtual ~meshToMesh();
 
 
    // Member Functions
 
        // Access
 
            //- Return const access to the source mesh
            inline const polyMesh& srcRegion() const;
 
            //- Return const access to the target mesh
            inline const polyMesh& tgtRegion() const;
 
            //- Return const access to the source to target cell addressing
            inline const labelListList& srcToTgtCellAddr() const;
 
            //- Return const access to the target to source cell addressing
            inline const labelListList& tgtToSrcCellAddr() const;
 
            //- Return const access to the source to target cell weights
            inline const scalarListList& srcToTgtCellWght() const;
 
            //- Return const access to the target to source cell weights
            inline const scalarListList& tgtToSrcCellWght() const;
 
            //- Return const access to the source to target offset vectors
            inline const pointListList& srcToTgtCellVec() const;
 
            //- Return const access to the target to source offset vectors
            inline const pointListList& tgtToSrcCellVec() const;
 
            //- Return const access to the overlap volume
            inline scalar V() const;
 
            //- Conversion between mesh and patch interpolation methods
            static AMIPatchToPatchInterpolation::interpolationMethod
            interpolationMethodAMI
            (
                const interpolationMethod method
            );
 
            //- Return the list of AMIs between source and target patches
            inline const PtrList<AMIPatchToPatchInterpolation>&
            patchAMIs() const;
 
 
        // Evaluation
 
            // Source-to-target field mapping
 
                //- Map field from src to tgt mesh with defined operation.
                //  Values passed in via 'result' are used to initialise the
                //  return value
                template<class Type, class CombineOp>
                void mapSrcToTgt
                (
                    const UList<Type>& srcFld,
                    const CombineOp& cop,
                    List<Type>& result
                ) const;
 
                //- Map extrapolated field (using gradient) from src to tgt
                //  mesh with defined operation. Falls back to non-extrapolated
                //  mapping (above) if not constructed with method that supports
                //  getting offset vectors. Extrapolation only for internal
                //  values. Values passed in via 'result' are used to
                //  initialise the return value.
                template<class Type, class CombineOp>
                void mapSrcToTgt
                (
                    const UList<Type>& srcField,
                    const UList<typename outerProduct<vector, Type>::type>&,
                    const CombineOp& cop,
                    List<Type>& result
                ) const;
 
                //- Return the src field mapped to the tgt mesh with a defined
                //  operation. Initial values of the result are set to zero
                template<class Type, class CombineOp>
                tmp<Field<Type> > mapSrcToTgt
                (
                    const Field<Type>& srcFld,
                    const CombineOp& cop
                ) const;
 
                //- Convenience function to map a tmp field to the tgt mesh
                //  with a defined operation
                template<class Type, class CombineOp>
                tmp<Field<Type> > mapSrcToTgt
                (
                    const tmp<Field<Type> >& tsrcFld,
                    const CombineOp& cop
                ) const;
 
                //- Convenience function to map a field to the tgt mesh with a
                //  default operation (plusEqOp)
                template<class Type>
                tmp<Field<Type> > mapSrcToTgt
                (
                    const Field<Type>& srcFld
                ) const;
 
                //- Convenience function to map a tmp field to the tgt mesh
                //  with a default operation (plusEqOp)
                template<class Type>
                tmp<Field<Type> > mapSrcToTgt
                (
                    const tmp<Field<Type> >& tsrcFld
                ) const;
 
 
            // Target-to-source field mapping
 
                //- Map field from tgt to src mesh with defined operation
                //  Values passed in via 'result' are used to initialise the
                //  return value
                template<class Type, class CombineOp>
                void mapTgtToSrc
                (
                    const UList<Type>& tgtFld,
                    const CombineOp& cop,
                    List<Type>& result
                ) const;
 
                //- Map extrapolated field (using gradient) from tgt to src
                //  mesh with defined operation. Falls back to non-extrapolated
                //  mapping (above) if not constructed with method that supports
                //  getting offset vectors. Extrapolation only for internal
                //  values. Values passed in via 'result' are used to
                //  initialise the return value
                template<class Type, class CombineOp>
                void mapTgtToSrc
                (
                    const UList<Type>& srcField,
                    const UList<typename outerProduct<vector, Type>::type>&,
                    const CombineOp& cop,
                    List<Type>& result
                ) const;
 
                //- Return the tgt field mapped to the src mesh with a defined
                //  operation. Initial values of the result are set to zero
                template<class Type, class CombineOp>
                tmp<Field<Type> > mapTgtToSrc
                (
                    const Field<Type>& tgtFld,
                    const CombineOp& cop
                ) const;
 
                //- Convenience function to map a tmp field to the src mesh
                //  with a defined operation
                template<class Type, class CombineOp>
                tmp<Field<Type> > mapTgtToSrc
                (
                    const tmp<Field<Type> >& ttgtFld,
                    const CombineOp& cop
                ) const;
 
                //- Convenience function to map a field to the src mesh with a
                //  default operation (plusEqOp)
                template<class Type>
                tmp<Field<Type> > mapTgtToSrc
                (
                    const Field<Type>& tgtFld
                ) const;
 
                //- Convenience function to map a tmp field to the src mesh
                //  with a default operation (plusEqOp)
                template<class Type>
                tmp<Field<Type> > mapTgtToSrc
                (
                    const tmp<Field<Type> >& ttgtFld
                ) const;
 
 
            // Source-to-target volume field mapping
 
                //- Interpolate a field with a defined operation.  Values
                //  passed in via 'result' are used to initialise the return
                //  value. Optionallly uses gradient correction (internal
                //  field only) if interpolationMethod supports it
                template<class Type, class CombineOp>
                void mapSrcToTgt
                (
                    const GeometricField<Type, fvPatchField, volMesh>& field,
                    const CombineOp& cop,
                    GeometricField<Type, fvPatchField, volMesh>& result,
                    const bool secondOrder = true
                ) const;
 
                //- Interpolate a field with a defined operation.  The initial
                //  values of the result are set to zero
                template<class Type, class CombineOp>
                tmp<GeometricField<Type, fvPatchField, volMesh> > mapSrcToTgt
                (
                    const GeometricField<Type, fvPatchField, volMesh>& field,
                    const CombineOp& cop,
                    const bool secondOrder = true
                ) const;
 
                //- Interpolate a tmp field with a defined operation.  The
                //  initial values of the result are set to zero
                template<class Type, class CombineOp>
                tmp<GeometricField<Type, fvPatchField, volMesh> > mapSrcToTgt
                (
                    const tmp<GeometricField<Type, fvPatchField, volMesh> >&
                        tfield,
                    const CombineOp& cop,
                    const bool secondOrder = true
                ) const;
 
                //- Convenience function to map a field with a default
                //  operation (plusEqOp)
                template<class Type>
                tmp<GeometricField<Type, fvPatchField, volMesh> > mapSrcToTgt
                (
                    const GeometricField<Type, fvPatchField, volMesh>& field,
                    const bool secondOrder = true
                ) const;
 
                //- Convenience function to map a tmp field with a default
                //  operation (plusEqOp)
                template<class Type>
                tmp<GeometricField<Type, fvPatchField, volMesh> > mapSrcToTgt
                (
                    const tmp<GeometricField<Type, fvPatchField, volMesh> >&
                        tfield,
                    const bool secondOrder = true
                ) const;
 
 
            // Target-to-source volume field mapping
 
                //- Interpolate a field with a defined operation.  Values
                //  passed in via 'result' are used to initialise the return
                //  value. Optionallly uses gradient correction (internal
                //  field only) if interpolationMethod supports it
                template<class Type, class CombineOp>
                void mapTgtToSrc
                (
                    const GeometricField<Type, fvPatchField, volMesh>& field,
                    const CombineOp& cop,
                    GeometricField<Type, fvPatchField, volMesh>& result,
                    const bool secondOrder = true
                ) const;
 
                //- Interpolate a field with a defined operation.  The initial
                //  values of the result are set to zero
                template<class Type, class CombineOp>
                tmp<GeometricField<Type, fvPatchField, volMesh> > mapTgtToSrc
                (
                    const GeometricField<Type, fvPatchField, volMesh>& field,
                    const CombineOp& cop,
                    const bool secondOrder = true
                ) const;
 
                //- Interpolate a tmp field with a defined operation.  The
                //  initial values of the result are set to zero
                template<class Type, class CombineOp>
                tmp<GeometricField<Type, fvPatchField, volMesh> > mapTgtToSrc
                (
                    const tmp<GeometricField<Type, fvPatchField, volMesh> >&
                        tfield,
                    const CombineOp& cop,
                    const bool secondOrder = true
                ) const;
 
                //- Convenience function to map a field with a default
                //  operation (plusEqOp)
                template<class Type>
                tmp<GeometricField<Type, fvPatchField, volMesh> > mapTgtToSrc
                (
                    const GeometricField<Type, fvPatchField, volMesh>& field,
                    const bool secondOrder = true
                ) const;
 
                //- Convenience function to map a tmp field with a default
                //  operation (plusEqOp)
                template<class Type>
                tmp<GeometricField<Type, fvPatchField, volMesh> > mapTgtToSrc
                (
                    const tmp<GeometricField<Type, fvPatchField, volMesh> >&
                        tfield,
                    const bool secondOrder = true
                ) const;
};
 
 
// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
// Disable gradient 2nd order correction for tensor types
 
template<>
void meshToMesh::mapInternalSrcToTgt
(
    const GeometricField<sphericalTensor, fvPatchField, volMesh>&,
    const plusEqOp<sphericalTensor>&,
    GeometricField<sphericalTensor, fvPatchField, volMesh>&,
    const bool
) const;
template<>
void meshToMesh::mapInternalSrcToTgt
(
    const GeometricField<sphericalTensor, fvPatchField, volMesh>&,
    const minusEqOp<sphericalTensor>&,
    GeometricField<sphericalTensor, fvPatchField, volMesh>&,
    const bool
) const;
template<>
void meshToMesh::mapInternalSrcToTgt
(
    const GeometricField<symmTensor, fvPatchField, volMesh>&,
    const plusEqOp<symmTensor>&,
    GeometricField<symmTensor, fvPatchField, volMesh>&,
    const bool
) const;
template<>
void meshToMesh::mapInternalSrcToTgt
(
    const GeometricField<symmTensor, fvPatchField, volMesh>&,
    const minusEqOp<symmTensor>&,
    GeometricField<symmTensor, fvPatchField, volMesh>&,
    const bool
) const;
template<>
void meshToMesh::mapInternalSrcToTgt
(
    const GeometricField<tensor, fvPatchField, volMesh>&,
    const plusEqOp<tensor>&,
    GeometricField<tensor, fvPatchField, volMesh>&,
    const bool
) const;
template<>
void meshToMesh::mapInternalSrcToTgt
(
    const GeometricField<tensor, fvPatchField, volMesh>&,
    const minusEqOp<tensor>&,
    GeometricField<tensor, fvPatchField, volMesh>&,
    const bool
) const;
template<>
void meshToMesh::mapInternalTgtToSrc
(
    const GeometricField<sphericalTensor, fvPatchField, volMesh>&,
    const plusEqOp<sphericalTensor>&,
    GeometricField<sphericalTensor, fvPatchField, volMesh>&,
    const bool
) const;
template<>
void meshToMesh::mapInternalTgtToSrc
(
    const GeometricField<sphericalTensor, fvPatchField, volMesh>&,
    const minusEqOp<sphericalTensor>&,
    GeometricField<sphericalTensor, fvPatchField, volMesh>&,
    const bool
) const;
template<>
void meshToMesh::mapInternalTgtToSrc
(
    const GeometricField<symmTensor, fvPatchField, volMesh>&,
    const plusEqOp<symmTensor>&,
    GeometricField<symmTensor, fvPatchField, volMesh>&,
    const bool
) const;
template<>
void meshToMesh::mapInternalTgtToSrc
(
    const GeometricField<symmTensor, fvPatchField, volMesh>&,
    const minusEqOp<symmTensor>&,
    GeometricField<symmTensor, fvPatchField, volMesh>&,
    const bool
) const;
template<>
void meshToMesh::mapInternalTgtToSrc
(
    const GeometricField<tensor, fvPatchField, volMesh>&,
    const plusEqOp<tensor>&,
    GeometricField<tensor, fvPatchField, volMesh>&,
    const bool
) const;
template<>
void meshToMesh::mapInternalTgtToSrc
(
    const GeometricField<tensor, fvPatchField, volMesh>&,
    const minusEqOp<tensor>&,
    GeometricField<tensor, fvPatchField, volMesh>&,
    const bool
) const;
 
 
// Disable fvPatchField value override after rmap
 
template<>
void meshToMesh::mapAndOpSrcToTgt
(
    const AMIPatchToPatchInterpolation& AMI,
    const Field<scalar>& srcField,
    Field<scalar>& tgtField,
    const plusEqOp<scalar>& cop
) const;
template<>
void meshToMesh::mapAndOpSrcToTgt
(
    const AMIPatchToPatchInterpolation& AMI,
    const Field<vector>& srcField,
    Field<vector>& tgtField,
    const plusEqOp<vector>& cop
) const;
template<>
void meshToMesh::mapAndOpSrcToTgt
(
    const AMIPatchToPatchInterpolation& AMI,
    const Field<sphericalTensor>& srcField,
    Field<sphericalTensor>& tgtField,
    const plusEqOp<sphericalTensor>& cop
) const;
template<>
void meshToMesh::mapAndOpSrcToTgt
(
    const AMIPatchToPatchInterpolation& AMI,
    const Field<symmTensor>& srcField,
    Field<symmTensor>& tgtField,
    const plusEqOp<symmTensor>& cop
) const;
template<>
void meshToMesh::mapAndOpSrcToTgt
(
    const AMIPatchToPatchInterpolation& AMI,
    const Field<tensor>& srcField,
    Field<tensor>& tgtField,
    const plusEqOp<tensor>& cop
) const;
 
 
template<>
void meshToMesh::mapAndOpTgtToSrc
(
    const AMIPatchToPatchInterpolation& AMI,
    Field<scalar>& srcField,
    const Field<scalar>& tgtField,
    const plusEqOp<scalar>& cop
) const;
template<>
void meshToMesh::mapAndOpTgtToSrc
(
    const AMIPatchToPatchInterpolation& AMI,
    Field<vector>& srcField,
    const Field<vector>& tgtField,
    const plusEqOp<vector>& cop
) const;
template<>
void meshToMesh::mapAndOpTgtToSrc
(
    const AMIPatchToPatchInterpolation& AMI,
    Field<sphericalTensor>& srcField,
    const Field<sphericalTensor>& tgtField,
    const plusEqOp<sphericalTensor>& cop
) const;
template<>
void meshToMesh::mapAndOpTgtToSrc
(
    const AMIPatchToPatchInterpolation& AMI,
    Field<symmTensor>& srcField,
    const Field<symmTensor>& tgtField,
    const plusEqOp<symmTensor>& cop
) const;
template<>
void meshToMesh::mapAndOpTgtToSrc
(
    const AMIPatchToPatchInterpolation& AMI,
    Field<tensor>& srcField,
    const Field<tensor>& tgtField,
    const plusEqOp<tensor>& cop
) const;
 
 
} // End namespace Foam
 
// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
#include "meshToMeshI.H"
 
// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
#ifdef NoRepository
    #include "meshToMeshTemplates.C"
#endif
 
// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
#endif
 
// ************************************************************************* //