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

fixed wrong index

This commit is contained in:
Luv Sharma 2014-08-21 12:02:09 +00:00
parent 1e8139452c
commit 594c3c007b
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/homogenization_isostrain.f90
View File

@ -144,7 +144,7 @@ subroutine homogenization_isostrain_init(fileUnit)
endif endif
enddo enddo
do k = 1,maxNinstance do i = 1,maxNinstance
do j = 1_pInt,maxval(homogenization_Noutput) do j = 1_pInt,maxval(homogenization_Noutput)
select case(homogenization_isostrain_outputID(j,i)) select case(homogenization_isostrain_outputID(j,i))