This website requires JavaScript.
Explore
Help
Sign In
d0p1
/
ack
Watch
1
Star
0
Fork
You've already forked ack
0
Code
Issues
Pull requests
Packages
Projects
Releases
Wiki
Activity
abf9c71fa9
ack
/
lang
/
basic
/
lib
/
sgn.c
10 lines
93 B
C
Raw
Normal View
History
Unescape
Escape
Now using correct RCS identification
1985-01-21 12:47:04 +00:00
/* $Header$ */
*** empty log message ***
1984-11-29 14:22:02 +00:00
_sgn
(
v
)
double
v
;
{
if
(
v
>
0
)
return
(
1
)
;
if
(
v
<
0
)
return
(
-
1
)
;
return
(
0
)
;
}
Reference in a new issue
Copy permalink