8.76 COTAN — Функция котангенса

Описание:

COTAN(X) вычисляет котангенс X. Эквивалентно COS(x) делённому на SIN(x), или 1 / TAN(x).

Эта функция предназначена только для совместимости и следует избегать её использования в пользу стандартных конструкций, когда это возможно.

Стандарт:

Расширение GNU, включено с -fdec-math.

Класс:

Элементарная функция

Синтаксис:

RESULT = COTAN(X)

Аргументы:

`X`	Тип должен быть `REAL` или `COMPLEX`.

Возвращаемое значение:

Возвращаемое значение имеет тот же тип и вид, что и X, и его значение выражено в радианах.

Пример:

program test_cotan
  real(8) :: x = 0.165_8
  x = cotan(x)
end program test_cotan

Специфические имена:

Имя	Аргумент	Тип возвращаемого значения	Стандарт
`COTAN(X)`	`REAL(4) X`	`REAL(4)`	Расширение GNU
`DCOTAN(X)`	`REAL(8) X`	`REAL(8)`	Расширение GNU

См. также:

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-13.3.0/gfortran/COTAN.html