Clear["Global`*"]
Use Format to format output display of variables, e.g., rm and rp
Format[rm] = Subscript[rSubscript["r", "-"];
Format[rp] = Subscript[rSubscript["r", "+"];
Solve[A (r - rp) == B, r][[1]]
Clear["Global`*"]
Use Format to format output display of variables, e.g., rm and rp
Format[rm] = Subscript[r, "-"];
Format[rp] = Subscript[r, "+"];
Solve[A (r - rp) == B, r][[1]]
Clear["Global`*"]
Use Format to format output display of variables, e.g., rm and rp
Format[rm] = Subscript["r", "-"];
Format[rp] = Subscript["r", "+"];
Solve[A (r - rp) == B, r][[1]]
Clear["Global`*"]
Use Format to format output display of variables, e.g., rm and rp
Format[rm] = Subscript[r, "-"];
Format[rp] = Subscript[r, "+"];
Solve[A (r - rp) == B, r][[1]]