Special Evaluation Rules
Description
Examples
Most Maple procedures have what are known as "standard evaluation rules." These rules govern the way in which arguments passed to a procedure are evaluated before being bound to the formal parameters of the procedure.
Standard evaluation rules mean that arguments are evaluated in an unspecified order, in the scope of the caller, before parameter binding occurs. Both last name evaluation and one level evaluation of locals apply to the evaluation of the argument expressions. Thus, procedures called at the top level are passed their arguments after they have been fully evaluated, while those called within other procedures are passed their arguments after they have been evaluated one level.
Some Maple procedures have so-called "special evaluation rules." This means that the arguments are not evaluated according to the standard evaluation rules. Instead, some arguments may not be (fully) evaluated, a specific evaluation order may be prescribed, or a non-standard evaluator may be used to evaluate one or more arguments.
Most procedures that have special evaluation rules are builtin. It is possible, however, for a user to write a procedure with special evaluation rules by using an argument declared to be of one of the types uneval and evaln. This can only be done for a fixed number of named arguments. (There is no way to write a procedure that takes an arbitrary number of unevaluated arguments.) It is not possible to alter the order in which the arguments to a procedure are evaluated. (Often, however, this effect can be achieved by suppressing the evaluation of the arguments, and then evaluating the parameters explicitly within the body of the procedure in the desired order.)
The following builtin user procedures have special evaluation rules.
add
ASSERT
assigned
eval
evalf
evalhf
evaln
if
mul
seq
time
timelimit
traperror
userinfo
Writing procedures with special evaluation rules is generally to be avoided unless absolutely necessary for correct operation.
The following procedure p has its arguments fully evaluated at the top level, but evaluated to only one level when called within the (anonymous) procedure shown.
p := proc( x ) print( x ); end proc;
p ≔ procxprint⁡xend proc
a≔b
b≔2
p⁡a
2
proc() local a, b; a := b; b := 2; p(a); end proc();
b
Modifying the formal parameter x of p changes it so that it has special evaluation rules.
p := proc( x::uneval ) print( x ); end proc;
p ≔ procx::unevalprint⁡xend proc
a
The procedure evalf has special evaluation rules because it ensures that its second argument (if provided) is evaluated before its first argument.
evalf( proc() print( FIRST ); Pi end(), proc() print( SECOND ); 15 end() );
SECOND
FIRST
3.14159265358979
The procedure assigned uses a non-standard evaluator (evaln) when it evaluates its argument.
assigned⁡H2
false
evaln⁡cat⁡H,2
H2
assigned⁡cat⁡H,2
evaln⁡H‖2
assigned⁡H‖2
H2≔sin:
true
You can control the order of argument evaluation by suppressing it entirely and making the evaluations explicit in the desired order.
p := proc( a::uneval, b::uneval ) local ea, eb; eb := eval( b ); # evaluate second ea := eval( a ); # evaluate first [ ea, eb ] end proc:
p( proc() print(FIRST); 2 end(), proc() print(SECOND); 3 end() );
2,3
See Also
builtin
Eval
evala
evalb
evalc
evalm(deprecated)
evalr
last_name_eval
map
map2
procedure
trace
try
uneval
value
zip
Download Help Document