Routines which perform only mathematical calculations can be optimized in Darwin by using the option numeric command. Like all option commands, this must be placed inside of a procedure directly after any global and local variable declarations and preceding a description command.
Sum := proc( val )
local total;
option numeric;
total := 0;
for i from 1 to val do
total:=total+i;
od;
return(total);
od;