// BBOX converted automatically from // http://atlas.math.rwth-aachen.de/Atlas/alt/A7/words/A7G1-max2W1 function(S) // WARNING! This is not an SLP! w1 := S.1; w2 := S.2; w3 := w2 * w1; w4 := w3 * w2; w5 := w4 * w2; w6 := w3 * w1; w2 := w3 * w6; w1 := w4 * w5; return [w1,w2]; end function;