// BBOX converted automatically from // http://atlas.math.rwth-aachen.de/Atlas/spor/J3/words/J3d2G1-max1W2 function(S) // WARNING! This is not an SLP! w1 := S.1; w2 := S.2; w3 := w1 * w2; w1 := w3 * w3; return [w1,w2]; end function;