# BBOX converted automatically from
# http://atlas.math.rwth-aachen.de/Atlas/lin/L38/words/L38G1-max3W1
work := [];;
output := [];;
work[1] := input[1];;
work[2] := input[2];;
work[3] := work[1] * work[2];;
work[4] := work[3] * work[2];;
work[5] := work[3]^4;;
work[1] := work[5]^-1 * work[1] * work[5];;
work[2] := work[4]^-1 * work[2] * work[4];;
output[1] := work[1];;
output[2] := work[2];;