Funkcja atan2() w Perl

W języku programowania Perl jest wbudowana funkcja atan2(). Głównym celem funkcji jest to konwersja z kartezjański układ współrzędnych w gwiazdę polarną.

Oto przykład:

▶ Run
#!/usr/bin/perl

print atan2(321, 100);

Ten program wypisze na ekran 1.26879861219712.

Argumenty

my $value = atan2($y, $x);

Argumenty Perl funkcji atan2() — to dwie liczby.

Jeśli funkcje atan2() nie oddać ani jednego argumentu, lub przekazać dokładnie jeden argument, to będzie błąd:

Not enough arguments for atan2 at script.pl line 3, near "atan2()"
Execution of script.pl aborted due to compilation errors.

Funkcja nie korzysta z дефолтную zmienną $_. Jeśli istnieje potrzeba jej użyć, to trzeba ją wyraźnie przekazać do funkcji atan2($_, 1);

Jeśli funkcje atan2() przekazać więcej niż dwa argumenty, to będzie błąd:

Too many arguments for atan2 at script.pl line 3, near "3)"
Execution of script.pl aborted due to compilation errors.

Wartość zwracana

Funkcja atan2() zawsze zwraca liczbę. atan2($y, $x) zwraca arcus tangens z $y/$x. Zakres możliwych wartości — od , do π, tj. od -3.14159265358979 do 3.14159265358979.

Oficjalna dokumentacja

Oto wynik polecenia perldoc -f atan2:

    atan2 Y,X
            Returns the arctangent of Y/X in the range -PI to PI.

            For the tangent operation, you may use the "Math::Trig::tan"
            function, or use the familiar relation:

                sub tan { sin($_[0]) / cos($_[0])  }

            The return value for "atan2(0,0)" is implementation-defined;
            consult your atan2(3) manpage for more information.

            Portability issues: "atan2" in perlport.

Tematy pokrewne

Inne artykuły