DEFINITION land_ind()
TYPE =
       A:Prop.B:Prop.P:Prop.(ABP)(land A B)P
BODY =
Show proof