diff --git a/MaterialModels/FiniteStrain/Finite_VEVP/1e_strain_cyc.inp b/MaterialModels/FiniteStrain/Finite_VEVP/1e_strain_cyc.inp index 94c94a413d457858f411db186165510a0aa217c5..61aa6c44d06dc11be4df3eeae37a44aaed1e2534 100644 --- a/MaterialModels/FiniteStrain/Finite_VEVP/1e_strain_cyc.inp +++ b/MaterialModels/FiniteStrain/Finite_VEVP/1e_strain_cyc.inp @@ -35,6 +35,22 @@ 3380000.0,33800000.0 *DEPVAR 108 +*INITIAL CONDITIONS, TYPE=SOLUTION +1.0,1.0,1.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0 ** *STEP, name=Step-1, inc=1000, NLGEOM=YES *Static diff --git a/MaterialModels/FiniteStrain/Finite_VEVP/1e_strain_mono.inp b/MaterialModels/FiniteStrain/Finite_VEVP/1e_strain_mono.inp index 0a52f366b6931371faec3a912cb6ecf5741f0095..01db44b198b52dfa10904fb3cbf5630fcc967481 100644 --- a/MaterialModels/FiniteStrain/Finite_VEVP/1e_strain_mono.inp +++ b/MaterialModels/FiniteStrain/Finite_VEVP/1e_strain_mono.inp @@ -35,6 +35,22 @@ 3380000.0,33800000.0 *DEPVAR 108 +*INITIAL CONDITIONS, TYPE=SOLUTION +1.0,1.0,1.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0 ** *STEP, name=Step-1, inc=1000, NLGEOM=YES *Static diff --git a/MaterialModels/FiniteStrain/Finite_VEVP/README.md b/MaterialModels/FiniteStrain/Finite_VEVP/README.md index 253e416848233ba13bb91e12b2144ca45ad62ae9..08284f618da1c1a14cf49f3d4a21c58a9617d60c 100644 --- a/MaterialModels/FiniteStrain/Finite_VEVP/README.md +++ b/MaterialModels/FiniteStrain/Finite_VEVP/README.md @@ -67,6 +67,11 @@ The UMAT implementation uses the material parameters **_in the following order_* |49 | Retardation Time Deviatoric - Maxwell Branch 7 | $g_7$ | s | |50 | Retardation Time Deviatoric - Maxwell Branch 8 | $g_8$ | s | +## Remark + +Lines 164-168 have to be uncommented for use in FFTMAD but have to be commented for ABAQUS or cm3Libraries. +If you comment out, then in ABAQUS, use the inp file to set initial values for F_vp. + ## Disclaimer Code related to MOAMMM project diff --git a/MaterialModels/FiniteStrain/Finite_VEVP/dogbone.inp b/MaterialModels/FiniteStrain/Finite_VEVP/dogbone.inp index 26e772dacfa85a49e96dcf3aae198bbad9768aaa..d3bd2d6391eabd684d2dd5d4c229e8c8fde9fb77 100644 --- a/MaterialModels/FiniteStrain/Finite_VEVP/dogbone.inp +++ b/MaterialModels/FiniteStrain/Finite_VEVP/dogbone.inp @@ -4990,6 +4990,22 @@ 3380000.0,33800000.0 *DEPVAR 108 +*INITIAL CONDITIONS, TYPE=SOLUTION +1.0,1.0,1.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0, +0.0 ** ----------------------------------------------------------------------------- ** ** BOUNDARY CONDITIONS diff --git a/MaterialModels/FiniteStrain/Finite_VEVP/umat.f b/MaterialModels/FiniteStrain/Finite_VEVP/umat.f index 04bbb8b483d172438b5341f419549c30b4d8a5e9..78af446fa88ef55093758a7853bbdae22c85f48c 100644 --- a/MaterialModels/FiniteStrain/Finite_VEVP/umat.f +++ b/MaterialModels/FiniteStrain/Finite_VEVP/umat.f @@ -161,11 +161,11 @@ C !-------------------------------------------------------------- ! for the first time step (initial condition) in FFTMAD. ! Can be commented out for ABAQUS, If you comment out, then ! in abaqus use the inp file to set initial values for F_vp. - IF ((KINC .EQ. 1) .AND. (KSTEP .EQ. 1)) THEN - STATEV(1) = 1.D0 - STATEV(2) = 1.D0 - STATEV(3) = 1.D0 - END IF +C IF ((KINC .EQ. 1) .AND. (KSTEP .EQ. 1)) THEN +C STATEV(1) = 1.D0 +C STATEV(2) = 1.D0 +C STATEV(3) = 1.D0 +C END IF ! State variables at previous time step CALL voit2mat(STATEV(1:9), F_vp_n(:,:))