Wolfram Language Paclet Repository
Community-contributed installable additions to the Wolfram Language
Wolfram`TensorNetworks`
TensorNetworkDelete  |
|
| | ||||
|
| | ||||
|
| | ||||
▪
k
k=-1
k=-2
The result has exactly one fewer tensor than the input network. •
When the network was constructed with an explicit
Output
Output
When the
Output
Automatic
In Graph form, the corresponding vertex is removed with ; incident edges are removed automatically.
Examples
(4)
Basic Examples
(1)
Create a tensor network on three tensors arranged in a triangle:
In[1]:=
t1=RandomReal[1,{2,3}];t2=RandomReal[1,{3,4}];t3=RandomReal[1,{4,2}];t4=RandomReal[1,{2,2}];{i,j,k,l,m,n,p,q}=Table[Symbol["idx"<>ToString[x]],{x,8}];indices={{i,j},{j,k},{k,i}};tn=
[{t1,t2,t3},indices];
 | TensorNetwork |
Remove the last tensor (default):
In[2]:=
 | TensorNetworkDelete |
Out[2]=
TensorNetwork
 |  |
|
Negative indices are explicit:
In[3]:=
| TensorNetworkDelete |
Out[3]=
TensorNetwork
| |
|
Remove the first tensor:
In[4]:=
| TensorNetworkDelete |
Out[4]=
TensorNetwork
| |
|
Remove the middle tensor; the dangling indices become free:
In[5]:=
| TensorNetworkDelete |
Out[5]=
TensorNetwork
|  |
|
Round-trip with TensorNetworkAdd: add a fourth tensor, then delete it to recover the original:
In[6]:=
| TensorNetworkDelete |
| TensorNetworkAdd |
Out[6]=
TensorNetwork
|  |
|
Integer indices work the same way:
In[7]:=
| TensorNetworkDelete |
| TensorNetwork |
Out[7]=
TensorNetwork
| |
|
Scope
(1)
Applications
(1)
Properties & Relations
(1)
 |
|
 |
|
""