File tree Expand file tree Collapse file tree 2 files changed +7
-12
lines changed Expand file tree Collapse file tree 2 files changed +7
-12
lines changed Original file line number Diff line number Diff line change 44
44
#
45
45
# ###############################################################################
46
46
47
- # This destroy's the input. If you don't want this, use A(::ZZMatrix)
48
-
49
- function FinGenAbGroupElem (A:: FinGenAbGroup , a:: ZZMatrix )
50
- assure_reduced! (A, a)
51
- z = FinGenAbGroupElem ()
52
- z. parent = A
53
- z. coeff = a
54
- return z
55
- end
56
-
57
47
function reduce_mod_snf! (a:: ZZMatrix , v:: Vector{ZZRingElem} )
58
48
GC. @preserve a begin
59
49
for i = 1 : length (v)
Original file line number Diff line number Diff line change @@ -1828,11 +1828,16 @@ abstract type GrpAbElem <: AbstractAlgebra.AdditiveGroupElem end
1828
1828
1829
1829
end
1830
1830
1831
- mutable struct FinGenAbGroupElem <: GrpAbElem
1831
+ struct FinGenAbGroupElem <: GrpAbElem
1832
1832
parent:: FinGenAbGroup
1833
1833
coeff:: ZZMatrix
1834
1834
1835
- FinGenAbGroupElem () = new ()
1835
+ # This destroy's the input. If you don't want this, use A(::ZZMatrix)
1836
+ function FinGenAbGroupElem (A:: FinGenAbGroup , a:: ZZMatrix )
1837
+ assure_reduced! (A, a)
1838
+ return new (A, a)
1839
+ end
1840
+
1836
1841
end
1837
1842
1838
1843
# ###############################################################################
You can’t perform that action at this time.
0 commit comments