((Subscript[B, new])=[(000(1/(Subscript[J, cm])))][Formula   5-1])