["m", "2"], "-", 
       RowBox[{"2", " ", "m", " ", "M"}], "+", 
       SuperscriptBox["M", "2"], "-", 
       FormBox[
        SuperscriptBox[
         FormBox[
          FormBox["p",
           TraditionalForm],
          TraditionalForm], "2"],
        TraditionalForm]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{
       SuperscriptBox["m", "2"], "+", 
       RowBox[{"2", " ", "m", " ", "M"}], "+", 
       SuperscriptBox["M", "2"], "-", 
       FormBox[
        SuperscriptBox[
         FormBox[
          FormBox["p",
           TraditionalForm],
          TraditionalForm], "2"],
        TraditionalForm]}], ")"}], " ", 
     FormBox[
      TagBox[
       FormBox[
        RowBox[{
         SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(", 
         RowBox[{
          FormBox[
           SuperscriptBox[
            FormBox[
             FormBox["p",
              TraditionalForm],
             TraditionalForm], "2"],
           TraditionalForm], ",", 
          SuperscriptBox["m", "2"], ",", 
          SuperscriptBox["M", "2"]}], ")"}],
        TraditionalForm],
       HoldForm],
      TraditionalForm]}], 
    RowBox[{"4", " ", 
     RowBox[{"(", 
      RowBox[{"1", "-", "D"}], ")"}], " ", 
     FormBox[
      SuperscriptBox[
       FormBox[
        FormBox["p",
         TraditionalForm],
        TraditionalForm], "2"],
      TraditionalForm]}]], "+", 
   FractionBox[
    RowBox[{
     FormBox[
      TagBox[
       FormBox[
        RowBox[{
         SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(", 
         SuperscriptBox["M", "2"], ")"}],
        TraditionalForm],
       HoldForm],
      TraditionalForm], " ", 
     RowBox[{"(", 
      RowBox[{
       SuperscriptBox["m", "2"], "-", 
       SuperscriptBox["M", "2"], "-", 
       FormBox[
        SuperscriptBox[
         FormBox[
          FormBox["p",
           TraditionalForm],
          TraditionalForm], "2"],
        TraditionalForm]}], ")"}]}], 
    RowBox[{"4", " ", 
     RowBox[{"(", 
      RowBox[{"1", "-", "D"}], ")"}], " ", 
     FormBox[
      SuperscriptB