/usr/include/dolfin/la/PETScOptions.h is in libdolfin-dev 2017.2.0.post0-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 | // 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/>.
#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>
#include "PETScObject.h"
namespace dolfin
{
/// These class provides static functions that permit users to set
/// and retrieve PETSc options via the PETSc option/parameter
/// system. The option must not be prefixed by '-', e.g.
///
/// PETScOptions::set("mat_mumps_icntl_14", 40);
///
/// Note: the non-templated functions are to simplify SWIG wapping
/// into Python.
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();
if (option[0] != '-')
option = '-' + option;
PetscErrorCode ierr;
ierr = PetscOptionsSetValue(NULL, option.c_str(),
boost::lexical_cast<std::string>(value).c_str());
if (ierr != 0)
PETScObject::petsc_error(ierr, __FILE__, "PetscOptionsSetValue");
}
/// Clear a PETSc option
static void clear(std::string option);
/// Clear PETSc global options database
static void clear();
};
}
#endif
#endif
|