DEFINITION le_trans()
TYPE =
       n:nat.m:nat.p:nat.(le n m)(le m p)(le n p)
BODY =
Show proof