Mathematica Stack Exchange is a question and answer site for users of Wolfram Mathematica. It only takes a minute to sign up.
Sign up to join this community
Is it posible to apply ReplaceAll and Expand repeatedly such as?
expression//.{"substitute", "Expand expression"}
A minimal example
A B //. {A B -> B (C + D) , B C -> 1}
(* B(C+D) *)
However, I want
A B //. {A B -> B (C + D) , B C -> 1}
(* BC + BD *)
and finaly
(* 1+BD *)
Perhaps this is helpful
rules = {A B -> B (C + D), B C -> 1};
expr = A B;
FixedPoint[
Expand[ReplaceRepeated[#, rules]] &, expr]
Cis a protected symbol used to generate integration constants and such.Dis the differentiation operator. Generally avoid single capital letters for variables and even beginning variables with capitals. $\endgroup$ – Michael E2 Feb 13 '18 at 13:11