Page Menu
Home
c4science
Search
Configure Global Search
Log In
Files
F77561899
phasefield_exponential.cc
No One
Temporary
Actions
Download File
Edit File
Delete File
View Transforms
Subscribe
Mute Notifications
Award Token
Subscribers
None
File Metadata
Details
File Info
Storage
Attached
Created
Thu, Aug 15, 04:53
Size
4 KB
Mime Type
text/x-c
Expires
Sat, Aug 17, 04:53 (1 d, 23 h)
Engine
blob
Format
Raw Data
Handle
19888347
Attached To
rAKA akantu
phasefield_exponential.cc
View Options
/**
* @file phasefield_exponential.cc
*
* @author Mohit Pundir <mohit.pundir@epfl.ch>
*
* @date creation: Mon Mar 3 2020
* @date last modification: Mon Mar 3 2020
*
* @brief Specialization of the phasefield class for exponential field
*
* @section LICENSE
*
* Copyright (©) 2010-2018 EPFL (Ecole Polytechnique Fédérale de Lausanne)
* Laboratory (LSMS - Laboratoire de Simulation en Mécanique des Solides)
*
* 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 "phasefield_exponential.hh"
namespace
akantu
{
/* -------------------------------------------------------------------------- */
PhaseFieldExponential
::
PhaseFieldExponential
(
PhaseFieldModel
&
model
,
const
ID
&
id
)
:
PhaseField
(
model
,
id
)
{
AKANTU_DEBUG_IN
();
AKANTU_DEBUG_OUT
();
}
/* -------------------------------------------------------------------------- */
void
PhaseFieldExponential
::
updateInternalParameters
()
{
PhaseField
::
updateInternalParameters
();
Matrix
<
Real
>
d
(
spatial_dimension
,
spatial_dimension
);
d
.
eye
(
this
->
g_c
*
this
->
l0
);
damage_energy
.
set
(
d
);
}
/* -------------------------------------------------------------------------- */
void
PhaseFieldExponential
::
computeDrivingForce
(
const
ElementType
&
el_type
,
GhostType
ghost_type
)
{
AKANTU_DEBUG_IN
();
for
(
auto
&&
tuple
:
zip
(
this
->
phi
(
el_type
,
ghost_type
),
this
->
phi
.
previous
(
el_type
,
ghost_type
),
this
->
driving_force
(
el_type
,
ghost_type
),
this
->
damage_energy_density
(
el_type
,
ghost_type
),
make_view
(
this
->
strain
(
el_type
,
ghost_type
),
spatial_dimension
,
spatial_dimension
)))
{
computePhiOnQuad
(
std
::
get
<
4
>
(
tuple
),
std
::
get
<
0
>
(
tuple
),
std
::
get
<
1
>
(
tuple
));
computeDamageEnergyDensityOnQuad
(
std
::
get
<
0
>
(
tuple
),
std
::
get
<
3
>
(
tuple
));
computeDrivingForceOnQuad
(
std
::
get
<
0
>
(
tuple
),
std
::
get
<
2
>
(
tuple
));
}
AKANTU_DEBUG_OUT
();
}
/* -------------------------------------------------------------------------- */
/*void PhaseFieldExponential::computePhiHistory(const ElementType & type,
GhostType ghost_type) {
AKANTU_DEBUG_IN();
Matrix<Real> strain_plus(spatial_dimension, spatial_dimension);
Matrix<Real> strain_minus(spatial_dimension, spatial_dimension);
Matrix<Real> strain_dir(spatial_dimension, spatial_dimension);
Matrix<Real> strain_diag_plus(spatial_dimension, spatial_dimension);
Matrix<Real> strain_diag_minus(spatial_dimension, spatial_dimension);
Vector<Real> strain_values(spatial_dimension);
Real trace_plus, trace_minus, phi_plus;
for (auto && values :
zip(make_view(strain(type, ghost_type), spatial_dimension,
spatial_dimension),
make_view(phi(type, ghost_type)))) {
auto & strain_quad = std::get<0>(values);
auto & phi_history = std::get<1>(values);
strain_plus.clear();
strain_minus.clear();
strain_dir.clear();
strain_values.clear();
strain_diag_plus.clear();
strain_diag_minus.clear();
strain_quad.eig(strain_values, strain_dir);
for (UInt i = 0; i < spatial_dimension; i++) {
strain_diag_plus(i, i) = std::max(Real(0.), strain_values(i));
strain_diag_minus(i, i) = std::min(Real(0.), strain_values(i));
}
Matrix<Real> mat_tmp(spatial_dimension, spatial_dimension);
Matrix<Real> sigma_plus(spatial_dimension, spatial_dimension);
Matrix<Real> sigma_minus(spatial_dimension, spatial_dimension);
mat_tmp.mul<false, true>(strain_diag_plus, strain_dir);
strain_plus.mul<false, false>(strain_dir, mat_tmp);
mat_tmp.mul<false, true>(strain_diag_minus, strain_dir);
strain_minus.mul<false, true>(strain_dir, mat_tmp);
trace_plus = std::max(Real(0.), strain_quad.trace());
trace_minus = std::min(Real(0.), strain_quad.trace());
for (UInt i = 0; i < spatial_dimension; i++) {
for (UInt j = 0; j < spatial_dimension; j++) {
sigma_plus(i, j) =
(i == j) * lambda * trace_plus + 2 * mu * strain_plus(i, j);
sigma_minus(i, j) =
(i == j) * lambda * trace_minus + 2 * mu * strain_minus(i, j);
}
}
phi_plus = 1. / 2 * sigma_plus.doubleDot(strain_quad);
if (phi_plus > phi_history) {
phi_history = phi_plus;
}
}
}*/
INSTANTIATE_PHASEFIELD
(
exponential
,
PhaseFieldExponential
);
}
Event Timeline
Log In to Comment