extern double fabs(), floor(), ceil(), fmod(), ldexp(), sqrt(), hypot(), atof(), sin(), cos(), tan(), asin(), acos(), atan(), atan2(), exp(), log(), log10(), pow(), sinh(), cosh(), tanh(), gamma(), j0(), j1(), jn(), y0(), y1(), yn(); #define HUGE 1.701411733192644270e38 #define LOGHUGE 39