Page Menu
Home
c4science
Search
Configure Global Search
Log In
Files
F78084954
ntn_initiation_function.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
Sun, Aug 18, 08:21
Size
11 KB
Mime Type
text/x-c
Expires
Tue, Aug 20, 08:21 (2 d)
Engine
blob
Format
Raw Data
Handle
19972831
Attached To
rAKA akantu
ntn_initiation_function.cc
View Options
/**
* @file ntn_initiation_function.cc
* @author David Kammer <david.kammer@epfl.ch>
* @date Mon Sep 2 14:35:11 2013
*
* @brief implementation of initializing ntn and ntrf friction
*
* @section LICENSE
*
* Copyright (©) 2010-2011 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/>.
*
*/
/* -------------------------------------------------------------------------- */
// simtools
#include "ntn_initiation_function.hh"
#include "ntn_friction.hh"
#include "ntrf_friction.hh"
// friction regularisations
#include "ntn_fricreg_rubin_ampuero.hh"
#include "ntn_fricreg_simplified_prakash_clifton.hh"
// friction laws
#include "ntn_friclaw_linear_cohesive.hh"
#include "ntn_friclaw_linear_slip_weakening.hh"
__BEGIN_SIMTOOLS__
NTNBaseFriction
*
initializeNTNFriction
(
NTNBaseContact
*
contact
,
ParameterReader
&
data
)
{
AKANTU_DEBUG_IN
();
const
std
::
string
&
friction_law
=
data
.
get
<
std
::
string
>
(
"friction_law"
);
const
std
::
string
&
friction_reg
=
data
.
get
<
std
::
string
>
(
"friction_regularisation"
);
NTNBaseFriction
*
friction
;
bool
is_ntn_contact
=
true
;
if
(
NTRFContact
*
cont
=
dynamic_cast
<
NTRFContact
*>
(
contact
))
{
is_ntn_contact
=
false
;
}
if
(
friction_law
==
"coulomb"
)
{
if
(
friction_reg
==
"no_regularisation"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawCoulomb
,
NTNFricRegNoRegularisation
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawCoulomb
,
NTNFricRegNoRegularisation
>
(
contact
);
}
else
if
(
friction_reg
==
"rubin_ampuero"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawCoulomb
,
NTNFricRegRubinAmpuero
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawCoulomb
,
NTNFricRegRubinAmpuero
>
(
contact
);
friction
->
setMixed
<
SynchronizedArray
<
Real
>
>
(
"t_star"
,
data
.
get
<
Real
>
(
"t_star"
));
}
else
if
(
friction_reg
==
"simplified_prakash_clifton"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawCoulomb
,
NTNFricRegSimplifiedPrakashClifton
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawCoulomb
,
NTNFricRegSimplifiedPrakashClifton
>
(
contact
);
friction
->
setMixed
<
SynchronizedArray
<
Real
>
>
(
"t_star"
,
data
.
get
<
Real
>
(
"t_star"
));
}
else
{
AKANTU_DEBUG_ERROR
(
"Do not know the following friction regularisation: "
<<
friction_reg
);
}
friction
->
setMixed
<
SynchronizedArray
<
Real
>
>
(
"mu_s"
,
data
.
get
<
Real
>
(
"mu_s"
));
}
// Friction Law: Linear Slip Weakening
else
if
(
friction_law
==
"linear_slip_weakening"
)
{
if
(
friction_reg
==
"no_regularisation"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawLinearSlipWeakening
,
NTNFricRegNoRegularisation
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawLinearSlipWeakening
,
NTNFricRegNoRegularisation
>
(
contact
);
}
else
if
(
friction_reg
==
"rubin_ampuero"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawLinearSlipWeakening
,
NTNFricRegRubinAmpuero
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawLinearSlipWeakening
,
NTNFricRegRubinAmpuero
>
(
contact
);
friction
->
setMixed
<
SynchronizedArray
<
Real
>
>
(
"t_star"
,
data
.
get
<
Real
>
(
"t_star"
));
}
else
if
(
friction_reg
==
"simplified_prakash_clifton"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawLinearSlipWeakening
,
NTNFricRegSimplifiedPrakashClifton
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawLinearSlipWeakening
,
NTNFricRegSimplifiedPrakashClifton
>
(
contact
);
friction
->
setMixed
<
SynchronizedArray
<
Real
>
>
(
"t_star"
,
data
.
get
<
Real
>
(
"t_star"
));
}
else
{
AKANTU_DEBUG_ERROR
(
"Do not know the following friction regularisation: "
<<
friction_reg
);
}
friction
->
setMixed
<
SynchronizedArray
<
Real
>
>
(
"mu_s"
,
data
.
get
<
Real
>
(
"mu_s"
));
friction
->
setMixed
<
SynchronizedArray
<
Real
>
>
(
"mu_k"
,
data
.
get
<
Real
>
(
"mu_k"
));
friction
->
setMixed
<
SynchronizedArray
<
Real
>
>
(
"d_c"
,
data
.
get
<
Real
>
(
"d_c"
));
}
// Friction Law: Linear Cohesive
else
if
(
friction_law
==
"linear_cohesive"
)
{
if
(
friction_reg
==
"no_regularisation"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawLinearCohesive
,
NTNFricRegNoRegularisation
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawLinearCohesive
,
NTNFricRegNoRegularisation
>
(
contact
);
}
else
if
(
friction_reg
==
"rubin_ampuero"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawLinearCohesive
,
NTNFricRegRubinAmpuero
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawLinearCohesive
,
NTNFricRegRubinAmpuero
>
(
contact
);
friction
->
setMixed
<
SynchronizedArray
<
Real
>
>
(
"t_star"
,
data
.
get
<
Real
>
(
"t_star"
));
}
else
if
(
friction_reg
==
"simplified_prakash_clifton"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawLinearCohesive
,
NTNFricRegSimplifiedPrakashClifton
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawLinearCohesive
,
NTNFricRegSimplifiedPrakashClifton
>
(
contact
);
friction
->
setMixed
<
SynchronizedArray
<
Real
>
>
(
"t_star"
,
data
.
get
<
Real
>
(
"t_star"
));
}
else
{
AKANTU_DEBUG_ERROR
(
"Do not know the following friction regularisation: "
<<
friction_reg
);
}
friction
->
setMixed
<
SynchronizedArray
<
Real
>
>
(
"G_c"
,
data
.
get
<
Real
>
(
"G_c"
));
friction
->
setMixed
<
SynchronizedArray
<
Real
>
>
(
"tau_c"
,
data
.
get
<
Real
>
(
"tau_c"
));
friction
->
setMixed
<
SynchronizedArray
<
Real
>
>
(
"tau_r"
,
data
.
get
<
Real
>
(
"tau_r"
));
}
else
{
AKANTU_DEBUG_ERROR
(
"Do not know the following friction law: "
<<
friction_law
);
}
AKANTU_DEBUG_OUT
();
return
friction
;
}
/* -------------------------------------------------------------------------- */
NTNBaseFriction
*
initializeNTNFriction
(
NTNBaseContact
*
contact
)
{
AKANTU_DEBUG_IN
();
std
::
pair
<
Parser
::
const_section_iterator
,
Parser
::
const_section_iterator
>
sub_sect
=
getStaticParser
().
getSubSections
(
_st_friction
);
Parser
::
const_section_iterator
it
=
sub_sect
.
first
;
const
ParserSection
&
section
=
*
it
;
std
::
string
friction_law
=
section
.
getName
();
std
::
string
friction_reg
=
section
.
getOption
();
if
(
friction_reg
==
""
)
{
std
::
string
friction_reg
=
"no_regularisation"
;
}
NTNBaseFriction
*
friction
=
initializeNTNFriction
(
contact
,
friction_law
,
friction_reg
);
friction
->
parseSection
(
section
);
if
(
++
it
!=
sub_sect
.
second
)
{
AKANTU_DEBUG_WARNING
(
"There were several friction sections in input file. "
<<
"Only first one was used and all others ignored."
);
}
AKANTU_DEBUG_OUT
();
return
friction
;
}
/* -------------------------------------------------------------------------- */
NTNBaseFriction
*
initializeNTNFriction
(
NTNBaseContact
*
contact
,
const
std
::
string
&
friction_law
,
const
std
::
string
&
friction_reg
)
{
AKANTU_DEBUG_IN
();
NTNBaseFriction
*
friction
;
// check whether is is node-to-rigid-flat contact
bool
is_ntn_contact
=
true
;
if
(
NTRFContact
*
cont
=
dynamic_cast
<
NTRFContact
*>
(
contact
))
{
is_ntn_contact
=
false
;
}
if
(
friction_law
==
"coulomb"
)
{
if
(
friction_reg
==
"no_regularisation"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawCoulomb
,
NTNFricRegNoRegularisation
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawCoulomb
,
NTNFricRegNoRegularisation
>
(
contact
);
}
else
if
(
friction_reg
==
"rubin_ampuero"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawCoulomb
,
NTNFricRegRubinAmpuero
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawCoulomb
,
NTNFricRegRubinAmpuero
>
(
contact
);
}
else
if
(
friction_reg
==
"simplified_prakash_clifton"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawCoulomb
,
NTNFricRegSimplifiedPrakashClifton
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawCoulomb
,
NTNFricRegSimplifiedPrakashClifton
>
(
contact
);
}
else
{
AKANTU_DEBUG_ERROR
(
"Do not know the following friction regularisation: "
<<
friction_reg
);
}
}
// Friction Law: Linear Slip Weakening
else
if
(
friction_law
==
"linear_slip_weakening"
)
{
if
(
friction_reg
==
"no_regularisation"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawLinearSlipWeakening
,
NTNFricRegNoRegularisation
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawLinearSlipWeakening
,
NTNFricRegNoRegularisation
>
(
contact
);
}
else
if
(
friction_reg
==
"rubin_ampuero"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawLinearSlipWeakening
,
NTNFricRegRubinAmpuero
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawLinearSlipWeakening
,
NTNFricRegRubinAmpuero
>
(
contact
);
}
else
if
(
friction_reg
==
"simplified_prakash_clifton"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawLinearSlipWeakening
,
NTNFricRegSimplifiedPrakashClifton
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawLinearSlipWeakening
,
NTNFricRegSimplifiedPrakashClifton
>
(
contact
);
}
else
{
AKANTU_DEBUG_ERROR
(
"Do not know the following friction regularisation: "
<<
friction_reg
);
}
}
// Friction Law: Linear Cohesive
else
if
(
friction_law
==
"linear_cohesive"
)
{
if
(
friction_reg
==
"no_regularisation"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawLinearCohesive
,
NTNFricRegNoRegularisation
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawLinearCohesive
,
NTNFricRegNoRegularisation
>
(
contact
);
}
else
if
(
friction_reg
==
"rubin_ampuero"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawLinearCohesive
,
NTNFricRegRubinAmpuero
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawLinearCohesive
,
NTNFricRegRubinAmpuero
>
(
contact
);
}
else
if
(
friction_reg
==
"simplified_prakash_clifton"
)
{
if
(
is_ntn_contact
)
friction
=
new
NTNFriction
<
NTNFricLawLinearCohesive
,
NTNFricRegSimplifiedPrakashClifton
>
(
contact
);
else
friction
=
new
NTRFFriction
<
NTNFricLawLinearCohesive
,
NTNFricRegSimplifiedPrakashClifton
>
(
contact
);
}
else
{
AKANTU_DEBUG_ERROR
(
"Do not know the following friction regularisation: "
<<
friction_reg
);
}
}
else
{
AKANTU_DEBUG_ERROR
(
"Do not know the following friction law: "
<<
friction_law
);
}
AKANTU_DEBUG_OUT
();
return
friction
;
}
__END_SIMTOOLS__
Event Timeline
Log In to Comment