Homec4science
Diffusion akantu (features/38-damage-energy-computation-missing-in-phasefield-model) Browse

rAKA/test/test_model/test_solid_mechanics_model/test_materials/test_multi_material_elastic.cc
388bb0fdee70features/38-damage…

Last Change
Raw File

test_multi_material_elastic.cc
View Options

#include <solid_mechanics_model.hh>
using namespace akantu;
int main(int argc, char *argv[]) {
initialize("test_multi_material_elastic.dat", argc, argv);
UInt spatial_dimension = 2;
Mesh mesh(spatial_dimension);
mesh.read("test_multi_material_elastic.msh");
mesh.createGroupsFromMeshData<std::string>("physical_names");
SolidMechanicsModel model(mesh);
MeshDataMaterialSelector<std::string> mat_sel("physical_names", model);
model.setMaterialSelector(mat_sel);
model.initFull(SolidMechanicsModelOptions(_static));
model.applyBC(BC::Dirichlet::FlagOnly(_y), "ground");
model.applyBC(BC::Dirichlet::FlagOnly(_x), "corner");
Vector<Real> trac(spatial_dimension, 0.);
trac(_y) = 1.;
model.applyBC(BC::Neumann::FromTraction(trac), "air");
model.addDumpField("force");
model.addDumpField("residual");
model.addDumpField("blocked_dofs");
model.addDumpField("displacement");
model.addDumpField("stress");
model.addDumpField("grad_u");
//model.dump();
model.assembleStiffnessMatrix();
model.solveStatic<_scm_newton_raphson_tangent_not_computed, _scc_residual>(1e-8, 1);
//model.dump();
std::map<std::string, Matrix<Real>> ref_strain;
ref_strain["strong"] = Matrix<Real>(spatial_dimension, spatial_dimension, 0.);
ref_strain["strong"](_y, _y) = .5;
ref_strain["weak"] = Matrix<Real>(spatial_dimension, spatial_dimension, 0.);
ref_strain["weak"](_y, _y) = 1;
Matrix<Real> ref_stress(spatial_dimension, spatial_dimension, 0.);
ref_stress(_y, _y) = 1.;
std::vector<std::string> mats = {"strong", "weak"};
typedef Array<Real>::const_matrix_iterator mat_it;
auto check = [](mat_it it, mat_it end, const Matrix<Real> & ref) -> bool {
for(;it != end; ++it) {
Real dist = (*it - ref).norm<L_2>();
//std::cout << *it << " " << dist << " " << (dist < 1e-10 ? "OK" : "Not OK") << std::endl;
if (dist > 1e-10) return false;
}
return true;
};
auto tit = mesh.firstType(spatial_dimension);
auto tend = mesh.lastType(spatial_dimension);
for (; tit != tend; ++tit) {
auto & type = *tit;
for(auto mat_id : mats) {
auto & stress = model.getMaterial(mat_id).getStress(type);
auto & grad_u = model.getMaterial(mat_id).getGradU(type);
auto sit = stress.begin(spatial_dimension, spatial_dimension);
auto send = stress.end(spatial_dimension, spatial_dimension);
auto git = grad_u.begin(spatial_dimension, spatial_dimension);
auto gend = grad_u.end(spatial_dimension, spatial_dimension);
if(!check(sit, send, ref_stress)) AKANTU_DEBUG_ERROR("The stresses are not correct");
if(!check(git, gend, ref_strain[mat_id])) AKANTU_DEBUG_ERROR("The grad_u are not correct");
}
}
finalize();
return 0;
}
c4science · Help