OSDN Git Service
(root)
/
pf3gnuchains
/
gcc-fork.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
3fc4d7c0a6a76e91a12270e2c07868c48e0234ca
[pf3gnuchains/gcc-fork.git]
/
libf2c
/
libF77
/
c_abs.c
1
#include "f2c.h"
2
3
extern double f__cabs (double, double);
4
5
double
6
c_abs (complex * z)
7
{
8
return (f__cabs (z->r, z->i));
9
}