aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/algfunc.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/algfunc.spad.pamphlet')
-rw-r--r--src/algebra/algfunc.spad.pamphlet6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/algebra/algfunc.spad.pamphlet b/src/algebra/algfunc.spad.pamphlet
index 30cbb285..9d70445d 100644
--- a/src/algebra/algfunc.spad.pamphlet
+++ b/src/algebra/algfunc.spad.pamphlet
@@ -307,9 +307,6 @@ AlgebraicFunction(R, F): Exports == Implementation where
P ==> SparseMultivariatePolynomial(R, K)
UP ==> SparseUnivariatePolynomial F
UPR ==> SparseUnivariatePolynomial R
- ALGOP ==> "%alg"
- SPECIALDISP ==> "%specialDisp"
- SPECIALDIFF ==> "%specialDiff"
Exports ==> with
rootOf : (UP, SE) -> F
@@ -343,6 +340,9 @@ AlgebraicFunction(R, F): Exports == Implementation where
-- un-export when the compiler accepts conditional local functions!
Implementation ==> add
+ macro ALGOP == '%alg
+ macro SPECIALDISP == '%specialDisp
+ macro SPECIALDIFF == '%specialDiff
ialg : List F -> F
dvalg: (List F, SE) -> F
dalg : List F -> OutputForm