For comparison with other CAS choose from: Axiom Derive Macsyma Mathematica Reduce
23
^
12;
21914624432020321
60!;
832098711274139014427634118322336438075417260636124595244927769640960\ 0000000000000
bi := 23^
4*37*59*101;
bi := 61700183203
ifactor( bi );
4 (23) (37) (59) (101)
bia := 23*11^
6;
bia := 40745903
gcd( bi, bia );
23