From 287e9adfce378bf1beba3406d09fed0a8b72c433 Mon Sep 17 00:00:00 2001 From: ljo Date: Fri, 11 Nov 1994 12:56:27 +0000 Subject: Add missing z_abs. In BSD tradition this is in libm.a. --- lib/msun/src/w_cabs.c | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'lib/msun') diff --git a/lib/msun/src/w_cabs.c b/lib/msun/src/w_cabs.c index f55a2dd..a62592b 100644 --- a/lib/msun/src/w_cabs.c +++ b/lib/msun/src/w_cabs.c @@ -18,3 +18,10 @@ cabs(z) { return hypot(z.x, z.y); } + +double +z_abs(z) + struct complex *z; +{ + return hypot(z->x, z->y); +} -- cgit v1.1