theorem
Verification.frank_rho_conditional_integral
(C : ProbabilityTheory.Copula 2)
{θ : ℝ}
(hθ : θ ≠ 0)
(hc : ∀ (u v : ↑unitInterval), C.cdf ![u, v] = frankRealCDF θ ↑u ↑v)
:
C.spearmanRho = (12 * ∫ (u : ↑unitInterval), (1 - ↑u) * ∫ (v : ↑unitInterval), frankPartial θ ↑u ↑v) - 3
theorem
Verification.frank_spearmanRho_of_cdf
(C : ProbabilityTheory.Copula 2)
{θ : ℝ}
(hθ : θ ≠ 0)
(hc : ∀ (u v : ↑unitInterval), C.cdf ![u, v] = frankRealCDF θ ↑u ↑v)
: