Notation`AutoLoadNotationPalette=FalseNeeds["Notation`"]Notation[ParsedBoxWrapper[SubscriptBox["x_","i_"]]⟺ParsedBoxWrapper[RowBox[{"Indexed","[",RowBox[{"x_",",","i_"}],"]"}]]]
In[]:=
identity=Table[0,{i,1,3}]
x
i
Out[]=
{0,0,0}
x
1
x
2
x
3
In[]:=
Limit,identity
Sin[]
x
1
x
1
Out[]=
1
In[]:=
Limit,identity
Sin
Sum[,{i,1,3}]
2
x
i
Sum[,{i,1,3}]
2
x
i
Out[]=
x
1
x
2
x
3
Sin++
2
x
1
2
x
2
2
x
3
2
x
1
2
x
2
2
x
3
In[]:=
Limit++,{x0,y0,z0}
Sin++
2
x
2
y
2
z
2
x
2
y
2
z
Out[]=
1