log(F:POLY):LIST
/**/ Use R ::= QQ[x,y,z]; /**/ F := *** x^3y^2z^5 +x^2y +xz^4 ***; /**/ log(F); [3, 2, 5]