1*10454Sdlw /* 2*10454Sdlw * "@(#)d_cnjg.c 1.1" 3*10454Sdlw */ 4*10454Sdlw 5*10454Sdlw #include "complex" 6*10454Sdlw 7*10454Sdlw d_cnjg(r, z) 8*10454Sdlw dcomplex *r, *z; 9*10454Sdlw { 10*10454Sdlw r->dreal = z->dreal; 11*10454Sdlw r->dimag = - z->dimag; 12*10454Sdlw } 13