[GAP Forum] subgroup of direct product

[parth dixit]

hi,
   I am trying to form a subgroup of Direct product of two groups by 
taking direct product of subgroups of the original groups.But it is 
giving me error,I tried using AsSubgroup too but it failed.Please help 
me.
gap> G:=SymmetricGroup(5);;
gap> H1:=SymmetricGroup(3);;
gap> H2:=DihedralGroup(IsPermGroup,8);;
gap> gg:=DirectProduct(G,G);;
gap> hh:=DirectProduct(H1,H2);;
gap> IsSubgroup(gg,hh);
false
                       thanks
                           parth