mirror of https://github.com/mkerrisk/man-pages
catanh.3: Add example program
Signed-off-by: Michael Kerrisk <mtk.manpages@gmail.com>
This commit is contained in:
parent
c05ed63add
commit
849ef4a8ed
|
@ -1,4 +1,5 @@
|
|||
.\" Copyright 2002 Walter Harms (walter.harms@informatik.uni-oldenburg.de)
|
||||
.\" and Copyright (C) 2011 Michael Kerrisk <mtk.manpages@gamil.com>
|
||||
.\" Distributed under GPL
|
||||
.\"
|
||||
.TH CATANH 3 2011-09-15 "" "Linux Programmer's Manual"
|
||||
|
@ -33,6 +34,36 @@ One has:
|
|||
These functions first appeared in glibc in version 2.1.
|
||||
.SH "CONFORMING TO"
|
||||
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;
|
||||
|
||||
if (argc != 3) {
|
||||
fprintf(stderr, "Usage: %s <real> <imag>\\n", argv[0]);
|
||||
exit(EXIT_FAILURE);
|
||||
}
|
||||
|
||||
z = atof(argv[1]) + atof(argv[2]) * I;
|
||||
|
||||
c = catanh(z);
|
||||
printf("catanh() = %6.3f %6.3f*i\\n", creal(c), cimag(c));
|
||||
|
||||
f = 0.5 * (clog(1 + z) \- clog(1 \- z));
|
||||
printf("formula = %6.3f %6.3f*i\\n", creal(f2), cimag(f2));
|
||||
|
||||
exit(EXIT_SUCCESS);
|
||||
}
|
||||
.fi
|
||||
.SH "SEE ALSO"
|
||||
.BR atanh (3),
|
||||
.BR cabs (3),
|
||||
|
|
Loading…
Reference in New Issue