diff --git a/src/math/slam_randomNumber.f90 b/src/math/slam_randomNumber.f90 index cc67848..0a58ff1 100644 --- a/src/math/slam_randomNumber.f90 +++ b/src/math/slam_randomNumber.f90 @@ -213,10 +213,12 @@ real(dp) function getRandomNumber(iopt, xmean, xsigma) else if(iopt == RANDOM_NORMAL .or. iopt == RANDOM_LOG_NORMAL) then !** check if there is already a number available - if(isOtherNumber(iopt) .and. (xmean_prev == xmean) .and. (xsigma_prev == xsigma)) then + if(isOtherNumber(iopt)) then + if ((xmean_prev == xmean) .and. (xsigma_prev == xsigma)) then - getRandomNumber = otherNumber(iopt) - isOtherNumber(iopt) = .false. + getRandomNumber = otherNumber(iopt) + isOtherNumber(iopt) = .false. + end if else !** generate two new numbers