diff --git a/lib/codecr.gi b/lib/codecr.gi index 9add944..d2bf331 100644 --- a/lib/codecr.gi +++ b/lib/codecr.gi @@ -42,7 +42,7 @@ CalculateLinearCodeCoveringRadius := function( code ) #return Maximum( List( SyndromeTable( code ), i -> Weight( i[ 1 ] ) ) ); # (old version had line above in place of next 5) H:=CheckMat(code); - CLs:=CosetLeadersMatFFE(H,LeftActingDomain(code)); + CLs:=List(Set(CosetLeadersMatFFE(H,LeftActingDomain(code)))); wts:=List([1..Length(CLs)],i->WeightVecFFE(CLs[i])); rho:=Maximum(wts); return rho; diff --git a/lib/codegen.gi b/lib/codegen.gi index f2e3387..49b10a3 100644 --- a/lib/codegen.gi +++ b/lib/codegen.gi @@ -111,7 +111,7 @@ end); ##Create a linear code from a list of Codeword generators LinearCodeByGenerators := function(F, gens) - local V, M; + local V, M, row, i, j; V:= Objectify( NewType( FamilyObj( gens ), IsLeftModule and IsLinearCodeRep and IsCodeDefaultRep ),