Kelvin function ber (mpmath, WMA)
KelvinBer
KelvinBer[0.5]
KelvinBer[1.5 + I]
KelvinBer[0.5, 0.25]
Plot[KelvinBer[x], {x, 0, 10}]