Avoid syntax problems in the following functions?

[mw678 (Minghui Wang)]

Good evening! I am working on a quantum mechanics problem using Mathematica and when I typed in the functions I need, I keep getting syntax problem saying " Expression imcomplete, more input needed". I have no idea what is going on. Will anyone help me with it? Thank you so much!!!

Input:

\!\(\*SuperscriptBox[\(J\), \('\)]\)[D_] := 
 N[E, 10]^2/(
  4*\[Pi]*Quantity[1, "ElectricConstant"]*
   Quantity["BohrRadius"]) (1/D - 
    Exp[-2*D] (1/D + 11/8 + (3 D)/4 + D^2/6))

Getting:Syntax::sntxi

Input:
(J^')[D_]:=N[E,10]^2/(4*\[Pi]*Quantity[1, "ElectricConstant"]*Quantity["BohrRadius"]) (1/D-Exp[-2D]*(1/D+11/8+(3D)/4+D^2/6))
\!\(\*SuperscriptBox[\(K\), \('\)]\)[D_] := 
 N[E, 10]^2/(
  20*\[Pi]*Quantity[1, "ElectricConstant"]*
   Quantity[
    "BohrRadius"]) (-Exp[-2*D] (-25/8 + 23/4 D + 3 D^2 + 1/3 D^3) + 
    6/D (\[CapitalDelta]^2 (N[EulerGamma, 10] + Log[D]) + 
\!\(\*SuperscriptBox[\(\[CapitalDelta]\), \('\)]\)^2*
        ExpIntegralEi[-4 D] - 2*\[CapitalDelta]*
\!\(\*SuperscriptBox[\(\[CapitalDelta]\), \('\)]\)*
        ExpIntegralEi[-2 D]))

Getting:Syntax::sntxi

[wolframcommunity (EDITORIAL BOARD)]

Welcome to Wolfram Community! Please make sure you know the rules: https://wolfr.am/READ-1ST

The rules explain how to format your code properly. If you do not format code, it may become corrupted and useless to other members. Please EDIT your posts and make sure code blocks start on a new paragraph and look framed and colored like this.

int = Integrate[1/(x^3 - 1), x];
Map[Framed, int, Infinity]