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

not all variables were consistently renamed

This commit is contained in:
Martin Diehl 2018-03-13 03:56:02 +01:00
parent 005c9f80c5
commit 2ceb3aeea0
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/math.f90
View File

@ -1831,7 +1831,7 @@ function math_sampleFiberOri(alpha,beta,FWHM)
reducedTo2D: do i=1_pInt,3_pInt reducedTo2D: do i=1_pInt,3_pInt
if (i /= minloc(abs(fInS),1)) then if (i /= minloc(abs(fInS),1)) then
a=[a,fInS(i)] a=[a,fInS(i)]
idx=[b,i] idx=[idx,i]
else else
j = i j = i
endif endif