diff options
Diffstat (limited to 'contrib/libf2c/libF77/d_imag.c')
-rw-r--r-- | contrib/libf2c/libF77/d_imag.c | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/contrib/libf2c/libF77/d_imag.c b/contrib/libf2c/libF77/d_imag.c index 793a3f9..cc93764 100644 --- a/contrib/libf2c/libF77/d_imag.c +++ b/contrib/libf2c/libF77/d_imag.c @@ -1,10 +1,7 @@ #include "f2c.h" -#ifdef KR_headers -double d_imag(z) doublecomplex *z; -#else -double d_imag(doublecomplex *z) -#endif +double +d_imag (doublecomplex * z) { -return(z->i); + return (z->i); } |