DEFINITION lt_x_O()
TYPE =
       ∀x:nat.(lt x O)→∀P:Prop.P
BODY =
Show proof