src/OpenFOAM/primitives/ints/label/label.C

   1 /*---------------------------------------------------------------------------*\
   2   =========                 |
   3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
   4    \\    /   O peration     |
   5     \\  /    A nd           | Copyright (C) 2011 OpenFOAM Foundation
   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 \*---------------------------------------------------------------------------*/
  25
  26 #include "error.H"
  27 #include "label.H"
  28
  29 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  30
  31 namespace Foam
  32 {
  33
  34 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  35
  36 const char* const pTraits<label>::typeName = "label";
  37 const label pTraits<label>::zero = 0;
  38 const label pTraits<label>::one = 1;
  39 const label pTraits<label>::min = labelMin;
  40 const label pTraits<label>::max = labelMax;
  41
  42 const char* pTraits<label>::componentNames[] = { "x" };
  43
  44 pTraits<label>::pTraits(const label& p)
  45 :
  46     p_(p)
  47 {}
  48
  49
  50 pTraits<label>::pTraits(Istream& is)
  51 {
  52     is >> p_;
  53 }
  54
  55
  56 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  57
  58 // Raise one label to the power of another (overloaded function call)
  59 label pow(label a, label b)
  60 {
  61     register label ans = 1;
  62     for (register label i=0; i<b; i++)
  63     {
  64         ans *= a;
  65     }
  66
  67 #   ifdef FULLDEBUG
  68     if (b < 0)
  69     {
  70         FatalErrorIn("pow(label a, label b)")
  71             << "negative value for b is not supported"
  72             << abort(FatalError);
  73     }
  74 #   endif
  75
  76     return ans;
  77 }
  78
  79
  80 //- Return factorial(n) : 0 <= n <= 12
  81 label factorial(label n)
  82 {
  83     static label factTable[13] =
  84     {
  85         1, 1, 2, 6, 24, 120, 720, 5040, 40320,
  86         362880, 3628800, 39916800, 479001600
  87     };
  88
  89 #   ifdef FULLDEBUG
  90     if (n > 12 && n < 0)
  91     {
  92         FatalErrorIn("factorial(label n)")
  93             << "n value out of range"
  94             << abort(FatalError);
  95     }
  96 #   endif
  97
  98     return factTable[n];
  99 }
 100
 101
 102 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 103
 104 } // End namespace Foam
 105
 106 // ************************************************************************* //