d_imag.c

来自「InsightToolkit-1.4.0(有大量的优化算法程序)」· C语言 代码 · 共 8 行

#include "f2c.h"
#include "netlib.h"

doublereal d_imag(const doublecomplex *z)
{
  return  z->i;
}