i1 : hiddenMap(1,markovRing(2,3,2)) o1 = map(QQ[p , p , p , p , p , p , p , p , p , p , p , p ],QQ[p , p , p , p , p , p ],{p + p , p + p , p + p , p + p , p + p , p + p }) 1,1,1 1,1,2 1,2,1 1,2,2 1,3,1 1,3,2 2,1,1 2,1,2 2,2,1 2,2,2 2,3,1 2,3,2 1,1 1,2 2,1 2,2 3,1 3,2 1,1,1 2,1,1 1,1,2 2,1,2 1,2,1 2,2,1 1,2,2 2,2,2 1,3,1 2,3,1 1,3,2 2,3,2 o1 : RingMap QQ[p , p , p , p , p , p , p , p , p , p , p , p ] <--- QQ[p , p , p , p , p , p ] 1,1,1 1,1,2 1,2,1 1,2,2 1,3,1 1,3,2 2,1,1 2,1,2 2,2,1 2,2,2 2,3,1 2,3,2 1,1 1,2 2,1 2,2 3,1 3,2 |