/* $NetBSD: cabs.c,v 1.1 2007/08/20 16:01:30 drochner Exp $ */ /* * Written by Matthias Drochner <drochner@NetBSD.org>. * Public domain. */ #include "../src/namespace.h" #include <complex.h> #include <math.h> double cabs(double complex z) { return hypot(__real__ z, __imag__ z); }