mirror of https://github.com/mkerrisk/man-pages
catan.3: Add example program
Signed-off-by: Michael Kerrisk <mtk.manpages@gmail.com>
This commit is contained in:
parent
8b57a223ab
commit
c05ed63add
32
man3/catan.3
32
man3/catan.3
|
@ -1,4 +1,5 @@
|
||||||
.\" Copyright 2002 Walter Harms (walter.harms@informatik.uni-oldenburg.de)
|
.\" Copyright 2002 Walter Harms (walter.harms@informatik.uni-oldenburg.de)
|
||||||
|
.\" and Copyright (C) 2011 Michael Kerrisk <mtk.manpages@gamil.com>
|
||||||
.\" Distributed under GPL
|
.\" Distributed under GPL
|
||||||
.\"
|
.\"
|
||||||
.TH CATAN 3 2011-09-15 "" "Linux Programmer's Manual"
|
.TH CATAN 3 2011-09-15 "" "Linux Programmer's Manual"
|
||||||
|
@ -31,6 +32,37 @@ One has:
|
||||||
These functions first appeared in glibc in version 2.1.
|
These functions first appeared in glibc in version 2.1.
|
||||||
.SH "CONFORMING TO"
|
.SH "CONFORMING TO"
|
||||||
C99.
|
C99.
|
||||||
|
.SH EXAMPLE
|
||||||
|
.nf
|
||||||
|
/* Link with "\-lm" */
|
||||||
|
|
||||||
|
#include <complex.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <unistd.h>
|
||||||
|
#include <stdio.h>
|
||||||
|
|
||||||
|
int
|
||||||
|
main(int argc, char *argv[])
|
||||||
|
{
|
||||||
|
double complex z, c, f;
|
||||||
|
double complex i = I;
|
||||||
|
|
||||||
|
if (argc != 3) {
|
||||||
|
fprintf(stderr, "Usage: %s <real> <imag>\\n", argv[0]);
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
}
|
||||||
|
|
||||||
|
z = atof(argv[1]) + atof(argv[2]) * I;
|
||||||
|
|
||||||
|
c = catan(z);
|
||||||
|
printf("catan() = %6.3f %6.3f*i\\n", creal(c), cimag(c));
|
||||||
|
|
||||||
|
f = (clog(1 + i * z) \- clog(1 \- i * z)) / (2 * i);
|
||||||
|
printf("formula = %6.3f %6.3f*i\\n", creal(f2), cimag(f2));
|
||||||
|
|
||||||
|
exit(EXIT_SUCCESS);
|
||||||
|
}
|
||||||
|
.fi
|
||||||
.SH "SEE ALSO"
|
.SH "SEE ALSO"
|
||||||
.BR ccos (3),
|
.BR ccos (3),
|
||||||
.BR clog (3),
|
.BR clog (3),
|
||||||
|
|
Loading…
Reference in New Issue