src/OpenFOAM/meshes/meshShapes/face/faceContactSphere.C

   1 /*---------------------------------------------------------------------------*\
   2   =========                 |
   3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
   4    \\    /   O peration     |
   5     \\  /    A nd           | Copyright (C) 2004-2010 OpenCFD Ltd.
   6      \\/     M anipulation  |
   7 -------------------------------------------------------------------------------
   8 License
   9     This file is part of OpenFOAM.
  10
  11     OpenFOAM is free software: you can redistribute it and/or modify it
  12     under the terms of the GNU General Public License as published by
  13     the Free Software Foundation, either version 3 of the License, or
  14     (at your option) any later version.
  15
  16     OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
  17     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  18     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  19     for more details.
  20
  21     You should have received a copy of the GNU General Public License
  22     along with OpenFOAM.  If not, see <http://www.gnu.org/licenses/>.
  23
  24 Description
  25     Return location of contact sphere on the face
  26
  27 \*---------------------------------------------------------------------------*/
  28
  29 #include "face.H"
  30
  31 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  32
  33 Foam::scalar Foam::face::contactSphereDiameter
  34 (
  35     const point& p,
  36     const vector& n,
  37     const pointField& meshPoints
  38 ) const
  39 {
  40     scalar magN = Foam::mag(n);
  41
  42     vector n1 = n/(magN + SMALL);
  43     vector n2 = normal(meshPoints);
  44
  45     n2 /= Foam::mag(n2) + SMALL;
  46
  47     return 2*((centre(meshPoints) - p) & n2)/((n1 & n2) - 1.0);
  48 }
  49
  50
  51 // ************************************************************************* //