not all variables were consistently renamed

2018-03-13 03:56:02 +01:00 · 2018-03-13 03:56:02 +01:00 · 2ceb3aeea0
parent 005c9f80c5
commit 2ceb3aeea0
1 changed files with 1 additions and 1 deletions
--- a/src/math.f90
+++ b/src/math.f90
@ -1831,7 +1831,7 @@ function math_sampleFiberOri(alpha,beta,FWHM)
   reducedTo2D: do i=1_pInt,3_pInt
     if (i /= minloc(abs(fInS),1)) then
       a=[a,fInS(i)]
-       idx=[b,i]
+       idx=[idx,i]
     else
       j = i
     endif