Skip to main content
Source Link
march
  • 24.2k
  • 2
  • 46
  • 102

Do this:

Collect[A, _G] /. C[x_, 1] DT[1, y_] :> G[x, y] - C[x, 2] DT[2, y] // Simplify
Post Made Community Wiki by march