((Subscript[L, r])=(([(Subscript[d, r]^4)×[(((π×(Subscript[T, a]))/(256×(Subscript[F, a])×(Subscript[p, a])))×((Subscript[p, i]^2)-(Subscript[p, or]^2))-(((Subscript[T, c 3])×(Subscript[η, c 3])×(Subscript[L, c 3]))/(Subscript[d, c 3]^4)))]-(Subscript[T, r 2])×(Subscript[η, r 2])×(Subscript[L, r 2])])/((Subscript[T, r 1])×(Subscript[η, r 1])))+(Subscript[L, r 2])(14))