📄 fabs.c
字号:
/* fabs.c * * Absolute value * * * * SYNOPSIS: * * double x, y; * * y = fabs( x ); * * * * DESCRIPTION: * * Returns the absolute value of the argument. * */#include "mconf.h"/* Avoid using UNK if possible. */#ifdef UNK#if BIGENDIAN#define MIEEE 1#else#define IBMPC 1#endif#endifdouble fabs(x)double x;{union { double d; short i[4]; } u;u.d = x;#ifdef IBMPC u.i[3] &= 0x7fff;#endif#ifdef MIEEE u.i[0] &= 0x7fff;#endif#ifdef DEC u.i[3] &= 0x7fff;#endif#ifdef UNKif( u.d < 0 ) u.d = -u.d;#endifreturn( u.d );}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -