besy0_ X
1: /* 2: * "@(#)besy0_.c 1.1" 3: */ 4: 5: double y0(); 6: 7: float besy0_(x) 8: float *x; 9: { 10: return((float)y0((double)*x)); 11: }