9.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

См. также:

Обратная функция: TAN Функция градусов: COTAND