Section 16.3 Macaulay2
xxxxxxxxxx
loadPackage "Depth"
A = QQ[x_1..x_3]/ideal(x_1^2, x_1*x_2)
depth A
xxxxxxxxxx
loadPackage "Depth"
Q1 = QQ[x,y,z] / ideal(x^3-y*z, z^3)
isCM Q1
Q2 = QQ[x,y,z] / ideal(x*z,y*z);
isCM Q2
Q3 = QQ[x, y, z, w] / (ideal(x, y) + ideal(z, w));
isCM Q3