Page Menu
Home
c4science
Search
Configure Global Search
Log In
Files
F91254154
material_thermal.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
Sat, Nov 9, 09:42
Size
4 KB
Mime Type
text/x-c++
Expires
Mon, Nov 11, 09:42 (2 d)
Engine
blob
Format
Raw Data
Handle
22206144
Attached To
rAKA akantu
material_thermal.cc
View Options
/**
* @file material_thermal.cc
*
* @author Lucas Frerot <lucas.frerot@epfl.ch>
*
* @date creation: Fri Jun 18 2010
* @date last modification: Tue Aug 04 2015
*
* @brief Specialization of the material class for the thermal material
*
* @section LICENSE
*
* Copyright (©) 2010-2012, 2014, 2015 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 "material_thermal.hh"
__BEGIN_AKANTU__
/* -------------------------------------------------------------------------- */
template
<
UInt
spatial_dimension
>
MaterialThermal
<
spatial_dimension
>::
MaterialThermal
(
SolidMechanicsModel
&
model
,
const
ID
&
id
)
:
Material
(
model
,
id
),
delta_T
(
"delta_T"
,
*
this
),
sigma_th
(
"sigma_th"
,
*
this
),
use_previous_stress_thermal
(
false
)
{
AKANTU_DEBUG_IN
();
this
->
initialize
();
AKANTU_DEBUG_OUT
();
}
/* -------------------------------------------------------------------------- */
template
<
UInt
spatial_dimension
>
MaterialThermal
<
spatial_dimension
>::
MaterialThermal
(
SolidMechanicsModel
&
model
,
UInt
dim
,
const
Mesh
&
mesh
,
FEEngine
&
fe_engine
,
const
ID
&
id
)
:
Material
(
model
,
dim
,
mesh
,
fe_engine
,
id
),
delta_T
(
"delta_T"
,
*
this
,
dim
,
fe_engine
,
this
->
element_filter
),
sigma_th
(
"sigma_th"
,
*
this
,
dim
,
fe_engine
,
this
->
element_filter
),
use_previous_stress_thermal
(
false
)
{
AKANTU_DEBUG_IN
();
this
->
initialize
();
AKANTU_DEBUG_OUT
();
}
template
<
UInt
spatial_dimension
>
void
MaterialThermal
<
spatial_dimension
>::
initialize
()
{
this
->
registerParam
(
"E"
,
E
,
Real
(
0.
)
,
_pat_parsable
|
_pat_modifiable
,
"Young's modulus"
);
this
->
registerParam
(
"nu"
,
nu
,
Real
(
0.5
)
,
_pat_parsable
|
_pat_modifiable
,
"Poisson's ratio"
);
this
->
registerParam
(
"alpha"
,
alpha
,
Real
(
0.
)
,
_pat_parsable
|
_pat_modifiable
,
"Thermal expansion coefficient"
);
this
->
registerParam
(
"delta_T"
,
delta_T
,
_pat_parsable
|
_pat_modifiable
,
"Uniform temperature field"
);
delta_T
.
initialize
(
1
);
}
/* -------------------------------------------------------------------------- */
template
<
UInt
spatial_dimension
>
void
MaterialThermal
<
spatial_dimension
>::
initMaterial
()
{
AKANTU_DEBUG_IN
();
sigma_th
.
initialize
(
1
);
if
(
use_previous_stress_thermal
)
{
sigma_th
.
initializeHistory
();
}
Material
::
initMaterial
();
AKANTU_DEBUG_OUT
();
}
/* -------------------------------------------------------------------------- */
template
<
UInt
dim
>
void
MaterialThermal
<
dim
>::
computeStress
(
ElementType
el_type
,
GhostType
ghost_type
)
{
AKANTU_DEBUG_IN
();
Array
<
Real
>::
iterator
<>
delta_t_it
=
this
->
delta_T
(
el_type
,
ghost_type
).
begin
();
Array
<
Real
>::
iterator
<>
sigma_th_it
=
this
->
sigma_th
(
el_type
,
ghost_type
).
begin
();
MATERIAL_STRESS_QUADRATURE_POINT_LOOP_BEGIN
(
el_type
,
ghost_type
);
/// TODO : implement with the matrix alpha
if
(
dim
==
1
)
{
*
sigma_th_it
=
-
this
->
E
*
this
->
alpha
*
*
delta_t_it
;
}
else
{
*
sigma_th_it
=
-
this
->
E
/
(
1.
-
2.
*
this
->
nu
)
*
this
->
alpha
*
*
delta_t_it
;
}
++
delta_t_it
;
++
sigma_th_it
;
MATERIAL_STRESS_QUADRATURE_POINT_LOOP_END
;
AKANTU_DEBUG_OUT
();
}
/* -------------------------------------------------------------------------- */
INSTANTIATE_MATERIAL
(
MaterialThermal
);
__END_AKANTU__
Event Timeline
Log In to Comment