110454Sdlw /* 2*22847Skre * Copyright (c) 1980 Regents of the University of California. 3*22847Skre * All rights reserved. The Berkeley software License Agreement 4*22847Skre * specifies the terms and conditions for redistribution. 5*22847Skre * 6*22847Skre * @(#)d_cnjg.c 5.1 06/07/85 710454Sdlw */ 810454Sdlw 910454Sdlw #include "complex" 1010454Sdlw 1110454Sdlw d_cnjg(r, z) 1210454Sdlw dcomplex *r, *z; 1310454Sdlw { 1410454Sdlw r->dreal = z->dreal; 1510454Sdlw r->dimag = - z->dimag; 1610454Sdlw } 17