Skip to content

Commit

Permalink
change interface
Browse files Browse the repository at this point in the history
  • Loading branch information
jlapeyre committed Nov 9, 2016
1 parent d599419 commit 6b25740
Show file tree
Hide file tree
Showing 2 changed files with 11 additions and 5 deletions.
8 changes: 5 additions & 3 deletions README.md
Original file line number Diff line number Diff line change
Expand Up @@ -10,10 +10,12 @@


```julia
mittleff(α,β,z,ρ=eps()) # evaluate Mittag-Leffler function with tolerance ρ
```

mittlefferr(α,β,z,ρ) # evaluate Mittag-Leffler function with tolerance ρ
mittlefferr(α,z,ρ) # mittlefferr(α,1,z,ρ)

mittleff(α,β,z) # evaluate Mittag-Leffler function with tolerance eps()
mittleff(α,z) # mittleff(α,1,z)
```

### Reference

Expand Down
8 changes: 6 additions & 2 deletions src/mittag_leffler.jl
Original file line number Diff line number Diff line change
Expand Up @@ -76,8 +76,12 @@ function mittleffints(α,β,z,ρ)
end

## TODO: Do real values sometimes return complex result ?
mittleff::Real::Real,z::Real::Real=eps()) = real(_mittleff(α,β,z,ρ))
mittleff::Real::Real,z::Complex::Real=eps()) = _mittleff(α,β,z,ρ)
mittlefferr(α,z,ρ) = mittlefferr(α,1,z,ρ)
mittlefferr::Real::Real,z::Real::Real) = real(_mittleff(α,β,z,ρ))
mittlefferr::Real::Real,z::Complex::Real) = _mittleff(α,β,z,ρ)

mittleff(α,β,z) = mittlefferr(α,β,z,eps())
mittleff(α,z) = mittlefferr(α,1,z,eps())

function _mittleff(α,β,z,ρ)
1 < α && return mittleffsum(α,β,z)
Expand Down

0 comments on commit 6b25740

Please sign in to comment.