1 /* 2 * "@(#)dbesj0_.c 1.1" 3 */ 4 5 double j0(); 6 7 double dbesj0_(x) 8 double *x; 9 { 10 return(j0(*x)); 11 } 12