summaryrefslogblamecommitdiff
path: root/src/complex/cimag.c
blob: 5e1ad46b3b2f4a2320e9ffa1eadfd54d64ea1027 (plain) (tree)
1
2
3
4
5
6
7






                                
#include "libm.h"

double (cimag)(double complex z)
{
	union dcomplex u = {z};
	return u.a[1];
}