peierls_creep.h

Go to the documentation of this file.

// ------------------------------------------------------
//
// SPDX-License-Identifier: GPL-2.0-or-later
//
// SPDX-FileCopyrightText: Copyright (C) 2020-2026 by the ASPECT authors.
//
// This file is part of ASPECT.
//
// Detailed license information governing the source code and
// contributions can be found in the folder LICENSES and in
// LICENSE and CONTRIBUTING.md at the top level directory.
//
// ------------------------------------------------------

#ifndef _aspect_material_model_rheology_peierls_creep_h
#define _aspect_material_model_rheology_peierls_creep_h

#include <aspect/global.h>
#include <aspect/simulator_access.h>

namespace aspect
{
  namespace MaterialModel
  {
    namespace Rheology
    {
      struct PeierlsCreepParameters
      {
        double prefactor;
        double stress_exponent;
        double activation_energy;
        double activation_volume;
        double peierls_stress;
        double glide_parameter_p;
        double glide_parameter_q;
        double fitting_parameter;
        double stress_cutoff;

        PeierlsCreepParameters();
      };

      template <int dim>
      class PeierlsCreep : public ::aspect::SimulatorAccess<dim>
      {
        public:
          PeierlsCreep();

          const PeierlsCreepParameters
          compute_creep_parameters (const unsigned int composition,
                                    const std::vector<double> &phase_function_values = {},
                                    const std::vector<unsigned int> &n_phases_per_composition = {}) const;

          static
          void
          declare_parameters (ParameterHandler &prm);

          void
          parse_parameters (ParameterHandler &prm,
                            const std::unique_ptr<std::vector<unsigned int>> &expected_n_phases_per_composition = nullptr);

          double
          compute_approximate_viscosity (const double strain_rate,
                                         const double pressure,
                                         const double temperature,
                                         const unsigned int composition,
                                         const std::vector<double> &phase_function_values = {},
                                         const std::vector<unsigned int> &n_phase_transitions_per_composition = {}) const;

          double
          compute_exact_viscosity (const double strain_rate,
                                   const double pressure,
                                   const double temperature,
                                   const unsigned int composition,
                                   const std::vector<double> &phase_function_values = {},
                                   const std::vector<unsigned int> &n_phase_transitions_per_composition = {}) const;

          double
          compute_viscosity (const double strain_rate,
                             const double pressure,
                             const double temperature,
                             const unsigned int composition,
                             const std::vector<double> &phase_function_values = {},
                             const std::vector<unsigned int> &n_phase_transitions_per_composition = {}) const;

          std::pair<double, double>
          compute_approximate_strain_rate_and_derivative (const double stress,
                                                          const double pressure,
                                                          const double temperature,
                                                          const PeierlsCreepParameters creep_parameters) const;

          std::pair<double, double>
          compute_exact_strain_rate_and_derivative (const double stress,
                                                    const double pressure,
                                                    const double temperature,
                                                    const PeierlsCreepParameters creep_parameters) const;

          std::pair<double, double>
          compute_exact_log_strain_rate_and_derivative (const double log_stress,
                                                        const double pressure,
                                                        const double temperature,
                                                        const PeierlsCreepParameters creep_parameters) const;

          std::pair<double, double>
          compute_approximate_log_strain_rate_and_derivative (const double log_stress,
                                                              const double pressure,
                                                              const double temperature,
                                                              const PeierlsCreepParameters creep_parameters) const;

          std::pair<double, double>
          compute_strain_rate_and_derivative (const double stress,
                                              const double pressure,
                                              const double temperature,
                                              const PeierlsCreepParameters creep_parameters) const;

        private:
          enum PeierlsCreepScheme
          {
            viscosity_approximation,
            exact
          };
          PeierlsCreepScheme peierls_creep_flow_law;

          std::vector<double> prefactors;

          std::vector<double> stress_exponents;

          std::vector<double> activation_energies;

          std::vector<double> activation_volumes;

          std::vector<double> peierls_stresses;

          std::vector<double> fitting_parameters;

          std::vector<double> glide_parameters_p;

          std::vector<double> glide_parameters_q;

          std::vector<double> stress_cutoffs;

          bool apply_strict_cutoff;

          double strain_rate_residual_threshold;
          unsigned int stress_max_iteration_number;

      };
    }
  }
}
#endif