// Script #1 (main types)
var s1=Ed("g4.m2.b2.g1.d4");
var s2=Ed("d4+g2.d7+(g4.d10).[g2.d3]*"); // s2 
var m1=new smatrixEd([[s1,s1,s1],[s2,s2,s2]]);
m1.set(0,1,eps());
output.value='s1='+s1+'\n';  //default string format
output.value+='s2='+s2+'\n'; 
output.value+=m1+'\n';
output.value+=m1.etvo()+'\n';
output.value+='m1(0,2)='+m1.get(0,2)+'\n';

//Script #2 (main operations)
s0=Ed("g3.d4+g5.d6"); 
s1=Ed("d1+(g1.m3.b3.d2+g2.d3).[g2.d2]*"); 
s2=Ed("d4.m2.b2.g1.[g3.d3]*"); 
s3=Ed("d3.[g4.d5]*"); 
s4=eps();
output.value = 's0='+s0+'\n';
output.value += 's1='+s1+'\n';
output.value += 's2='+s2+'\n';
output.value += 's3='+s3+'\n';
output.value += 's4='+s4+'\n';
var s5=s2.oplus(s3);
output.value += 's5='+s5+'\n';
output.value+='s5.p='+s5.p+'\n';
output.value+='s5.q='+s5.q+'\n';
var s6=s2.otimes(s3);
output.value+= 's6='+s6+'\n';
s7=s0.star();
output.value += 's7='+s7+'\n';

//Script #3  Ex. Fig 11 Introduction ETVO
var B=new smatrixEd([[Ed("b2")],[eps()],[eps()],[eps()]]);
var C=new smatrixEd([[eps(),Ed("b2"),eps(),Ed("g1")]]);
var A=new smatrixEd([[eps(),eps(),eps(),Ed("b3.g5.m2")],
	[Ed("m3.d2"),eps(),eps(),eps()],
	[eps(),Ed("g0"),eps(),eps()],
	[eps(),eps(),Ed("b2.d5"),eps()]]);	
output.value = 'A='+A+'\n';
output.value += 'B='+B+'\n';
output.value += 'C='+C+'\n';
H=C.otimes(A.star().otimes(B));
output.value += 'H='+H+'\n';
s=H.get(0,0);
output.value += 's='+s.toStringLeft()+'\n';
output.value += 's='+s.toStringRight()+'\n';