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