1/*!
2 * \file    SAINTVENANTKIRCHHOFFELASTICITY2-shear-1-3D.mtest
3 * \brief
4 * \author Helfer Thomas
5 * \brief  26 nov. 2013
6 */
7
8@AccelerationAlgorithm 'Cast3M';
9@Behaviour<abaqus_explicit> '@MFrontAbaqusExplicitBehavioursBuildPath@' 'SAINTVENANTKIRCHHOFFELASTICITY2_3D';
10@MaterialProperty<constant> 'MassDensity'  15000.;
11@MaterialProperty<constant> 'YoungModulus'     215.e9;
12@MaterialProperty<constant> 'PoissonRatio'       0.3;
13
14@ImposedDrivingVariable 'FXX' 1.;
15@ImposedDrivingVariable 'FYY' 1.;
16@ImposedDrivingVariable 'FZZ' 1.;
17@ImposedDrivingVariable 'FXY' {0:0.,1.:0.2};
18@ImposedDrivingVariable 'FYX' 0.;
19@ImposedDrivingVariable 'FXZ' 0.;
20@ImposedDrivingVariable 'FZX' 0.;
21@ImposedDrivingVariable 'FYZ' 0.;
22@ImposedDrivingVariable 'FZY' 0.;
23
24@ExternalStateVariable 'Temperature' 293.15;
25
26@Times {0.,1 in 10};
27
28@Real 'lambda' 'PoissonRatio*YoungModulus/((1+PoissonRatio)*(1-2*PoissonRatio))';
29@Real 'mu'     'YoungModulus/(2*(1+PoissonRatio))';
30@Test<function> {'SXX':'((2*mu+lambda)*FXY**4+(4*mu+lambda)*FXY**2)/2'} 1.e-2;
31@Test<function> {'SYY':'((2*mu+lambda)*FXY**2)/2'} 1.e-2;
32@Test<function> {'SZZ':'(lambda*FXY**2)/2 '} 1.e-2;
33@Test<function> {'SXY':'sqrt(2)*((2*mu+lambda)*FXY**3+2*mu*FXY)/2'} 1.e-2;
34@Test<function> {'SXZ':'0.','SYZ':'0.'} 1.e-2;
35
36