ellipsoidal_chunk.h

Go to the documentation of this file.

/*
  Copyright (C) 2011 - 2022 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;

    template <int dim>
    class EllipsoidalChunk : public Interface<dim>, public SimulatorAccess<dim>
    {
      public:
        class EllipsoidalChunkGeometry : public ChartManifold<dim,3,3>
        {
          public:
            EllipsoidalChunkGeometry();

            EllipsoidalChunkGeometry(const EllipsoidalChunkGeometry &other);

            void
            initialize(const InitialTopographyModel::Interface<dim> *topography);

            void
            set_manifold_parameters(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);

            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;


            double semi_major_axis_a;
            double eccentricity;
            double semi_minor_axis_b;
            double bottom_depth;
            std::vector<Point<2>> corners;
            const InitialTopographyModel::Interface<dim> *topography;
        };

        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;


        EllipsoidalChunkGeometry
        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;



        EllipsoidalChunkGeometry   manifold;

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


#endif