/* * "@(#)dbesy1_.c 1.1" */ double y1(); double dbesy1_(x) double *x; { return(y1(*x)); }