4d-AS-regular

the classification of 4-dimensional Artin–Schelter regular algebras

← all families

deformed skew \((x_3x_2;\ x_4^2)\)

A quantum (skew) polynomial ring with a single quadratic term added: the \(x_3 x_2\) relation acquires \(-t\,x_4^2\).

Relations
  • \(x_2 x_1 - (q_{14}^2/q_{13}) x_1 x_2\)
  • \(x_3 x_1 - q_{13} x_1 x_3\)
  • \(x_4 x_1 - q_{14} x_1 x_4\)
  • \(x_3 x_2 - q_{23} x_2 x_3 - t x_4^2\)
  • \(x_4 x_2 - q_{24} x_2 x_4\)
  • \(x_4 x_3 - (1/q_{24}) x_3 x_4\)
Parameters
  • \(q_{13}, q_{14}, q_{23}, q_{24}\) — skew-commutation parameters.
  • \(t\) — coefficient of the deforming term.
Point scheme
three lines and a conic (dimension \(1\)).
Normal elements
normal locus dimension \(0\) (degree 1), \(0\) (degree 2).
Hochschild cohomology
\(\mathrm{HH}^\bullet_0(A)\) \(= (1, 3, 4, 3)\)
Kodaira–Spencer
rank \(4\); injective: no; surjective: yes.
Introduced
arXiv:2511.08390 . One of the deformed skew polynomial (\(\mathcal{F}\)) families; its earlier origin is not pinned down here.
References
arXiv:2511.08390

Code

The presentation, ready to paste into a computer algebra system:

needsPackage "AssociativeAlgebras"
K = frac(QQ[q13, q14, q23, q24, t]);
A = K<|x1,x2,x3,x4|>;
I = ideal {
  x2*x1 - (q14^2/q13)*x1*x2,
  x3*x1 - q13*x1*x3,
  x4*x1 - q14*x1*x4,
  x3*x2 - q23*x2*x3 - t*x4^2,
  x4*x2 - q24*x2*x4,
  x4*x3 - (1/q24)*x3*x4
};
B = A/I;
PolyRing := FunctionField(Rationals, ["q13", "q14", "q23", "q24", "t"]);;
indets := IndeterminatesOfFunctionField(PolyRing);;
q13 := indets[1];;
q14 := indets[2];;
q23 := indets[3];;
q24 := indets[4];;
t := indets[5];;
kQ := FreeKAlgebra(PolyRing, 4, "x");;
x1 := kQ.x1;; x2 := kQ.x2;; x3 := kQ.x3;; x4 := kQ.x4;;
rels := [
  x2*x1 - (q14^2/q13)*x1*x2,
  x3*x1 - q13*x1*x3,
  x4*x1 - q14*x1*x4,
  x3*x2 - q23*x2*x3 - t*x4^2,
  x4*x2 - q24*x2*x4,
  x4*x3 - (1/q24)*x3*x4
];;
A := kQ / rels;;
// untested (Magma not available here)
K<q13, q14, q23, q24, t> := RationalFunctionField(Rationals(), 5);
F<x1,x2,x3,x4> := FreeAlgebra(K, 4);
rels := [
  x2*x1 - (q14^2/q13)*x1*x2,
  x3*x1 - q13*x1*x3,
  x4*x1 - q14*x1*x4,
  x3*x2 - q23*x2*x3 - t*x4^2,
  x4*x2 - q24*x2*x4,
  x4*x3 - (1/q24)*x3*x4
];
A := quo< F | rels >;