EQ_LENGTH_INDUCT_TAC reduces a goal
 !x y . (LENGTH x = LENGTH y) ==> t[x,y],
 where x and y range over lists, to two
subgoals corresponding to the base and step cases in a proof by 
induction on the length of x and y. The induction hypothesis appears among
the assumptions of the
subgoal for the step case.  The specification of EQ_LENGTH_INDUCT_TAC is:
         A ?- !x y . (LENGTH x = LENGTH y) ==> t[x,y]
   ====================================================  EQ_LENGTH_INDUCT_TAC
                            A ?- t[NIL/x][NIL/y]
    A u {{LENGTH x = LENGTH y, t[x'/x, y'/y]}} ?- 
         !h h'. t[(CONS h x)/x, (CONS h' y)/y]