diff --git a/src/Derivative/Caputo.jl b/src/Derivative/Caputo.jl index 48056be..22eaada 100644 --- a/src/Derivative/Caputo.jl +++ b/src/Derivative/Caputo.jl @@ -306,10 +306,6 @@ function fracdiff(f::FunctionAndNumber, return result end - -#= -Caputo sense high precision algorithm -=# function fracdiff(y::FunctionAndNumber, α, t, p::Integer, ::CaputoHighPrecision) h = t[2]-t[1] t = t[:] @@ -337,9 +333,9 @@ function fracdiff(y::FunctionAndNumber, α, t, p::Integer, ::CaputoHighPrecision end function fracdiff(f::FunctionAndNumber, - α::Float64, + α::Real, T::Number, - h::Float64, + h::Real, p::Integer, ::CaputoHighOrder) n = round(Int, T/h) @@ -413,10 +409,10 @@ function fj(n::Integer, T, fy) end function fracdiff(f::FunctionAndNumber, - alpha::T, + alpha::Real, end_point::Real, - h::T, - ::CaputoL1) where {T <: Real} + h::Real, + ::CaputoL1) result = zero(Float64) n = floor(Int, end_point/h)