I am attempting to program Mathematica to multiply the square free terms of an integer. Basically say we are looking at 252, its prime factors are 2^2*3^2*7. So what I want to do is have Mathematica return to me just 2*3*7 when I enter 252.
So I have this
S := FactorInteger[252]...
For conjugates of A,
G={I, A, B, C, D, K}
I^-1*A*I=A
B^-1*A*B=D*C=K
C^-1*A*C=C*B=K
D^-1*A*D=B*K=C
K^-1*A*K=K*D=C
So K and C are conjugates of A.
Do same procedure to find conjugates of B.