mirror of
https://github.com/autc04/Retro68.git
synced 2024-11-19 03:05:15 +00:00
50 lines
754 B
C
50 lines
754 B
C
/*
|
|
FUNCTION
|
|
<<labs>>---long integer absolute value
|
|
|
|
INDEX
|
|
labs
|
|
|
|
ANSI_SYNOPSIS
|
|
#include <stdlib.h>
|
|
long labs(long <[i]>);
|
|
|
|
TRAD_SYNOPSIS
|
|
#include <stdlib.h>
|
|
long labs(<[i]>)
|
|
long <[i]>;
|
|
|
|
DESCRIPTION
|
|
<<labs>> returns
|
|
@tex
|
|
$|x|$,
|
|
@end tex
|
|
the absolute value of <[i]> (also called the magnitude
|
|
of <[i]>). That is, if <[i]> is negative, the result is the opposite
|
|
of <[i]>, but if <[i]> is nonnegative the result is <[i]>.
|
|
|
|
The similar function <<abs>> uses and returns <<int>> rather than
|
|
<<long>> values.
|
|
|
|
RETURNS
|
|
The result is a nonnegative long integer.
|
|
|
|
PORTABILITY
|
|
<<labs>> is ANSI.
|
|
|
|
No supporting OS subroutine calls are required.
|
|
*/
|
|
|
|
#include <stdlib.h>
|
|
|
|
long
|
|
_DEFUN (labs, (x),
|
|
long x)
|
|
{
|
|
if (x < 0)
|
|
{
|
|
x = -x;
|
|
}
|
|
return x;
|
|
}
|