let aime-1983-p9 = `!x:real.
    (&0 < x /\ x < pi) ==>
    &12 <= ((&9 * (x pow 2 * (sin x) pow 2)) + &4) / (x * sin x)`;;