/usr/include/dolfin/multistage/PointIntegralSolver.h is in libdolfin1.3-dev 1.3.0+dfsg-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 | // Copyright (C) 2013 Johan Hake
//
// This file is part of DOLFIN.
//
// DOLFIN is free software: you can redistribute it and/or modify
// it under the terms of the GNU Lesser General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// DOLFIN 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 Lesser General Public License for more details.
//
// You should have received a copy of the GNU Lesser General Public License
// along with DOLFIN. If not, see <http://www.gnu.org/licenses/>.
//
// First added: 2013-02-15
// Last changed: 2013-05-13
#ifndef __POINTINTEGRALSOLVER_H
#define __POINTINTEGRALSOLVER_H
#include <vector>
#include <Eigen/Dense>
#include <boost/shared_ptr.hpp>
#include <dolfin/common/Variable.h>
#include <dolfin/function/FunctionAXPY.h>
#include <dolfin/fem/Assembler.h>
namespace dolfin
{
/// This class is a time integrator for general Runge Kutta forms,
/// which only includes Point integrals with piecewise linear test
/// functions. Such problems are disconnected at the vertices and
/// can therefore be solved locally.
// Forward declarations
class MultiStageScheme;
class UFC;
class PointIntegralSolver : public Variable
{
public:
/// Constructor
/// FIXME: Include version where one can pass a Solver and/or Parameters
PointIntegralSolver(boost::shared_ptr<MultiStageScheme> scheme);
/// Step solver with time step dt
void step(double dt);
/// Step solver an interval using dt as time step
void step_interval(double t0, double t1, double dt);
/// Return the MultiStageScheme
boost::shared_ptr<MultiStageScheme> scheme() const
{ return _scheme; }
/// Default parameter values
static Parameters default_parameters()
{
Parameters p("point_integral_solver");
// Get default parameters from NewtonSolver
p.add(NewtonSolver::default_parameters());
p("newton_solver").add("reuse_jacobian", true);
p("newton_solver").add("iterations_to_retabulate_jacobian", 4);
return p;
}
private:
// Check the forms making sure they only include piecewise linear
// test functions
void _check_forms();
// Build map between vertices, cells and the correspondning local vertex
// and initialize UFC data for each form
void _init();
// The MultiStageScheme
boost::shared_ptr<MultiStageScheme> _scheme;
// Vertex map between vertices, cells and corresponding local vertex
std::vector<std::pair<std::size_t, unsigned int> > _vertex_map;
// UFC objects, one for each form
std::vector<std::vector<boost::shared_ptr<UFC> > > _ufcs;
// Solution coefficient index in form
std::vector<std::vector<int> > _coefficient_index;
// Flag for retabulation of J
bool _retabulate_J;
// Jacobian and LU factorized Jacobian matrices
Eigen::MatrixXd _J;
Eigen::PartialPivLU<Eigen::MatrixXd> _J_LU;
};
}
#endif
|