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

Merge branch 'bugfix' into 'development' 

Bugfix

needed in development

See merge request !1
This commit is contained in:
Martin Diehl 2016-02-23 14:43:37 +01:00
parent 2bfc070797 8419e293d0
commit 9f617aa097
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
code/plastic_dislotwin.f90
View File

@ -2007,7 +2007,7 @@ subroutine plastic_dislotwin_dotState(Tstar_v,Temperature,ipc,ip,el)
!* Total twin volume fraction !* Total twin volume fraction
sumf = sum(state(instance)%twinFraction(1_pInt:nt,of)) ! safe for nt == 0 sumf = sum(state(instance)%twinFraction(1_pInt:nt,of)) ! safe for nt == 0
plasticState(instance)%dotState(:,of) = 0.0_pReal plasticState(ph)%dotState(:,of) = 0.0_pReal
!* Total transformed volume fraction !* Total transformed volume fraction
sumftr = sum(state(instance)%stressTransFraction(1_pInt:nr,of)) + & sumftr = sum(state(instance)%stressTransFraction(1_pInt:nr,of)) + &