release/man3/catanh.3

   1 .\" Copyright 2002 Walter Harms (walter.harms@informatik.uni-oldenburg.de)
   2 .\" and Copyright (C) 2011 Michael Kerrisk <mtk.manpages@gamil.com>
   3 .\" Distributed under GPL
   4 .\"
   5 .\" Japanese Version Copyright (c) 2003  Akihiro MOTOKI
   6 .\"         all rights reserved.
   7 .\" Translated Thu Jul 24 00:43:35 JST 2003
   8 .\"         by Akihiro MOTOKI <amotoki@dd.iij4u.or.jp>
   9 .\"
  10 .\"WORD:        hyperbolic      ÁÐ¶Ê(Àþ¤Î)
  11 .\"WORD:        arc sine        µÕÀµ¸¹
  12 .\"WORD:        arc cosine      µÕÍ¾¸¹
  13 .\"WORD:        arc tangent     µÕÀµÀÜ
  14 .\"WORD:        real part       ¼ÂÉô
  15 .\"WORD:        imaginary part  µõÉô
  16 .\"
  17 .TH CATANH 3 2011-09-15 "" "Linux Programmer's Manual"
  18 .SH Ì¾Á°
  19 catanh, catanhf, catanhl \- Ê£ÁÇ¿ô¤ÎµÕÁÐ¶ÊÀþÀµÀÜ (arc tangents hyperbolic)
  20 .SH ½ñ¼°
  21 .B #include <complex.h>
  22 .sp
  23 .BI "double complex catanh(double complex " z );
  24 .br
  25 .BI "float complex catanhf(float complex " z );
  26 .br
  27 .BI "long double complex catanhl(long double complex " z );
  28 .sp
  29 \fI\-lm\fP ¤Ç¥ê¥ó¥¯¤¹¤ë¡£
  30 .SH ÀâÌÀ
  31 .BR catanh ()
  32 ´Ø¿ô¤ÏÊ£ÁÇ¿ô
  33 .I z
  34 ¤ÎµÕÁÐ¶ÊÀþÀµ¸¹ (arc hyperbolic tangent) ¤ò·×»»¤¹¤ë¡£
  35 \fIy = catanh(z)\fP ¤Ê¤é¤Ð¡¢ \fIz = ctanh(y)\fP ¤¬À®Î©¤¹¤ë¡£
  36 .I y
  37 ¤ÎµõÉô¤ÎÃÍ¤Ï¶è´Ö [\-pi/2,pi/2] ¤«¤éÁªÂò¤µ¤ì¤ë¡£
  38 .LP
  39 ¼¡¤Î´Ø·¸¤¬À®Î©¤¹¤ë:
  40 .nf
  41
  42     catanh(z) = 0.5 * (clog(1 + z) \- clog(1 \- z))
  43 .fi
  44 .SH ¥Ð¡¼¥¸¥ç¥ó
  45 ¤³¤ì¤é¤Î´Ø¿ô¤Ï glibc ¥Ð¡¼¥¸¥ç¥ó 2.1 ¤Ç½é¤á¤ÆÅÐ¾ì¤·¤¿¡£
  46 .SH ½àµò
  47 C99.
  48 .SH Îã
  49 .nf
  50 /* Link with "\-lm" */
  51
  52 #include <complex.h>
  53 #include <stdlib.h>
  54 #include <unistd.h>
  55 #include <stdio.h>
  56
  57 int
  58 main(int argc, char *argv[])
  59 {
  60     double complex z, c, f;
  61
  62     if (argc != 3) {
  63         fprintf(stderr, "Usage: %s <real> <imag>\\n", argv[0]);
  64         exit(EXIT_FAILURE);
  65     }
  66
  67     z = atof(argv[1]) + atof(argv[2]) * I;
  68
  69     c = catanh(z);
  70     printf("catanh() = %6.3f %6.3f*i\\n", creal(c), cimag(c));
  71
  72     f = 0.5 * (clog(1 + z) \- clog(1 \- z));
  73     printf("formula  = %6.3f %6.3f*i\\n", creal(f2), cimag(f2));
  74
  75     exit(EXIT_SUCCESS);
  76 }
  77 .fi
  78 .SH ´ØÏ¢¹àÌÜ
  79 .BR atanh (3),
  80 .BR cabs (3),
  81 .BR cimag (3),
  82 .BR ctanh (3),
  83 .BR complex (7)