aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/ffhom.spad.pamphlet
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-02-17 10:22:47 +0000
committerdos-reis <gdr@axiomatics.org>2010-02-17 10:22:47 +0000
commit6506b2a44b3a06a1885ae394215c512898ffeef4 (patch)
treef9b91d2beba118efe322de956ecd3b871e922f91 /src/algebra/ffhom.spad.pamphlet
parente5fb9d979a16047d62bbe954ee08577088cdb497 (diff)
downloadopen-axiom-6506b2a44b3a06a1885ae394215c512898ffeef4.tar.gz
* algebra/aggcat.spad.pamphlet: Remove unnecessary call to void.
* algebra/algext.spad.pamphlet: Likewise. * algebra/catdef.spad.pamphlet: Likewise. * algebra/curve.spad.pamphlet: Likewise. * algebra/d01agents.spad.pamphlet: Likewise. * algebra/d02agents.spad.pamphlet: Likewise. * algebra/ffcg.spad.pamphlet: Likewise. * algebra/ffhom.spad.pamphlet: Likewise. * algebra/ffnb.spad.pamphlet: Likewise. * algebra/ffp.spad.pamphlet: Likewise. * algebra/formula.spad.pamphlet: Likewise. * algebra/fortmac.spad.pamphlet: Likewise. * algebra/fortpak.spad.pamphlet: Likewise. * algebra/fortran.spad.pamphlet: Likewise. * algebra/forttyp.spad.pamphlet: Likewise. * algebra/generic.spad.pamphlet: Likewise. * algebra/kl.spad.pamphlet: Likewise. * algebra/mathml.spad.pamphlet: Likewise. * algebra/newdata.spad.pamphlet: Likewise. * algebra/out.spad.pamphlet: Likewise. * algebra/permgrps.spad.pamphlet: Likewise. * algebra/pfo.spad.pamphlet: Likewise. * algebra/regset.spad.pamphlet: Likewise. * algebra/routines.spad.pamphlet: Likewise. * algebra/setorder.spad.pamphlet: Likewise. * algebra/sups.spad.pamphlet: Likewise. * algebra/symbol.spad.pamphlet: Likewise. * algebra/tex.spad.pamphlet: Likewise.
Diffstat (limited to 'src/algebra/ffhom.spad.pamphlet')
-rw-r--r--src/algebra/ffhom.spad.pamphlet7
1 files changed, 3 insertions, 4 deletions
diff --git a/src/algebra/ffhom.spad.pamphlet b/src/algebra/ffhom.spad.pamphlet
index 8006e13e..5f0f6112 100644
--- a/src/algebra/ffhom.spad.pamphlet
+++ b/src/algebra/ffhom.spad.pamphlet
@@ -182,7 +182,7 @@ FiniteFieldHomomorphisms(F1,GF,F2): Exports == Implementation where
conMat2to1:=copy(inverse(mat)$M :: M)
--we finish the function for one case, hence reset initialization flag
init? := false
- void()$Void
+
-- print("'normal' <=> 'polynomial' matrices initialized"::OUT)
-- in the other case we have to change the matrices
-- repType2 = "normal" and repType1 = "polynomial"
@@ -191,7 +191,7 @@ FiniteFieldHomomorphisms(F1,GF,F2): Exports == Implementation where
-- print("'normal' <=> 'polynomial' matrices initialized"::OUT)
--we finish the function for one case, hence reset initialization flag
init? := false
- void()$Void
+
-- 2) in the case of different def. polynomials we have to order the
-- fields to get the same isomorphism, if the package is called with
-- the fields F1 and F2 swapped.
@@ -306,7 +306,7 @@ FiniteFieldHomomorphisms(F1,GF,F2): Exports == Implementation where
-- print("conversion matrices initialized"::OUT)
--we finish the function for one case, hence reset initialization flag
init? := false
- void()$Void
+
conMat1to2 :=matbs
conMat2to1 :=matsb
-- print(conMat1to2::OUT)
@@ -314,7 +314,6 @@ FiniteFieldHomomorphisms(F1,GF,F2): Exports == Implementation where
-- print("conversion matrices initialized"::OUT)
--we finish the function for one case, hence reset initialization flag
init? := false
- void()$Void
coerce(x:F1) ==