示例#1
0
static void math_atan (void)
{
 double d;
 lua_Object o = lua_getparam (1);
 if (o == NULL)
 { lua_error ("too few arguments to function `atan'"); return; }
 if (!lua_isnumber(o))
 { lua_error ("incorrect arguments to function `atan'"); return; }
 d = lua_getnumber(o);
 lua_pushnumber (TODEGREE(atan(d)));
}
示例#2
0
文件: mathlib.c 项目: nrnrnr/noweb3
static void math_atan (void)
{
 double d = lua_check_number(1, "atan");
 lua_pushnumber (TODEGREE(atan(d)));
}
示例#3
0
文件: mathlib.c 项目: nrnrnr/noweb3
static void math_atan2 (void)
{
 double d1 = lua_check_number(1, "atan2");
 double d2 = lua_check_number(2, "atan2");
 lua_pushnumber (TODEGREE(atan2(d1, d2)));
}
示例#4
0
文件: mathlib.c 项目: nrnrnr/noweb3
static void math_acos (void)
{
 double d = lua_check_number(1, "acos");
 lua_pushnumber (TODEGREE(acos(d)));
}