At:
l before decomp1
1.
T: Type
2.
L: T List
3.
x: T
4.
y: T
5.
x before y L A,B:T List. L = (A @ B) & (x A) & (y B)
By:
Unfold `l_before` -1
THEN
Lemmaize [-1]
THEN
InductionOnList
Generated subgoals:
3. u: T 4. v: T List 5. x,y:T. [x; y] v (A,B:T List. v = (A @ B) & (x A) & (y B)) x,y:T. [x; y] [u / v] (A,B:T List. [u / v] = (A @ B) & (x A) & (y B))