% to run into etvoEM_ET.html 
s3=d10.[d<1,1,3,2>.g1]*.d<1,1,3,2>.d4
s2=(b<1,0,0>.d7.d<0,0,2,1>.d4.d8.[g1.d8]*.d10.m<1,0,0>+b<0,1,1>.d4.[d5.g1]*.d5.d12.d<2,1,0,0>.d3.m<0,1,1>).d13
s1=[d<3,2,1,1>.g1]*.d<3,2,1,1>.d8.[g8.[d<3,2,1,1>.g1]*.d<3,2,1,1>.d8]*
sH=s3.s2.s1
sF=g22.(b<1,0,1>.d<3,2,1,0>.m<1,0,1> + b<0,1,0>.d<2,5,4,3>.m<0,1,0>)
sCL=sH.[sF.sH]*
% open loop transfer
asRight(sH)
%close loop transfer
asRight(sCL)