Definition rho (h : TypeSpeed) : R := (g * (tan MaxBank / h))%R.Definition r (h : TypeSpeed) : R := (h / rho h)%R.Definition rho_ub (h : TypeSpeed) : R := (g * (tan_ub_MaxBank / h))%R.Definition rho_lb (h : TypeSpeed) : R := (g * (tan_lb_MaxBank / h))%R.

Lemma g_pos : (0 < g)%R.