LAPACK  3.6.0
LAPACK: Linear Algebra PACKage

§ lapack_complex_double_real

#define lapack_complex_double_real (   z)    (creal(z))