INDUCTIVE DEFINITION drop () [ ]
OF ARITY natnatCCProp
BUILT FROM:
     drop_refl: c:C.(drop O O c c)
   | drop_drop: k:K
                         .h:nat
                           .c:C.e:C.(drop (r k h) O c e)u:T.(drop (S h) O (CHead c k u) e)
   | drop_skip: k:K
                         .h:nat
                           .d:nat
                             .c:C
                               .e:C
                                 .drop h (r k d) c e
                                   u:T.(drop h (S d) (CHead c k (lift h (r k d) u)) (CHead e k u))