Can I stop Mathematica from corercing radicals to conform to its idea of correct format? Version 10.4

This almost exclusively pertains to textual content, not Input. In my documents (Notebooks), I often have complicated expressions which involve square roots. I spend good time trying to format them to be readable (particularly readable by me). Unfortunately, Mathematica has other ideas of what my equations should look like. I've attached a screen-scrape showing the problem. When I entered the two lines shown, they were identical. For some reason the first line was reformatted to appear as shown.

I don't know when these changes happen. In other words, when saving the document as a Notebook; when evaluating the Notebook; when saving the notebook as PDF; when opening the Notebook; or when the stars aren't properly aligned.

Is there a way to prevent this from happening?

"10.4.0 for Microsoft Windows (64-bit) (February 26, 2016)"

---

Edit to add the copied cells from an older version exhibiting the same problem.

Edit 15 June 18 ~ 10:30 AM EST.

The Cell content I posted last edit wasn't what was asked for. When I attempted to Shift+Ctrl+R the Cell with the broken radical, Mathematica did nothing. So here is a new Notebook with only the broken Cell pasted into it. Cell with broken radical:

 (* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 10.4' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 2622, 88] NotebookOptionsPosition[ 2247, 68] NotebookOutlinePosition[ 2700, 89] CellTagsIndexPosition[ 2632, 84] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"\[Tau]", "\[Congruent]", RowBox[{ SubsuperscriptBox["\[Integral]", SuperscriptBox["\[ScriptCapitalE]", "1"], SuperscriptBox["\[ScriptCapitalE]", "2"]], RowBox[{"\[DifferentialD]", "\[Tau]"}]}]}], "=", RowBox[{ RowBox[{ SubsuperscriptBox["\[Integral]", SuperscriptBox["\[ScriptCapitalE]", "1"], SuperscriptBox["\[ScriptCapitalE]", "2"]], SqrtBox[ RowBox[{ RowBox[{"\[DifferentialD]", SuperscriptBox["x", "\[Alpha]"]}], RowBox[{"\[DifferentialD]", SuperscriptBox["x", "\[Beta]"]}], SubscriptBox["\[Eta]", RowBox[{"\[Alpha]", "\[InvisibleComma]", "\[Beta]"}]]}]]}], "=", RowBox[{ SubsuperscriptBox["\[Integral]", SuperscriptBox["\[ScriptCapitalE]", "1"], SuperscriptBox["\[ScriptCapitalE]", "2"]], RowBox[{"\[Sqrt]", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[DifferentialD]", SuperscriptBox["x", "4"]}], RowBox[{"\[DifferentialD]", SuperscriptBox["x", "4"]}], SubscriptBox["\[Eta]", RowBox[{"4", "\[InvisibleComma]", "4"}]]}], "+", RowBox[{ RowBox[{"\[DifferentialD]", SuperscriptBox["x", "i"]}], RowBox[{"\[DifferentialD]", SuperscriptBox["x", "j"]}], SubscriptBox["\[Eta]", RowBox[{"i", "\[InvisibleComma]", "j"}]]}]}], ")"}]}]}]}]}], TraditionalForm]], "Equation", CellChangeTimes->{{3.7380599537035913`*^9, 3.7380599903548117`*^9}, 3.7380600239399304`*^9, 3.7380601244571733`*^9, 3.738060476761531*^9}, CellTags->"b:0.5.0"] }, WindowSize->{1520, 805}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, FrontEndVersion->"10.4 for Microsoft Windows (64-bit) (February 25, 2016)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{ "b:0.5.0"->{ Cell[558, 20, 1685, 46, 82, "Equation", CellTags->"b:0.5.0"]} } *) (*CellTagsIndex CellTagsIndex->{ {"b:0.5.0", 2541, 78} } *) (*NotebookFileOutline Notebook[{ Cell[558, 20, 1685, 46, 82, "Equation", CellTags->"b:0.5.0"] } ] *) (* End of internal cache information *) 

Previous copy of Cell content removed.

---

A copy of Shift+Ctrl+R on a Cell containing the same equation the way I want the radical to appear.

 TextCell[RawBoxes[Cell[BoxData[ FormBox[RowBox[{RowBox[{"\[Tau]", "\[Congruent]", RowBox[{SubsuperscriptBox["\[Integral]", SuperscriptBox["\[ScriptCapitalE]", "1"], SuperscriptBox["\[ScriptCapitalE]", "2"]], RowBox[{"\[DifferentialD]", "\[Tau]"}]}]}], "=", RowBox[{RowBox[{SubsuperscriptBox["\[Integral]", SuperscriptBox["\[ScriptCapitalE]", "1"], SuperscriptBox["\[ScriptCapitalE]", "2"]], SqrtBox[RowBox[{RowBox[{"\[DifferentialD]", SuperscriptBox["x", "\[Alpha]"]}], RowBox[{"\[DifferentialD]", SuperscriptBox[ "x", "\[Beta]"]}], SubscriptBox["\[Eta]", RowBox[{"\[Alpha]", "\[InvisibleComma]", "\[Beta]"}]]}]]}], "=", RowBox[{SubsuperscriptBox["\[Integral]", SuperscriptBox["\[ScriptCapitalE]", "1"], SuperscriptBox["\[ScriptCapitalE]", "2"]], SqrtBox[RowBox[{RowBox[{RowBox[ {"\[DifferentialD]", SuperscriptBox["x", "4"]}], RowBox[{"\[DifferentialD]", SuperscriptBox["x", "4"]}], SubscriptBox["\[Eta]", RowBox[ {"4", "\[InvisibleComma]", "4"}]]}], "+", RowBox[{RowBox[{"\[DifferentialD]", SuperscriptBox["x", "i"]}], RowBox[{"\[DifferentialD]", SuperscriptBox[ "x", "j"]}], SubscriptBox["\[Eta]", RowBox[{"i", "\[InvisibleComma]", "j"}]]}]}]]}]}]}], TraditionalForm]]]], "Text", CellTags -> "b:0.5.0 

Previous copy of Cell content removed.