Diffusion akantu (features/node_to_node) Browse

node_to_node

structural_mechanics_model_inline_impl.hh
View Options

			/**
			* Copyright (©) 2011-2023 EPFL (Ecole Polytechnique Fédérale de Lausanne)
			* Laboratory (LSMS - Laboratoire de Simulation en Mécanique des Solides)
			*
			* This file is part of Akantu
			*
			* Akantu is free software: you can redistribute it and/or modify it under the
			* terms of the GNU Lesser General Public License as published by the Free
			* Software Foundation, either version 3 of the License, or (at your option) any
			* later version.
			*
			* Akantu 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 Lesser General Public License for more
			* details.
			*
			* You should have received a copy of the GNU Lesser General Public License
			* along with Akantu. If not, see <http://www.gnu.org/licenses/>.
			*/

			/* -------------------------------------------------------------------------- */
			#include "structural_mechanics_model.hh"
			/* -------------------------------------------------------------------------- */

			#ifndef AKANTU_STRUCTURAL_MECHANICS_MODEL_INLINE_IMPL_HH_
			#define AKANTU_STRUCTURAL_MECHANICS_MODEL_INLINE_IMPL_HH_

			namespace akantu {

			/* -------------------------------------------------------------------------- */
			inline UInt StructuralMechanicsModel::addMaterial(StructuralMaterial & material,
			const ID & name) {

			const auto material_index = materials.size();

			auto material_name = name;
			if (name.empty()) {
			material_name = "material_" + std::to_string(material_index);
			}

			if (materials_names_to_id.find(material_name) !=
			materials_names_to_id.end()) {
			AKANTU_EXCEPTION("The material " << material_name
			<< " already exists in the model " << id);
			}

			AKANTU_DEBUG_ASSERT(material_index <=
			(::std::size_t)::std::numeric_limits<UInt>::max(),
			"Can not represent the material ID");

			materials_names_to_id[material_name] = material_index;
			materials.push_back(material); // add the material, might cause
			// reallocation.

			return UInt(material_index);
			}

			/* -------------------------------------------------------------------------- */
			inline const StructuralMaterial &
			StructuralMechanicsModel::getMaterialByElement(const Element & element) const {
			return materials[element_material(element)];
			}

			/* -------------------------------------------------------------------------- */
			inline const StructuralMaterial &
			StructuralMechanicsModel::getMaterial(UInt material_index) const {
			return materials.at(material_index);
			}

			/* -------------------------------------------------------------------------- */
			inline const StructuralMaterial &
			StructuralMechanicsModel::getMaterial(const ID & name) const {
			auto it = materials_names_to_id.find(name);
			if (it == materials_names_to_id.end()) {
			AKANTU_EXCEPTION("The material " << name << " was not found in the model "
			<< id);
			}

			return materials.at(it->second);
			}

			/* -------------------------------------------------------------------------- */
			template <ElementType type>
			void StructuralMechanicsModel::computeTangentModuli(
			Array<Real> & /tangent_moduli/) {
			AKANTU_TO_IMPLEMENT();
			}

			/* -------------------------------------------------------------------------- */
			template <ElementType type>
			void StructuralMechanicsModel::assembleStiffnessMatrix() {
			AKANTU_DEBUG_IN();

			auto nb_element = getFEEngine().getMesh().getNbElement(type);
			auto nb_nodes_per_element = Mesh::getNbNodesPerElement(type);
			auto nb_quadrature_points = getFEEngine().getNbIntegrationPoints(type);
			auto tangent_size = ElementClass<type>::getNbStressComponents();

			auto tangent_moduli = std::make_unique<Array<Real>>(
			nb_element * nb_quadrature_points, tangent_size * tangent_size,
			"tangent_stiffness_matrix");
			computeTangentModuli<type>(*tangent_moduli);

			/// compute @f$\mathbf{B}^t * \mathbf{D} * \mathbf{B}@f$
			UInt bt_d_b_size = nb_degree_of_freedom * nb_nodes_per_element;

			auto bt_d_b = std::make_unique<Array<Real>>(
			nb_element * nb_quadrature_points, bt_d_b_size * bt_d_b_size, "B^tDB");

			const auto & b = getFEEngine().getShapesDerivatives(type);

			for (auto && tuple :
			zip(make_view(b, tangent_size, bt_d_b_size),
			make_view(*tangent_moduli, tangent_size, tangent_size),
			make_view(*bt_d_b, bt_d_b_size, bt_d_b_size))) {
			auto & B = std::get<0>(tuple);
			auto & D = std::get<1>(tuple);
			auto & BtDB = std::get<2>(tuple);

			BtDB = B.transpose() * D * B;
			}

			/// compute @f$ k_e = \int_e \mathbf{B}^t * \mathbf{D} * \mathbf{B}@f$
			auto int_bt_d_b = std::make_unique<Array<Real>>(
			nb_element, bt_d_b_size * bt_d_b_size, "int_B^tDB");

			getFEEngine().integrate(bt_d_b, int_bt_d_b, bt_d_b_size * bt_d_b_size,
			type);

			getDOFManager().assembleElementalMatricesToMatrix(
			"K", "displacement", *int_bt_d_b, type, _not_ghost, _symmetric);

			AKANTU_DEBUG_OUT();
			}

			/* -------------------------------------------------------------------------- */
			template <ElementType type>
			void StructuralMechanicsModel::computeStressOnQuad() {
			AKANTU_DEBUG_IN();

			auto & sigma = stress(type, _not_ghost);

			auto nb_element = mesh.getNbElement(type);
			auto nb_nodes_per_element = Mesh::getNbNodesPerElement(type);
			auto nb_quadrature_points = getFEEngine().getNbIntegrationPoints(type);
			auto tangent_size = ElementClass<type>::getNbStressComponents();
			auto d_b_size = nb_degree_of_freedom * nb_nodes_per_element;

			auto tangent_moduli = std::make_unique<Array<Real>>(
			nb_element * nb_quadrature_points, tangent_size * tangent_size,
			"tangent_stiffness_matrix");

			computeTangentModuli<type>(*tangent_moduli);

			Array<Real> u_el(0, d_b_size);
			FEEngine::extractNodalToElementField(mesh, *displacement_rotation, u_el,
			type);

			const auto & b = getFEEngine().getShapesDerivatives(type);

			for (auto && data :
			zip(make_view(*tangent_moduli, tangent_size, tangent_size),
			make_view(b, tangent_size, d_b_size),
			repeat_n(make_view(u_el, d_b_size), nb_quadrature_points),
			make_view(sigma, tangent_size))) {
			auto && D = std::get<0>(data);
			auto && B = std::get<1>(data);
			auto && u = std::get<2>(data);

			auto && DBu = std::get<3>(data);

			DBu = D * B * u;
			}

			AKANTU_DEBUG_OUT();
			}

			/* -------------------------------------------------------------------------- */
			/**
			* @param myf pointer to a function that fills a vector/tensor with respect to
			* passed coordinates
			*/
			#if 0
			template <ElementType type>
			inline void StructuralMechanicsModel::computeForcesFromFunction(
			BoundaryFunction myf, BoundaryFunctionType function_type) {
			/** function type is
			** _bft_forces : linear load is given
			** _bft_stress : stress function is given -> Not already done for this kind
			*of model
			*/

			std::stringstream name;
			name << id << ":structuralmechanics:imposed_linear_load";
			Array<Real> lin_load(0, nb_degree_of_freedom, name.str());
			name.zero();

			UInt offset = nb_degree_of_freedom;

			// prepare the loop over element types
			UInt nb_quad = getFEEngine().getNbIntegrationPoints(type);
			UInt nb_element = getFEEngine().getMesh().getNbElement(type);

			name.zero();
			name << id << ":structuralmechanics:quad_coords";
			Array<Real> quad_coords(nb_element * nb_quad, spatial_dimension,
			"quad_coords");

			getFEEngineClass<MyFEEngineType>()
			.getShapeFunctions()
			.interpolateOnIntegrationPoints<type>(getFEEngine().getMesh().getNodes(),
			quad_coords, spatial_dimension);
			getFEEngineClass<MyFEEngineType>()
			.getShapeFunctions()
			.interpolateOnIntegrationPoints<type>(
			getFEEngine().getMesh().getNodes(), quad_coords, spatial_dimension,
			_not_ghost, empty_filter, true, 0, 1, 1);
			if (spatial_dimension == 3)
			getFEEngineClass<MyFEEngineType>()
			.getShapeFunctions()
			.interpolateOnIntegrationPoints<type>(
			getFEEngine().getMesh().getNodes(), quad_coords, spatial_dimension,
			_not_ghost, empty_filter, true, 0, 2, 2);
			lin_load.resize(nb_element * nb_quad);
			Real * imposed_val = lin_load.data();

			/// sigma/load on each quadrature points
			Real * qcoord = quad_coords.data();
			for (Int el = 0; el < nb_element; ++el) {
			for (Int q = 0; q < nb_quad; ++q) {
			myf(qcoord, imposed_val, NULL, 0);
			imposed_val += offset;
			qcoord += spatial_dimension;
			}
			}

			switch (function_type) {
			case _bft_traction_local:
			computeForcesByLocalTractionArray<type>(lin_load);
			break;
			case _bft_traction:
			computeForcesByGlobalTractionArray<type>(lin_load);
			break;
			default:
			break;
			}
			}
			#endif
			} // namespace akantu

			#endif /* AKANTU_STRUCTURAL_MECHANICS_MODEL_INLINE_IMPL_HH_ */

rAKA/src/model/structural_mechanics/structural_mechanics_model_inline_impl.hh4fd15fdf6bc2features/node_to_node

structural_mechanics_model_inline_impl.hhView Options

rAKA/src/model/structural_mechanics/structural_mechanics_model_inline_impl.hh
4fd15fdf6bc2features/node_to_node

structural_mechanics_model_inline_impl.hh
View Options