LIB "tst.lib"; tst_init();
LIB "fpadim.lib";
ring r = 0,(x,y),dp;
def R = makeLetterplaceRing(5); // constructs a Letterplace ring
setring R; // sets basering to Letterplace ring
ideal G = x(1)*x(2), y(1)*y(2),x(1)*y(2)*x(3);
// ideal G contains a Groebner basis
lpKDim(G); //procedure invoked with ring parameters
// the factor algebra is finite, so the degree bound given by the Letterplace
// ring is not necessary
lpKDim(G,0); // procedure without any degree bound
tst_status(1);$