melt_global.h

Go to the documentation of this file.

/*
  Copyright (C) 2015 - 2023 by the authors of the ASPECT code.
 
  This file is part of ASPECT.
 
  ASPECT is free software; you can redistribute it and/or modify
  it under the terms of the GNU General Public License as published by
  the Free Software Foundation; either version 2, or (at your option)
  any later version.
 
  ASPECT 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 General Public License for more details.
 
  You should have received a copy of the GNU General Public License
  along with ASPECT; see the file LICENSE.  If not see
  <http://www.gnu.org/licenses/>.
*/
 
#ifndef _aspect_material_model_melt_global_h
#define _aspect_material_model_melt_global_h
 
#include <aspect/material_model/interface.h>
#include <aspect/simulator_access.h>
#include <aspect/postprocess/melt_statistics.h>
#include <aspect/melt.h>
 
namespace aspect
{
  namespace MaterialModel
  {
    template <int dim>
    class MeltGlobal : public MaterialModel::MeltInterface<dim>,
      public MaterialModel::MeltFractionModel<dim>,
      public ::aspect::SimulatorAccess<dim>
    {
      public:
        bool is_compressible () const override;
 
        void evaluate(const typename Interface<dim>::MaterialModelInputs &in,
                      typename Interface<dim>::MaterialModelOutputs &out) const override;
 
        void melt_fractions (const MaterialModel::MaterialModelInputs<dim> &in,
                             std::vector<double> &melt_fractions,
                             const MaterialModel::MaterialModelOutputs<dim> *out = nullptr) const override;
 
        double reference_darcy_coefficient () const override;
 
 
        static
        void
        declare_parameters (ParameterHandler &prm);
 
        void
        parse_parameters (ParameterHandler &prm) override;
        void
        create_additional_named_outputs (MaterialModel::MaterialModelOutputs<dim> &out) const override;
 
 
      private:
        double reference_rho_s;
        double reference_rho_f;
        double reference_T;
        double eta_0;
        double xi_0;
        double eta_f;
        double thermal_viscosity_exponent;
        double thermal_bulk_viscosity_exponent;
        double thermal_expansivity;
        double reference_specific_heat;
        double thermal_conductivity;
        double reference_permeability;
        double alpha_phi;
        double depletion_density_change;
        double depletion_solidus_change;
        double pressure_solidus_change;
        double surface_solidus;
        double compressibility;
        double melt_compressibility;
        bool include_melting_and_freezing;
        double melting_time_scale;
        double alpha_depletion;
        double delta_eta_depletion_max;
 
        // entropy change upon melting
        double peridotite_melting_entropy_change;
 
        virtual
        double
        melt_fraction (const double temperature,
                       const double pressure,
                       const double depletion) const;
    };
 
  }
}
 
#endif