Test ribopq and H1mqt

> ribopq(ribopq(1,{2,3},4),{1},4);

> H1mqt(3,H1mqt(3,s[1]));