ring R=0,(x,y,z),ds;
module M=[x2,0,0],[0,xz,0],[0,0,x2+zx3];

Ann(M);
//->_[1]=x2z

dim(std(Ann(M)));
//->2