Calcula o valor do ângulo, em radianos, de um valor que representa o seno e de um valor que representa o cosseno.
Sintaxe
Atn2( < nSin >, < nCos > )
Parâmetros
Nome | Tipo | Descrição | Obrigatório | Referência |
|---|---|---|---|---|
nSin | numérico | Indica o valor que representa o seno de um ângulo. | X |
|
nCos | numérico | Indica o valor que representa o cosseno de um ângulo. | X |
|
Retorno
Nome | Tipo | Descrição |
|---|---|---|
nRet | numérico | Retorna um valor entre 0 e PI radianos. |
Observações
- Os resultados "-0" são retornados devido à precisão de retorno das funções trigonométricas trabalhando em cima de PI com 8 casas decimais. Caso o resultado da função seja um valor negativo muito próximo de zero, porém algo menor que 0.00000001, a função retornará "-0", e a comparação com 0 irá retornar .T..
Exemplos
Exemplo 1
#DEFINE CRLF Chr(13)+Chr(10) #DEFINE PI 3.14159265 //ACos(-1) user function atn2() Local cMensagem := "" //+----------------------------------------------------------------------------+ //|Exemplifica o uso da função Atn2 | //+----------------------------------------------------------------------------+ cMensagem += "Atn2(Sin(-PI), Cos(-PI)) = " + cValToChar(Atn2(Sin(-PI), Cos(-PI))) + CRLF cMensagem += "Atn2(Sin(-PI/2), Cos(-PI/2)) = " + cValToChar(Atn2(Sin(-PI/2), Cos(-PI/2))) + CRLF cMensagem += "Atn2(Sin(0), Cos(0)) = " + cValToChar(Atn2(Sin(0), Cos(0))) + CRLF cMensagem += "Atn2(Sin(PI/2), Cos(PI/2)) = " + cValToChar(Atn2(Sin(PI/2), Cos(PI/2))) + CRLF cMensagem += "Atn2(Sin(PI), Cos(PI)) = " + cValToChar(Atn2(Sin(PI), Cos(PI))) + CRLF //+----------------------------------------------------------------------------+ //|Apresenta uma mensagem com os resultados obtidos | //+----------------------------------------------------------------------------+ Return MsgInfo(cMensagem, "Atn2 - Exemplo")
Resultado do Exemplo
Abrangência
Microsiga Protheus 8.11, Protheus 10, Protheus 11
Veja também
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas