"Source: Text/Algebra/AlgQEA.text";
"Line: 1018";
"Date: Tue Jun  7 22:27:14 2016";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Algebra/AlgQEA.text, line: 1018
// Example: H109E8 ()
print "Example: H109E8";
ei := GetEchoInput();
SetEchoInput(true);
U:= QuantizedUEA(RootDatum("A3"));
d:= Comultiplication(U, 2);
d(U.1);
SetEchoInput(ei);
