[was@laptop mlogs]$ [was@laptop mlogs]$ Magma V2.9-11     Wed Oct  2 2002 10:45:54 on laptop   [Seed = 3278239866]
Type ? for help.  Type <Ctrl>-D to quit.

Loading startup file "/home/was/magma/local/emacs.m"

Loading "/home/was/magma/local/init.m"
> p := 101;
> R := Integers(p);
> g := R!2;
> Order(g);
100
> n := 256;
> R := Integers(n);
> EulerPhi(n);
128
> for x in [1..255] do if GCD(x,n) eq 1 then print Order(R!x); end if; end for;
1
64
64
32
32
64
64
16
16
64
64
32
32
64
64
8
8
64
64
32
32
64
64
16
16
64
64
32
32
64
64
4
4
64
64
32
32
64
64
16
16
64
64
32
32
64
64
8
8
64
64
32
32
64
64
16
16
64
64
32
32
64
64
2
2
64
64
32
32
64
64
16
16
64
64
32
32
64
64
8
8
64
64
32
32
64
64
16
16
64
64
32
32
64
64
4
4
64
64
32
32
64
64
16
16
64
64
32
32
64
64
8
8
64
64
32
32
64
64
16
16
64
64
32
32
64
64
2
> G := UnitGroup(R);   // this is (Z/n)^*
> G;
Abelian Group isomorphic to Z/2 + Z/64
Defined on 2 generators
Relations:
2*G.1 = 0
64*G.2 = 0
>