aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/asp.spad.pamphlet
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-11-21 04:54:55 +0000
committerdos-reis <gdr@axiomatics.org>2008-11-21 04:54:55 +0000
commit49727ef97a25730307fdb9622be726e92a41a875 (patch)
tree5c6fbb86ff4e49c7ed0d510e76f42d7352005c88 /src/algebra/asp.spad.pamphlet
parent0b97ae7365e5ba3d3e078147124e096f7cccde4b (diff)
downloadopen-axiom-49727ef97a25730307fdb9622be726e92a41a875.tar.gz
* algebra/alql.spad.pamphlet (Database): Now CoercibleFrom List S.
* algebra/asp.spad.pamphlet (Asp20): Now CoercibleFrom MAT FEXPR. (Asp6): Now CoercibleFrom Vector FEXPR. * algebra/catdef.spad.pamphlet (Algebra): Extend CoercibleFrom R. (Ring): Extend CoercibleFrom Integer. * algebra/formula.spad.pamphlet (ScriptFormulaFormat): Now CoercibleFrom E. * algebra/fortran.spad.pamphlet (FortranCode): Remove redundant signature. * algebra/fs2ups.spad.pamphlet (FunctionSpaceToUnivariatePowerSeries): Tidy parameter. * algebra/laurent.spad.pamphlet (UnivariateLaurentSeriesConstructorCategory): Extend CoercibleFrom UTS. * algebra/manip.spad.pamphlet (PolynomialRoots): Tidy parameter. * algebra/modmon.spad.pamphlet (ModMonic): Now CoercibleFrom Rep. * algebra/ore.spad.pamphlet (UnivariateSkewPolynomial): Now CoercibleFrom Variable x.
Diffstat (limited to 'src/algebra/asp.spad.pamphlet')
-rw-r--r--src/algebra/asp.spad.pamphlet14
1 files changed, 3 insertions, 11 deletions
diff --git a/src/algebra/asp.spad.pamphlet b/src/algebra/asp.spad.pamphlet
index b83fcbf5..e5f2b900 100644
--- a/src/algebra/asp.spad.pamphlet
+++ b/src/algebra/asp.spad.pamphlet
@@ -654,12 +654,8 @@ Asp20(name): Exports == Implementation where
MAT EXPR FLOAT, FEXPR,VEC FEXPR,VEC FEXPR,MAT FEXPR)
- Exports ==> FortranMatrixFunctionCategory with
- coerce: MAT FEXPR -> $
- ++coerce(f) takes objects from the appropriate instantiation of
- ++\spadtype{FortranExpression} and turns them into an ASP.
-
- Implementation ==> add
+ Exports == Join(FortranMatrixFunctionCategory, CoercibleFrom MAT FEXPR)
+ Implementation == add
real : UFST := ["real"::FST]$UFST
syms : SYMTAB := empty()
@@ -2986,11 +2982,7 @@ Asp6(name): Exports == Implementation where
VEC ==> Vector
VF2 ==> VectorFunctions2
- Exports == FortranVectorFunctionCategory with
- coerce: Vector FEXPR -> %
- ++coerce(f) takes objects from the appropriate instantiation of
- ++\spadtype{FortranExpression} and turns them into an ASP.
-
+ Exports == Join(FortranVectorFunctionCategory, CoercibleFrom Vector FEXPR)
Implementation == add
real : UFST := ["real"::FST]$UFST