c[J]$[x[1];(*x)+c[x[1]]-c[x[2]];*x]
Twetch ยท
August 6, 2019
c[J]$[x[1];(*x)+c[x[1]]-c[x[2]];*x]