Function Dbesi1

Part of:

package slatec
( dbesi1 < x > )