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

more sensible cutoff for scatter

This commit is contained in:
Martin Diehl 2018-02-15 11:26:19 +01:00
parent 230ffe8f35
commit 9b1e72e7bc
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

@ -1783,7 +1783,7 @@ function math_sampleGaussOri(center,noise)
real(pReal), dimension(3), parameter :: ORIGIN = 0.0_pReal real(pReal), dimension(3), parameter :: ORIGIN = 0.0_pReal
real(pReal), dimension(5) :: rnd real(pReal), dimension(5) :: rnd
noScatter: if (abs(noise) < tol_math_check) then noScatter: if (noise < 0.5_pReal*INRAD) then
math_sampleGaussOri = center math_sampleGaussOri = center
else noScatter else noScatter
! Helming uses different distribution with Bessel functions ! Helming uses different distribution with Bessel functions