// BBOX converted automatically from // http://atlas.math.rwth-aachen.de/Atlas/clas/U52/words/U52G1-max6W1 function(S) // WARNING! This is not an SLP! w1 := S.1; w2 := S.2; w3 := w1 * w2; w4 := w3 * w2; w5 := w3 * w4; w6 := w3 * w5; w7 := w6 * w3; w8 := w7 * w4; w9 := w3 * w8; w10 := w9 * w4; w11 := w10 * w4; w12 := w3 * w11; w13 := w12 * w3; w14 := w13 * w4; w15 := w14 * w4; w4 := w14 * w15; w5 := w10 * w4; w2 := w5 * w5; w1 := w5 * w2; w4 := w3 * w3; w5 := w4^-1; w6 := w5 * w1; w1 := w6 * w4; return [w1,w2]; end function;