Branch data     Line data    Source code

       1                 :            : /* *****************************************************************
       2                 :            :     MESQUITE -- The Mesh Quality Improvement Toolkit
       3                 :            : 
       4                 :            :     Copyright 2006 Sandia National Laboratories.  Developed at the
       5                 :            :     University of Wisconsin--Madison under SNL contract number
       6                 :            :     624796.  The U.S. Government and the University of Wisconsin
       7                 :            :     retain certain rights to this software.
       8                 :            : 
       9                 :            :     This library is free software; you can redistribute it and/or
      10                 :            :     modify it under the terms of the GNU Lesser General Public
      11                 :            :     License as published by the Free Software Foundation; either
      12                 :            :     version 2.1 of the License, or (at your option) any later version.
      13                 :            : 
      14                 :            :     This library is distributed in the hope that it will be useful,
      15                 :            :     but WITHOUT ANY WARRANTY; without even the implied warranty of
      16                 :            :     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      17                 :            :     Lesser General Public License for more details.
      18                 :            : 
      19                 :            :     You should have received a copy of the GNU Lesser General Public License
      20                 :            :     (lgpl.txt) along with this library; if not, write to the Free Software
      21                 :            :     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
      22                 :            : 
      23                 :            :     (2006) [email protected]
      24                 :            : 
      25                 :            :   ***************************************************************** */
      26                 :            : 
      27                 :            : /** \file TRel2DShapeSizeOrient.cpp
      28                 :            :  *  \brief
      29                 :            :  *  \author Jason Kraftcheck
      30                 :            :  */
      31                 :            : 
      32                 :            : #include "Mesquite.hpp"
      33                 :            : #include "TShapeSizeOrientNB1.hpp"
      34                 :            : #include "MsqMatrix.hpp"
      35                 :            : #include "TMPCommon.hpp"
      36                 :            : #include "TMPDerivs.hpp"
      37                 :            : 
      38                 :            : namespace MBMesquite
      39                 :            : {
      40                 :            : 
      41                 :          0 : std::string TShapeSizeOrientNB1::get_name() const
      42                 :            : {
      43         [ #  # ]:          0 :     return "TShapeSizeOrientNB1";
      44                 :            : }
      45                 :            : 
      46         [ -  + ]:          8 : TShapeSizeOrientNB1::~TShapeSizeOrientNB1() {}
      47                 :            : 
      48                 :            : template < unsigned DIM >
      49                 :     349850 : static inline bool eval( const MsqMatrix< DIM, DIM >& T, double& result )
      50                 :            : {
      51                 :     349850 :     MsqMatrix< DIM, DIM > T_I( T );
      52 [ #  # ][ +  - ]:     349850 :     pluseq_scaled_I( T_I, -1 );
      53 [ #  # ][ +  - ]:     349850 :     result = sqr_Frobenius( T_I );
      54                 :     349850 :     return true;
      55                 :            : }
      56                 :            : 
      57                 :            : template < unsigned DIM >
      58                 :      71124 : static inline bool grad( const MsqMatrix< DIM, DIM >& T, double& result, MsqMatrix< DIM, DIM >& deriv )
      59                 :            : {
      60                 :      71124 :     deriv = T;
      61                 :      71124 :     pluseq_scaled_I( deriv, -1 );
      62                 :      71124 :     result = sqr_Frobenius( deriv );
      63                 :      71124 :     deriv *= 2.0;
      64                 :      71124 :     return true;
      65                 :            : }
      66                 :            : 
      67                 :            : template < unsigned DIM >
      68                 :          0 : static inline bool hess( const MsqMatrix< DIM, DIM >& T, double& result, MsqMatrix< DIM, DIM >& deriv,
      69                 :            :                          MsqMatrix< DIM, DIM >* second )
      70                 :            : {
      71                 :          0 :     deriv = T;
      72                 :          0 :     pluseq_scaled_I( deriv, -1 );
      73                 :          0 :     result = sqr_Frobenius( deriv );
      74                 :          0 :     deriv *= 2.0;
      75                 :          0 :     set_scaled_I( second, 2.0 );
      76                 :          0 :     return true;
      77                 :            : }
      78                 :            : 
      79                 :     841948 : TMP_T_TEMPL_IMPL_COMMON( TShapeSizeOrientNB1 )
      80                 :            : 
      81                 :            : }  // namespace MBMesquite