Function Dbesy1

Part of:

package slatec
( dbesy1 < x > )