Line data    Source code

       1              : /*
       2              :  * Copyright (c) 2010-2014:  G-CSC, Goethe University Frankfurt
       3              :  * Author: Martin Rupp
       4              :  * 
       5              :  * This file is part of UG4.
       6              :  * 
       7              :  * UG4 is free software: you can redistribute it and/or modify it under the
       8              :  * terms of the GNU Lesser General Public License version 3 (as published by the
       9              :  * Free Software Foundation) with the following additional attribution
      10              :  * requirements (according to LGPL/GPL v3 §7):
      11              :  * 
      12              :  * (1) The following notice must be displayed in the Appropriate Legal Notices
      13              :  * of covered and combined works: "Based on UG4 (www.ug4.org/license)".
      14              :  * 
      15              :  * (2) The following notice must be displayed at a prominent place in the
      16              :  * terminal output of covered works: "Based on UG4 (www.ug4.org/license)".
      17              :  * 
      18              :  * (3) The following bibliography is recommended for citation and must be
      19              :  * preserved in all covered files:
      20              :  * "Reiter, S., Vogel, A., Heppner, I., Rupp, M., and Wittum, G. A massively
      21              :  *   parallel geometric multigrid solver on hierarchically distributed grids.
      22              :  *   Computing and visualization in science 16, 4 (2013), 151-164"
      23              :  * "Vogel, A., Reiter, S., Rupp, M., Nägel, A., and Wittum, G. UG4 -- a novel
      24              :  *   flexible software system for simulating pde based models on high performance
      25              :  *   computers. Computing and visualization in science 16, 4 (2013), 165-179"
      26              :  * 
      27              :  * This program is distributed in the hope that it will be useful,
      28              :  * but WITHOUT ANY WARRANTY; without even the implied warranty of
      29              :  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
      30              :  * GNU Lesser General Public License for more details.
      31              :  */
      32              : 
      33              : #ifndef __H__LIB_ALGEBRA__OPERATOR__OPERATOR_UTIL__
      34              : #define __H__LIB_ALGEBRA__OPERATOR__OPERATOR_UTIL__
      35              : 
      36              : 
      37              : #include "common/profiler/profiler.h"
      38              : #include "common/util/smart_pointer.h"
      39              : #include "lib_algebra/operator/interface/linear_operator.h"
      40              : #include "lib_algebra/operator/interface/linear_operator_inverse.h"
      41              : 
      42              : namespace ug{
      43              : 
      44              : template <typename vector_type>
      45            0 : bool ApplyLinearSolver( SmartPtr<ILinearOperator<vector_type> > A,
      46              :                                                 vector_type& u, vector_type& b,
      47              :                                                 SmartPtr<ILinearOperatorInverse<vector_type> > solver)
      48              : {
      49              : // step 1: Init Linear Inverse Operator
      50              :         PROFILE_BEGIN_GROUP(ALS_InitLinearSolver, "algebra");
      51            0 :         if(!solver->init(A))
      52              :         {
      53              :                 UG_LOG("ApplyLinearSolver: Cannot init Inverse operator.\n");
      54            0 :                 return false;
      55              :         }
      56              :         PROFILE_END_(ALS_InitLinearSolver);
      57              : 
      58              : // step 2: Apply Operator
      59              :         PROFILE_BEGIN(ALS_ApplyLinearSolver);
      60            0 :         if(!solver->apply_return_defect(u,b))
      61              :         {
      62              :                 UG_LOG("ApplyLinearSolver: Cannot apply Inverse operator.\n");
      63            0 :                 return false;
      64              :         }
      65              :         PROFILE_END_(ALS_ApplyLinearSolver);
      66              : 
      67              : //      done
      68              :         return true;
      69              : }
      70              : 
      71              : 
      72              : }
      73              : #endif // __H__LIB_ALGEBRA__OPERATOR__OPERATOR_UTIL__