((Subscript[J, s])=A (Subscript[d, (Subscript[g, st])])(Subscript[J, b])
(Subscript[J, h])=[(R00R)](Subscript[J, b])(Eq.   3))