(var DeltaE "change in energy")

(eq DeltaE
    (* (/ hbar (* 2 pi I))
       (+ (* 2 J)
          3)))