unfold MaxBank in |- *; unfold Rdiv in |- *; apply Rmult_lt_0_compat.
prove_sup.
apply Rinv_0_lt_compat; prove_sup.
unfold plat in |- *; prove_sup.
apply Rinv_0_lt_compat; apply PI_RGT_0.
Qed.

Lemma trkrate0 : trkrate (mkBank 0 cond1_0 cond2_0) = 0%R.
Proof with trivial.