FUNCTION: coxeterm - compute the Coxeter-matrix of a bound poset algebra

CALLING SEQUENCE:
coxeterm(p)

PARAMETERS:
p - a bound poset algebra

SYNOPSIS:

• coxeterm(p) computes the Coxeter-matrix of the bound poset algebra p.

EXAMPLES:

> p:=hypercritical_algd(4,1);

> coxeterm(p);