53 lines
1.5 KiB
C
Executable File
53 lines
1.5 KiB
C
Executable File
/*
|
|
* math_protocol.h - def_generics for the generic function in the Math protocol
|
|
*
|
|
* see def_abstract_generics.h for more info.
|
|
*
|
|
*
|
|
* Copyright © John Wainwright 1996
|
|
*
|
|
*/
|
|
|
|
def_generic(plus, "+");
|
|
def_generic(minus, "-");
|
|
def_generic(times, "*");
|
|
def_generic(div, "/");
|
|
def_generic(pwr, "^");
|
|
def_generic(uminus, "u-");
|
|
|
|
use_generic(eq, "=");
|
|
use_generic(ne, "!=");
|
|
def_generic(gt, ">");
|
|
def_generic(lt, "<");
|
|
def_generic(ge, ">=");
|
|
def_generic(le, "<=");
|
|
|
|
def_visible_generic ( random, "random");
|
|
def_visible_generic ( abs, "abs");
|
|
|
|
/* scripter-visible math primitives - implemented as prims since they are type-specific */
|
|
|
|
def_visible_primitive( include, "include");
|
|
|
|
def_visible_primitive( acos, "acos");
|
|
def_visible_primitive( asin, "asin");
|
|
def_visible_primitive( atan, "atan");
|
|
def_visible_primitive( ceil, "ceil");
|
|
def_visible_primitive( cos, "cos");
|
|
def_visible_primitive( cosh, "cosh");
|
|
def_visible_generic ( exp, "exp"); // exp is polymorphic (floats & quats)
|
|
def_visible_primitive( floor, "floor");
|
|
def_visible_primitive( log, "log");
|
|
def_visible_primitive( log10, "log10");
|
|
def_visible_primitive( sin, "sin");
|
|
def_visible_primitive( sinh, "sinh");
|
|
def_visible_primitive( sqrt, "sqrt");
|
|
def_visible_primitive( tan, "tan");
|
|
def_visible_primitive( tanh, "tanh");
|
|
|
|
def_visible_primitive( atan2, "atan2");
|
|
def_visible_primitive( fmod, "mod");
|
|
def_visible_primitive( pow, "pow");
|
|
|
|
def_visible_primitive( seed, "seed");
|