/usr/include/dolfin/la/PETScOptions.h is in libdolfin-dev 1.4.0+dfsg-4.
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 | // Copyright (C) 2013 Garth N. Wells
//
// 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-08-12
// Last changed:
#ifndef __DOLFIN_PETSC_OPTIONS_H
#define __DOLFIN_PETSC_OPTIONS_H
#ifdef HAS_PETSC
#include <string>
#include <boost/lexical_cast.hpp>
#include <petscoptions.h>
#include <dolfin/common/SubSystemsManager.h>
#include <dolfin/log/log.h>
namespace dolfin
{
/// These class provides static functions that permit users to set
/// and retreive PETSc options via the PETSc option/parameter
/// system. The option should be prefixed by '-', e.g.
///
/// PETScOptions::set("mat_mumps_icntl_14", 40.0);
class PETScOptions
{
public:
/// Set PETSc option that takes no value
static void set(std::string option);
/// Set PETSc boolean option
static void set(std::string option, bool value);
/// Set PETSc integer option
static void set(std::string option, int value);
/// Set PETSc double option
static void set(std::string option, double value);
/// Set PETSc string option
static void set(std::string option, std::string value);
/// Genetic function for setting PETSc option
template<typename T>
static void set(std::string option, const T value)
{
SubSystemsManager::init_petsc();
PetscErrorCode ierr;
std::string _option = "-" + option;
ierr = PetscOptionsSetValue(_option.c_str(),
boost::lexical_cast<std::string>(value).c_str());
if (ierr != 0)
{
dolfin_error("PETScOptions.h",
"set PETSc option/parameter '" + option + "'",
"PETSc error code is: %d", ierr);
}
}
/// Clear PETSc option
static void clear(std::string option);
};
}
#endif
#endif
|