DN:=1;
HN:=2;
HN3:=DN+HN;
HN4:=HN+HN;
HN5:=HN+HN+DN;
HN6:=HN+HN+HN;
HN7:=HN+HN+HN+DN;
n:=50;
sOne:=((n-DN)/HN)*C+
((n-HN3)/HN)*Ref(C,-DN)+
((n-HN5)/HN)*Ref(C,-HN)+
((n-HN7)/HN)*Ref(C,-HN3)+
((n-(HN7+HN))/HN)*Ref(C,-HN4)+
((n-(HN7+HN4))/HN)*Ref(C,-HN5)+
((n-(HN7+HN6))/HN)*Ref(C,-HN6)+
((n-(HN5*HN3))/HN)*Ref(C,-HN7)+
((n-(HN5*HN3+HN)/HN)*Ref(C,-HN*HN4)+
((n-(HN5*HN3+HN4))/HN)*Ref(C,-HN3*HN3)+
((n-(HN5*HN4+DN))/HN)*Ref(C,-HN*HN5)+
((n-(HN5*HN4+HN3))/HN)*Ref(C,-HN*HN5+DN)+
((n-(HN5*HN5))/HN)*Ref(C,-HN3*HN4)+
((n-(HN5*HN5+HN))/HN)*Ref(C,-HN3*HN4+DN)+
((n-29)/HN)*Ref(C,-HN3*HN4+HN)+
((n-31)/HN)*Ref(C,-HN3*HN5)+
((n-33)/HN)*Ref(C,-HN3*HN5+DN)+
((n-35)/HN)*Ref(C,-HN3*HN5+HN)+
((n-37)/HN)*Ref(C,-HN3*HN6)+
((n-39)/HN)*Ref(C,-HN3*HN6+DN)+
((n-41)/HN)*Ref(C,-HN4*HN5)+
((n-43)/HN)*Ref(C,-HN4*HN5+DN)+
((n-45)/HN)*Ref(C,-HN4*HN5+HN)+
((n-47)/HN)*Ref(C,-HN4*HN5+HN3)+
((n-49)/HN)*Ref(C,-HN4*HN6)+
((n-51)/HN)*Ref(C,-HN5*HN5)+
((n-53)/HN)*Ref(C,-HN5*HN5+DN)+
((n-55)/HN)*Ref(C,-HN5*HN5+HN)+
((n-57)/HN)*Ref(C,-HN4*HN7)+
((n-59)/HN)*Ref(C,-HN4*HN7+DN)+
((n-61)/HN)*Ref(C,-HN6*HN5)+
((n-63)/HN)*Ref(C,-HN6*HN5+DN)+
((n-65)/HN)*Ref(C,-HN6*HN5+HN)+
((n-67)/HN)*Ref(C,-HN6*HN5+HN3)+
((n-69)/HN)*Ref(C,-HN6*HN5+HN4)+
((n-71)/HN)*Ref(C,-HN5*HN7)+
((n-73)/HN)*Ref(C,-HN6*HN6)+
((n-75)/HN)*Ref(C,-HN6*HN6+DN)+
((n-77)/HN)*Ref(C,-HN6*HN6+HN)+
((n-79)/HN)*Ref(C,-HN6*HN6+HN3)+
((n-81)/HN)*Ref(C,-HN6*HN6+HN4)+
((n-83)/HN)*Ref(C,-HN6*HN6+HN5)+
((n-85)/HN)*Ref(C,-HN7*HN6)+
((n-87)/HN)*Ref(C,-HN7*HN6+DN)+
((n-89)/HN)*Ref(C,-HN7*HN6+HN)+
((n-91)/HN)*Ref(C,-HN7*HN6+HN3)+
((n-93)/HN)*Ref(C,-HN7*HN6+HN4)+
((n-95)/HN)*Ref(C,-HN7*HN6+HN5)+
((n-97)/HN)*Ref(C,-HN7*HN6+HN6)+
((n-99)/HN)*Ref(C,-HN7*HN7));
TN:=Mov(C,n,S);
yTwo:=TN+(HN6*sOne)/((n+DN)*n);
yTwo
