This website requires JavaScript.
Explore
Help
Sign In
mirror
/
freebsd
Watch
1
Star
0
Fork
0
You've already forked freebsd
mirror of
https://git.FreeBSD.org/src.git
synced
2024-12-23 11:18:54 +00:00
Code
Issues
Releases
Activity
57ab2e0468
freebsd
/
contrib
/
libf2c
/
libF77
/
r_dim.c
8 lines
90 B
C
Raw
Normal View
History
Unescape
Escape
Virgin import of EGCS 1.1.2's libf2c
1999-09-18 10:51:31 +00:00
#
include
"f2c.h"
Gcc 3.3.1-pre 2003-07-11 libf2c bits.
2003-07-11 03:42:19 +00:00
double
r_dim
(
real
*
a
,
real
*
b
)
Virgin import of EGCS 1.1.2's libf2c
1999-09-18 10:51:31 +00:00
{
Gcc 3.3.1-pre 2003-07-11 libf2c bits.
2003-07-11 03:42:19 +00:00
return
(
*
a
>
*
b
?
*
a
-
*
b
:
0
)
;
Virgin import of EGCS 1.1.2's libf2c
1999-09-18 10:51:31 +00:00
}
Reference in New Issue
Copy Permalink