draw(sin(%e^x), x = 0..%pi)
^
draw([besselJ(0, x), besselJ(2, x), besselJ(5, x)], x = 0..10, _
title == "Bessel Functions BesselJ(n, x)")