home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / unix / volume10 / complex-lib / cxadd.c < prev    next >
C/C++ Source or Header  |  1987-07-14  |  304b  |  22 lines

  1. /*
  2.     CxAdd -- add one complex to another
  3.  
  4.     last edit:    86/01/04    D A Gwyn
  5.  
  6.     SCCS ID:    @(#)cxadd.c    1.1
  7.  
  8.     CxAdd( &a, &b )    adds  b  to  a  and returns  &a
  9. */
  10.  
  11. #include    <complex.h>
  12.  
  13. complex *
  14. CxAdd( ap, bp )
  15.     register complex    *ap, *bp;    /* may coincide */
  16.     {
  17.     ap->re += bp->re;
  18.     ap->im += bp->im;
  19.  
  20.     return ap;
  21.     }
  22.