1: /* 2: * Copyright (c) 1980 Regents of the University of California. 3: * All rights reserved. The Berkeley software License Agreement 4: * specifies the terms and conditions for redistribution. 5: * 6: * @(#)d_cnjg.c 5.1 6/7/85 7: */ 8: 9: #include "complex" 10: 11: d_cnjg(r, z) 12: dcomplex *r, *z; 13: { 14: r->dreal = z->dreal; 15: r->dimag = - z->dimag; 16: }