Chức năng atan2() trong Perl

Perl ngôn ngữ đã được tích hợp trong chức năng atan2(). Chính mục đích của các chức năng là sự chuyển đổi từ Descartes đến cực.

Đây là một ví dụ:

▶ Run
#!/usr/bin/perl

print atan2(321, 100);

Này, chương trình hiển thị 1.26879861219712.

Lập luận

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

Lập luận để Perl chức năng atan2() — hai số.

Nếu các chức năng atan2() không vượt qua bất kỳ cuộc tranh luận, hoặc vượt qua chính xác một cuộc tranh luận, nó sẽ lỗi:

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

Các chức năng sử dụng định biến $_. Nếu đó là một sự cần thiết để sử dụng nó, sau đó nó phải được rõ ràng được truyền cho các chức năng atan2($_, 1);

Nếu các chức năng atan2() có thể vượt qua nhiều hơn hai lập luận, nó sẽ lỗi:

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

Trở lại giá trị

Chức năng atan2() luôn luôn trở về một con số. atan2($y, $x) trả về arctangent từ $y/$x. Phạm vi giá trị có thể là , để π, tức là từ -3.14159265358979 để 3.14159265358979.

Tài liệu chính thức

Đây là kết quả của sự chỉ huy 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.

Chủ đề liên quan

Các bài viết khác