223031012
/
DAMASK_EICMD
mirror of https://github.com/achalhp/DAMASK_EICMD.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

use subF instead of F for analytic jacobian calculation

This commit is contained in:
Pratheek Shanthraj 2014-08-15 09:04:00 +00:00
parent 1da874a6db
commit 7666013758
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
code/crystallite.f90
View File

@ -1133,8 +1133,7 @@ subroutine crystallite_stressAndItsTangent(updateJaco)
dFedF = 0.0_pReal
forall(p=1_pInt:3_pInt, o=1_pInt:3_pInt) &
dFedF(1:3,1:3,p,o) = temp_3333(1:3,1:3,p,o) + &
math_mul33x33(math_mul33x33(crystallite_Fe(1:3,1:3,g,i,e), &
crystallite_Fp(1:3,1:3,g,i,e)), &
math_mul33x33(crystallite_subF(1:3,1:3,g,i,e), &
dFpinvdF(1:3,1:3,p,o))
forall(p=1_pInt:3_pInt, o=1_pInt:3_pInt) &