FUNCTION: esrdtest - test for exceptional sincere representation directed algebras

CALLING SEQUENCE:
esrdtest(p)

PARAMETERS:
p - a bound poset algebra

SYNOPSIS:

• esrdtest(p) test whether the bound poset algebra p has the frame of an exceptional sincere representation directed algebra. If so, the function will return a pair [o,n] such that p and the algebra given by the call of esrdalg(o,n) have the same frame. Otherwise the value false will be returned.

EXAMPLES:

> p:=[9,{[2,1],[3,2,4],[4,5,6],[6,7,9],[8,7]},{[3,7]}];

> esrdtest(p);

> q:=esrdalg(521,2);

> sameframe(p,q);

> isoalg(p,q);