proposition: Lemma l_is_pos : (0 <= l)%R.
proof: Proof. unfold l in |- *; unfold Die in |- *; apply sqrt_positivity; apply Rplus_le_le_0_compat; apply Rle_0_sqr. Qed.
imports: Bool Reals trajectory_const rrho trajectory_def constants ycngftys ycngstys Omega