|
|
1.1 root 1: #include "complex"
2:
3: r_cnjg(r, z)
4: complex *r, *z;
5: {
6: r->real = z->real;
7: r->imag = - z->imag;
8: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.