Commit 3c12980d authored by Dahua Lin's avatar Dahua Lin

remove unused simpson function

parent 19b8a3e8
......@@ -145,20 +145,6 @@ macro checkinvlogcdf(lp,ex)
:($lp <= zero($lp) ? $ex : NaN)
end
# Simple method for integration
function simpson(f::AbstractVector{Float64}, h::Float64)
n = length(f)
isodd(n) || error("The length of the input vector must be odd.")
s = f[1]
t = -1
for i = 2:2:n-1
@inbounds s += (4 * f[i] + 2 * f[i+1])
end
s += f[n]
return s * h / 3.0
end
# because X == X' keeps failing due to floating point nonsense
function isApproxSymmmetric(a::Matrix{Float64})
tmp = true
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment