2014-02-11 11:26:28 +01:00
|
|
|
#define _USE_MATH_DEFINES
|
|
|
|
|
|
|
|
//
|
|
|
|
void pi(void)
|
|
|
|
{
|
2017-04-17 23:10:53 +02:00
|
|
|
//TODO
|
|
|
|
//putf(M_PI);
|
2014-02-11 11:26:28 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void d2r(void)
|
|
|
|
{
|
2017-04-17 23:10:53 +02:00
|
|
|
//TODO
|
|
|
|
//MIN_ARGUMENTS(1);
|
|
|
|
//ARG_MUST_BE_OF_TYPE(0, cmd_number);
|
|
|
|
//((number*)_stack->get_obj(0))->_value *= M_PI / 360;
|
2014-02-11 11:26:28 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void r2d(void)
|
|
|
|
{
|
2017-04-17 23:10:53 +02:00
|
|
|
//TODO
|
|
|
|
//MIN_ARGUMENTS(1);
|
|
|
|
//ARG_MUST_BE_OF_TYPE(0, cmd_number);
|
|
|
|
//((number*)_stack->get_obj(0))->_value *= 360 / M_PI;
|
2014-02-11 11:26:28 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void rpn_sin(void)
|
|
|
|
{
|
2017-04-17 23:10:53 +02:00
|
|
|
//TODO
|
|
|
|
//MIN_ARGUMENTS(1);
|
|
|
|
//ARG_MUST_BE_OF_TYPE(0, cmd_number);
|
|
|
|
//((number*)_stack->get_obj(0))->_value = sin(((number*)_stack->get_obj(0))->_value);
|
2014-02-11 11:26:28 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void rpn_asin(void)
|
|
|
|
{
|
2017-04-17 23:10:53 +02:00
|
|
|
//TODO
|
|
|
|
//MIN_ARGUMENTS(1);
|
|
|
|
//ARG_MUST_BE_OF_TYPE(0, cmd_number);
|
|
|
|
//((number*)_stack->get_obj(0))->_value = asin(((number*)_stack->get_obj(0))->_value);
|
2014-02-11 11:26:28 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void rpn_cos(void)
|
|
|
|
{
|
2017-04-17 23:10:53 +02:00
|
|
|
//TODO
|
|
|
|
//MIN_ARGUMENTS(1);
|
|
|
|
//ARG_MUST_BE_OF_TYPE(0, cmd_number);
|
|
|
|
//((number*)_stack->get_obj(0))->_value = cos(((number*)_stack->get_obj(0))->_value);
|
2014-02-11 11:26:28 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void rpn_acos(void)
|
|
|
|
{
|
2017-04-17 23:10:53 +02:00
|
|
|
//TODO
|
|
|
|
//MIN_ARGUMENTS(1);
|
|
|
|
//ARG_MUST_BE_OF_TYPE(0, cmd_number);
|
|
|
|
//((number*)_stack->get_obj(0))->_value = acos(((number*)_stack->get_obj(0))->_value);
|
2014-02-11 11:26:28 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void rpn_tan(void)
|
|
|
|
{
|
2017-04-17 23:10:53 +02:00
|
|
|
//TODO
|
|
|
|
//MIN_ARGUMENTS(1);
|
|
|
|
//ARG_MUST_BE_OF_TYPE(0, cmd_number);
|
|
|
|
//((number*)_stack->get_obj(0))->_value = tan(((number*)_stack->get_obj(0))->_value);
|
2014-02-11 11:26:28 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void rpn_atan(void)
|
|
|
|
{
|
2017-04-17 23:10:53 +02:00
|
|
|
//TODO
|
|
|
|
//MIN_ARGUMENTS(1);
|
|
|
|
//ARG_MUST_BE_OF_TYPE(0, cmd_number);
|
|
|
|
//((number*)_stack->get_obj(0))->_value = atan(((number*)_stack->get_obj(0))->_value);
|
2014-02-11 11:26:28 +01:00
|
|
|
}
|