((Subscript[T, c])=((Subscript[H, o])/(Subscript[R, c]))=((Subscript[H, o])/(Subscript[H, l]))(((Subscript[W, p])+(Subscript[W, g]))/(Subscript[V, p]))(1+((Subscript[f, N])/n)).(13))