ellipsoidal_chunk.h

Go to the documentation of this file.

/*
  Copyright (C) 2011 - 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_geometry_model_ellipsoidal_chunk_h
#define _aspect_geometry_model_ellipsoidal_chunk_h

#include <aspect/geometry_model/interface.h>
#include <aspect/geometry_model/initial_topography_model/interface.h>
#include <aspect/simulator_access.h>
#include <deal.II/grid/manifold.h>


namespace aspect
{
  namespace GeometryModel
  {
    using namespace dealii;

    namespace internal
    {
      template <int dim>
      class EllipsoidalChunkGeometry : public ChartManifold<dim,3,3>
      {
        public:
          EllipsoidalChunkGeometry(const InitialTopographyModel::Interface<dim> &topography,
                                   const double para_semi_major_axis_a,
                                   const double para_eccentricity,
                                   const double para_semi_minor_axis_b,
                                   const double para_bottom_depth,
                                   const std::vector<Point<2>> &para_corners);

          EllipsoidalChunkGeometry(const EllipsoidalChunkGeometry &other) = default;

          Point<3>
          pull_back(const Point<3> &space_point) const override;

          virtual
          Point<2>
          pull_back(const Point<2> &space_point) const;

          Point<3>
          push_forward(const Point<3> &chart_point) const override;

          Point<3> pull_back_ellipsoid (const Point<3> &x, const double semi_major_axis_a, const double eccentricity) const;

          Point<3> push_forward_ellipsoid (const Point<3> &phi_theta_d, const double semi_major_axis_a, const double eccentricity) const;

          std::unique_ptr<Manifold<dim,3>>
          clone() const override;

        private:
          Point<3> push_forward_topography (const Point<3> &phi_theta_d_hat) const;

          Point<3> pull_back_topography (const Point<3> &phi_theta_d) const;

          const InitialTopographyModel::Interface<dim> *topography;

          const double semi_major_axis_a;
          const double eccentricity;
          const double semi_minor_axis_b;
          const double bottom_depth;
          const std::vector<Point<2>> corners;
      };
    }

    template <int dim>
    class EllipsoidalChunk : public Interface<dim>, public SimulatorAccess<dim>
    {
      public:
        void
        initialize () override;


        void
        create_coarse_mesh(parallel::distributed::Triangulation<dim> &coarse_grid) const override;

        double
        length_scale() const override;

        double
        depth(const Point<dim> &position) const override;

        double
        height_above_reference_surface(const Point<dim> &position) const override;

        Point<dim>
        representative_point(const double depth) const override;

        bool
        point_is_in_domain(const Point<dim> &point) const override;

        double
        maximal_depth() const override;

        std::set<types::boundary_id>
        get_used_boundary_indicators() const override;

        std::map<std::string,types::boundary_id>
        get_symbolic_boundary_names_map() const override;

        aspect::Utilities::Coordinates::CoordinateSystem natural_coordinate_system() const override;

        std::array<double,dim> cartesian_to_natural_coordinates(const Point<dim> &position) const override;

        Point<dim> natural_to_cartesian_coordinates(const std::array<double,dim> &position) const override;

        static
        void
        declare_parameters(ParameterHandler &prm);

        void
        parse_parameters(ParameterHandler &prm) override;

        double
        get_radius(const Point<dim> &position) const;

        double
        get_semi_minor_axis_b() const;

        double
        get_semi_major_axis_a() const;


        double
        get_eccentricity() const;


        const std::vector<Point<2>> &
        get_corners() const;


        internal::EllipsoidalChunkGeometry<dim>
        get_manifold() const;

      private:
        // Declare variables for reading in coordinates of the region of interest.
        std::vector<Point<2>> corners;
        double semi_major_axis_a;
        double eccentricity;
        double semi_minor_axis_b;
        double rot_para_to_para_angle;
        double para_to_rect_angle;
        double rotation_longitude;
        double rotation_latitude;
        double bottom_depth;
        double westLongitude;
        double eastLongitude;
        double northLatitude;
        double southLatitude;
        // Declare variables for subdividing
        unsigned int EW_subdiv;
        unsigned int NS_subdiv;
        unsigned int depth_subdiv;



        std::unique_ptr<const internal::EllipsoidalChunkGeometry<dim>>   manifold;

        void
        set_boundary_ids(parallel::distributed::Triangulation<dim> &coarse_grid) const;
    };
  }
}


#endif