crust_and_lithosphere_formation.h

Go to the documentation of this file.

/*
  Copyright (C) 2024 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_reaction_model_crust_and_lithosphere_formation_h
#define _aspect_material_model_reaction_model_crust_and_lithosphere_formation_h

#include <aspect/material_model/interface.h>
#include <aspect/simulator_access.h>

namespace aspect
{
  namespace MaterialModel
  {
    using namespace dealii;

    namespace ReactionModel
    {

      template <int dim>
      class CrustLithosphereFormation : public ::aspect::SimulatorAccess<dim>
      {
        public:
          static
          void
          declare_parameters (ParameterHandler &prm);

          void
          parse_parameters (ParameterHandler &prm);

          void
          calculate_reaction_terms (const typename Interface<dim>::MaterialModelInputs  &in,
                                    typename Interface<dim>::MaterialModelOutputs       &out) const;

        private:
          double crust_thickness;

          double lithosphere_thickness;

          double minimum_upwelling_angle_for_crust;

          double minimum_upwelling_angle_for_lithosphere;

          enum HarzburgiteProfile
          {
            linear,
            constant
          };

          HarzburgiteProfile harzburgite_profile;

          unsigned int basalt_index;
          unsigned int harzburgite_index;
      };
    }

  }
}

#endif