e : tactic -> goalstack
# g `(HD[1;2;3] = 1) /\ (TL[1;2;3] = [2;3])`;; val it : goalstack = 1 subgoal (1 total) `HD [1; 2; 3] = 1 /\ TL [1; 2; 3] = [2; 3]` # e CONJ_TAC;; val it : goalstack = 2 subgoals (2 total) `TL [1; 2; 3] = [2; 3]` `HD [1; 2; 3] = 1` # e (REWRITE_TAC[HD]);; val it : goalstack = 1 subgoal (1 total) `TL [1; 2; 3] = [2; 3]` # e (REWRITE_TAC[TL]);; val it : goalstack = No subgoals