Giter VIP home page Giter VIP logo

misc-gap's People

Contributors

jackschmidt avatar

Watchers

 avatar  avatar

misc-gap's Issues

Another method to implement LinearRepresentationFromCharacter.

I noticed the function LinearRepresentationFromCharacter defined as follows:

misc-gap/minlin.g

Lines 90 to 112 in 8a583e8

LinearRepresentationFromCharacter := function( chi )
local grp, irrs, mults, reps, gens, imgs, i, mul, phi, j, img, k;
irrs := ConstituentsOfCharacter(chi);
mults := MatScalarProducts( irrs, [chi] )[1];
grp := UnderlyingGroup(chi);
reps := IrreducibleRepresentationsDixon(grp, irrs);
gens := GeneratorsOfGroup( grp );
imgs := List( gens, x -> fail );
for i in [1..Size(mults)] do
mul := mults[i];
phi := Irr(grp)[i];
for j in [1..Size(gens)] do
img := Image(reps[i], gens[j]);
for k in [1..mul] do
if imgs[j] = fail
then imgs[j] := img;
else imgs[j] := DirectSumMat( imgs[j], img );
fi;
od;
od;
od;
return GroupHomomorphismByImages( grp, gens, imgs );
end;

However, it seems that this can be done in a more concise way, as follows:

gap> gensSmallGroup16:=[
>   [[-E(4), 0, 0, 0],
>   [0, E(4), 0, 0],
>   [0, 0, 0, -E(4)],
>   [0, 0, -E(4), 0]],
>   [[0, 1, 0, 0],
>   [-1, 0, 0, 0],
>   [0, 0, 0, E(4)],
>   [0, 0, E(4), 0]]
>   ];;
gap> SmallGroup16:=Group(gensSmallGroup16);
<matrix group with 2 generators>
gap> chi := MinimalFaithfulLinearCharacterUsingChars( Irr( SmallGroup16 ) );
Character( CharacterTable( <matrix group of size 16 with 2 generators> ), [ 3, -1, -E(4), E(4), -1, 1, 1, -3, -E(4), E(4) ] )
gap> irrs := ConstituentsOfCharacter(chi);
[ Character( CharacterTable( <matrix group of size 16 with 2 generators> ), [ 1, 1, -E(4), E(4), -1, 1, -1, -1, -E(4), E(4) ] ), 
  Character( CharacterTable( <matrix group of size 16 with 2 generators> ), [ 2, -2, 0, 0, 0, 0, 2, -2, 0, 0 ] ) ]
gap> grp := UnderlyingGroup(chi);
<matrix group of size 16 with 2 generators>
gap> reps := IrreducibleRepresentationsDixon(grp, irrs);
[ CompositionMapping( [ [ [ 0, -1, 0, 0, 0, 0, 0, 0 ], [ 1, 0, 0, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 1, 0, 0, 0, 0 ], [ 0, 0, -1, 0, 0, 0, 0, 0 ], 
          [ 0, 0, 0, 0, 0, 0, 0, -1 ], [ 0, 0, 0, 0, 0, 0, 1, 0 ], [ 0, 0, 0, 0, 0, -1, 0, 0 ], [ 0, 0, 0, 0, 1, 0, 0, 0 ] ], 
      [ [ 0, 0, 1, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 1, 0, 0, 0, 0 ], [ -1, 0, 0, 0, 0, 0, 0, 0 ], [ 0, -1, 0, 0, 0, 0, 0, 0 ], 
          [ 0, 0, 0, 0, 0, 0, 0, 1 ], [ 0, 0, 0, 0, 0, 0, -1, 0 ], [ 0, 0, 0, 0, 0, 1, 0, 0 ], [ 0, 0, 0, 0, -1, 0, 0, 0 ] ] ] -> [ [ [ -E(4) ] ], [ [ E(4) ] ] ],
     <mapping: Group([ [ [ -E(4), 0, 0, 0 ], [ 0, E(4), 0, 0 ], [ 0, 0, 0, -E(4) ], [ 0, 0, -E(4), 0 ] ], 
      [ [ 0, 1, 0, 0 ], [ -1, 0, 0, 0 ], [ 0, 0, 0, E(4) ], [ 0, 0, E(4), 0 ] ] ]) -> Group([ [ [ 0, -1, 0, 0, 0, 0, 0, 0 ], 
          [ 1, 0, 0, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 1, 0, 0, 0, 0 ], [ 0, 0, -1, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 0, 0, 0, 0, -1 ], [ 0, 0, 0, 0, 0, 0, 1, 0 ], 
          [ 0, 0, 0, 0, 0, -1, 0, 0 ], [ 0, 0, 0, 0, 1, 0, 0, 0 ] ], [ [ 0, 0, 1, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 1, 0, 0, 0, 0 ], 
          [ -1, 0, 0, 0, 0, 0, 0, 0 ], [ 0, -1, 0, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 0, 0, 0, 0, 1 ], [ 0, 0, 0, 0, 0, 0, -1, 0 ], [ 0, 0, 0, 0, 0, 1, 0, 0 ], 
          [ 0, 0, 0, 0, -1, 0, 0, 0 ] ] ]) > ), CompositionMapping( [ [ [ 0, -1, 0, 0, 0, 0, 0, 0 ], [ 1, 0, 0, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 1, 0, 0, 0, 0 ], 
          [ 0, 0, -1, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 0, 0, 0, 0, -1 ], [ 0, 0, 0, 0, 0, 0, 1, 0 ], [ 0, 0, 0, 0, 0, -1, 0, 0 ], [ 0, 0, 0, 0, 1, 0, 0, 0 ] ], 
      [ [ 0, 0, 1, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 1, 0, 0, 0, 0 ], [ -1, 0, 0, 0, 0, 0, 0, 0 ], [ 0, -1, 0, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 0, 0, 0, 0, 1 ], 
          [ 0, 0, 0, 0, 0, 0, -1, 0 ], [ 0, 0, 0, 0, 0, 1, 0, 0 ], [ 0, 0, 0, 0, -1, 0, 0, 0 ] ] ] -> [ [ [ 0, -E(4) ], [ -E(4), 0 ] ], [ [ -E(4), 0 ], [ 0, E(4) ] ] ],
     <mapping: Group([ [ [ -E(4), 0, 0, 0 ], [ 0, E(4), 0, 0 ], [ 0, 0, 0, -E(4) ], [ 0, 0, -E(4), 0 ] ], 
      [ [ 0, 1, 0, 0 ], [ -1, 0, 0, 0 ], [ 0, 0, 0, E(4) ], [ 0, 0, E(4), 0 ] ] ]) -> Group([ [ [ 0, -1, 0, 0, 0, 0, 0, 0 ], 
          [ 1, 0, 0, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 1, 0, 0, 0, 0 ], [ 0, 0, -1, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 0, 0, 0, 0, -1 ], [ 0, 0, 0, 0, 0, 0, 1, 0 ], 
          [ 0, 0, 0, 0, 0, -1, 0, 0 ], [ 0, 0, 0, 0, 1, 0, 0, 0 ] ], [ [ 0, 0, 1, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 1, 0, 0, 0, 0 ], 
          [ -1, 0, 0, 0, 0, 0, 0, 0 ], [ 0, -1, 0, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 0, 0, 0, 0, 1 ], [ 0, 0, 0, 0, 0, 0, -1, 0 ], [ 0, 0, 0, 0, 0, 1, 0, 0 ], 
          [ 0, 0, 0, 0, -1, 0, 0, 0 ] ] ]) > ) ]
gap> gens := GeneratorsOfGroup( grp );
[ [ [ -E(4), 0, 0, 0 ], [ 0, E(4), 0, 0 ], [ 0, 0, 0, -E(4) ], [ 0, 0, -E(4), 0 ] ], [ [ 0, 1, 0, 0 ], [ -1, 0, 0, 0 ], [ 0, 0, 0, E(4) ], [ 0, 0, E(4), 0 ] ] ]

gap> imgrep:=List(gens,x->List(reps, y-> x^y ));
[ [ [ [ -E(4) ] ], [ [ 0, -E(4) ], [ -E(4), 0 ] ] ], [ [ [ E(4) ] ], [ [ -E(4), 0 ], [ 0, E(4) ] ] ] ]
gap> imggen:=List(imgrep, x-> DirectSumMat(x) );
[ [ [ -E(4), 0, 0 ], [ 0, 0, -E(4) ], [ 0, -E(4), 0 ] ], [ [ E(4), 0, 0 ], [ 0, -E(4), 0 ], [ 0, 0, E(4) ] ] ]
gap> IsomorphismGroups(SmallGroup16,Group(imggen));
#I  Forcing finiteness test
CompositionMapping( [ [ [ 0, -1, 0, 0, 0, 0, 0, 0 ], [ 1, 0, 0, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 1, 0, 0, 0, 0 ], [ 0, 0, -1, 0, 0, 0, 0, 0 ], 
      [ 0, 0, 0, 0, 0, 0, 0, -1 ], [ 0, 0, 0, 0, 0, 0, 1, 0 ], [ 0, 0, 0, 0, 0, -1, 0, 0 ], [ 0, 0, 0, 0, 1, 0, 0, 0 ] ], 
  [ [ 0, 0, 1, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 1, 0, 0, 0, 0 ], [ -1, 0, 0, 0, 0, 0, 0, 0 ], [ 0, -1, 0, 0, 0, 0, 0, 0 ], 
      [ 0, 0, 0, 0, 0, 0, 0, 1 ], [ 0, 0, 0, 0, 0, 0, -1, 0 ], [ 0, 0, 0, 0, 0, 1, 0, 0 ], [ 0, 0, 0, 0, -1, 0, 0, 0 ] ] ] -> 
[ [ [ -E(4), 0, 0 ], [ 0, 0, -E(4) ], [ 0, -E(4), 0 ] ], [ [ E(4), 0, 0 ], [ 0, -E(4), 0 ], [ 0, 0, E(4) ] ] ], <mapping: Group(
[ [ [ -E(4), 0, 0, 0 ], [ 0, E(4), 0, 0 ], [ 0, 0, 0, -E(4) ], [ 0, 0, -E(4), 0 ] ], [ [ 0, 1, 0, 0 ], [ -1, 0, 0, 0 ], [ 0, 0, 0, E(4) ], [ 0, 0, E(4), 0 ] ] ]) -> Group(
[ [ [ 0, -1, 0, 0, 0, 0, 0, 0 ], [ 1, 0, 0, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 1, 0, 0, 0, 0 ], [ 0, 0, -1, 0, 0, 0, 0, 0 ], 
      [ 0, 0, 0, 0, 0, 0, 0, -1 ], [ 0, 0, 0, 0, 0, 0, 1, 0 ], [ 0, 0, 0, 0, 0, -1, 0, 0 ], [ 0, 0, 0, 0, 1, 0, 0, 0 ] ], 
  [ [ 0, 0, 1, 0, 0, 0, 0, 0 ], [ 0, 0, 0, 1, 0, 0, 0, 0 ], [ -1, 0, 0, 0, 0, 0, 0, 0 ], [ 0, -1, 0, 0, 0, 0, 0, 0 ], 
      [ 0, 0, 0, 0, 0, 0, 0, 1 ], [ 0, 0, 0, 0, 0, 0, -1, 0 ], [ 0, 0, 0, 0, 0, 1, 0, 0 ], [ 0, 0, 0, 0, -1, 0, 0, 0 ] ] ]) > )

But the above result, aka, imggen is different from the results given by the following method:

gap> lpchi:=LinearRepresentationFromCharacter( chi );;
gap> IsGroupHomomorphism(lpchi);
true
gap> imgchi:=MappingGeneratorsImages(lpchi)[2];
[ [ [ -E(4), 0, 0 ], [ 0, 0, -1 ], [ 0, 1, 0 ] ], [ [ E(4), 0, 0 ], [ 0, -E(4), 0 ], [ 0, 0, E(4) ] ] ]

As you can see, imggen and imgchi are different. Any hints for these two different methods?

Regards,
Zhao

Recommend Projects

  • React photo React

    A declarative, efficient, and flexible JavaScript library for building user interfaces.

  • Vue.js photo Vue.js

    ๐Ÿ–– Vue.js is a progressive, incrementally-adoptable JavaScript framework for building UI on the web.

  • Typescript photo Typescript

    TypeScript is a superset of JavaScript that compiles to clean JavaScript output.

  • TensorFlow photo TensorFlow

    An Open Source Machine Learning Framework for Everyone

  • Django photo Django

    The Web framework for perfectionists with deadlines.

  • D3 photo D3

    Bring data to life with SVG, Canvas and HTML. ๐Ÿ“Š๐Ÿ“ˆ๐ŸŽ‰

Recommend Topics

  • javascript

    JavaScript (JS) is a lightweight interpreted programming language with first-class functions.

  • web

    Some thing interesting about web. New door for the world.

  • server

    A server is a program made to process requests and deliver data to clients.

  • Machine learning

    Machine learning is a way of modeling and interpreting data that allows a piece of software to respond intelligently.

  • Game

    Some thing interesting about game, make everyone happy.

Recommend Org

  • Facebook photo Facebook

    We are working to build community through open source technology. NB: members must have two-factor auth.

  • Microsoft photo Microsoft

    Open source projects and samples from Microsoft.

  • Google photo Google

    Google โค๏ธ Open Source for everyone.

  • D3 photo D3

    Data-Driven Documents codes.