2

I want to see the intermediate steps of my Program.I have placed Echo in places where it matters such as before plugging in a relation and before simplifying the expression,so that i can see all the steps in detail.However i want it as a standard output.Print command does not do the job.Is there some solution?My Program does use a package called feyncal

DeclareNonCommutative[SuperMinus[\[Phi]]]
DeclareNonCommutative[SuperPlus[\[Phi]]]
(Column[#1, Center] & )[NestWhileList[
     Echo[Expand[DotSimplify[Echo[#1 /. SuperPlus[\[Phi]] . SuperMinus[\[Phi]] -> D + 
      SuperMinus[\[Phi]] . SuperPlus[\[Phi]]]]]] & , 
        Echo[Total[Apply[Dot, Permutations[{SuperPlus[\[Phi]], SuperMinus[\[Phi]], 
         SuperPlus[\[Phi]], SuperMinus[\[Phi]]}], {1}]]], 
          !FreeQ[#1, SuperPlus[\[Phi]] . SuperMinus[\[Phi]]] & ]]

enter image description here

Irtiza
  • 576
  • 2
  • 9

1 Answers1

1

You should be able to replace each instance of Echo with Sow and wrap the entire resulting expression in a Reap.

Alan
  • 13,686
  • 19
  • 38