関数 組み込み関数から三角関数-双曲線アーク-セカント-コセカン-コタンジェンを求める
※より実装に近く表示させる為、コードの改行を避けています。スマホ等で閲覧される際は向きを変えてご覧ください。
※実装するバージョンによってはバージョンアップの仕様により動作しないコードもあります。実装には動作確認の上ご使用下さい。
'関数 組み込み関数から三角関数-双曲線アーク-セカント-コセカン-コタンジェンを求める 'HArcsecHArccosecHArccotan Function HArcsec(x) As Double '************************************************************** '双曲線アークセカント Hyperbola-Arc-Secant を求める '************************************************************** '三角関数 Trigonometric Function '返値はラジアン HArcsec = Log((Sqr(-x * x + 1) + 1) / x) End Function Function HArccosec(x) As Double '************************************************************** '双曲線アークコセカント Hyperbola-Arc-Cosecant を求める '************************************************************** '三角関数 Trigonometric Function '返値はラジアン HArccosec = Log((Sgn(x) * Sqr(x * x + 1) + 1) / x) End Function Function HArccotan(x) As Double '************************************************************** '双曲線アークコタンジェント Hyperbola-Arc-Cotangent を求める '************************************************************** '三角関数 Trigonometric Function '返値はラジアン HArccotan = Log((x + 1) / (x - 1)) / 2 End Function |
