mirror of
https://github.com/QuantumPackage/qp2.git
synced 2025-04-30 04:04:52 +02:00
Fix bug introduced by 57527c94a27491107e
This commit is contained in:
parent
aa1eb991d0
commit
7df3287241
@ -39,7 +39,7 @@ double precision function binom_func(i,j)
|
|||||||
endif
|
endif
|
||||||
|
|
||||||
! To avoid .999999 numbers
|
! To avoid .999999 numbers
|
||||||
binom_func = binom_func + 0.5d0
|
binom_func = floor(binom_func + 0.5d0)
|
||||||
|
|
||||||
end
|
end
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user