Index: mttroot/mtt/lib/reduce/fix_c.r ================================================================== --- mttroot/mtt/lib/reduce/fix_c.r +++ mttroot/mtt/lib/reduce/fix_c.r @@ -1,9 +1,10 @@ %% Fixes for c-code generation %% Set PI explicitly here to avoid later conflict with cc headers -LET PI = 3.1415$ +%% 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$