/*! 
 * \file   lorentz.mtest
 * \brief
 * \author Helfer Thomas
 * \brief  18 juin 2013
 */

@AccelerationAlgorithm 'AlternateSecant';
@StiffnessMatrixType 'Elastic';

@Behaviour<umat> '@MFrontCastemBehavioursBuildPath@' 'umatlorentz';

@StrainEpsilon 1.e-11;
@StressEpsilon 1.e-1;

@Real 'young'  3.2e10;
@Real 'nu'     0.2;
@Real 'lambda' 'nu*young/((1+nu)*(1-2*nu))';
@Real 'mu'     'young/(2*(1+nu))';

@Real 'smax'   '150e6';
@Real 'A' '0.5*(lambda+2*mu)*(smax/young)**2'; 

@MaterialProperty<constant> 'YoungModulus'     'young';
@MaterialProperty<constant> 'PoissonRatio'     'nu';
@MaterialProperty<constant> 'k' '2*A';
@MaterialProperty<constant> 'g' 'A/(k-A)';

@ExternalStateVariable 'Temperature' 293.15;
@ImposedStrain 'EXX' {0.:0.,0.4:0.6e-2,0.5:0,
    0.6:-0.5e-2,0.7:0.,1.0: 1.5e-02};

@Times {0.,0.5 in 10,0.6 in 2,0.7 in 2,
    1. in 10};