' Call a dynamic library function
PROTO j0
bessel0 = j0(1.0)
PRINT bessel0