theorem dropeq1 (_l1 _l2 n: nat): $ _l1 = _l2 -> drop _l1 n = drop _l2 n $;
_l1 = _l2 -> _l1 = _l2
_l1 = _l2 -> drop _l1 n = drop _l2 n