/usr/share/axiom-20170501/src/algebra/EVALAB.spad is in axiom-source 20170501-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 | )abbrev category EVALAB Evalable
++ Date Last Updated: June 3, 1991
++ Description:
++ This category provides \spadfun{eval} operations.
++ A domain may belong to this category if it is possible to make
++ ``evaluation'' substitutions.
Evalable(R) : Category == SIG where
R : SetCategory
SIG ==> InnerEvalable(R,R) with
eval : ($, Equation R) -> $
++ eval(f,x = v) replaces x by v in f.
eval : ($, List Equation R) -> $
++ eval(f, [x1 = v1,...,xn = vn]) replaces xi by vi in f.
add
eval(f:$, eq:Equation R) == eval(f, [eq])
eval(f:$, xs:List R,vs:List R) == eval(f,[x=v for x in xs for v in vs])
|