1
2
3
4
5
6
7
8
9
10
11
|
%% Fixes for c-code generation
%% Set PI explicitly here to avoid later conflict with cc headers
LET PI = 3.1415$
ON ROUNDED$ % No integer output
%% Changes x^y to pow(x,y)
OPERATOR pow$
FOR ALL x,y LET x^y = pow(x,y)$ % Use the pow function
|
>
|
|
1
2
3
4
5
6
7
8
9
10
11
12
|
%% Fixes for c-code generation
%% Set PI explicitly here to avoid later conflict with cc headers
%% if PI is not already a number (i.e. on rounded has not been set)
IF NOT NUMBERP (pi) THEN LET PI = 3.14159$
ON ROUNDED$ % No integer output
%% Changes x^y to pow(x,y)
OPERATOR pow$
FOR ALL x,y LET x^y = pow(x,y)$ % Use the pow function
|