d_cnjg X
1: #include "complex" 2: 3: d_cnjg(r, z) 4: dcomplex *r, *z; 5: { 6: r->dreal = z->dreal; 7: r->dimag = - z->dimag; 8: }