At:
l before-iff2112
1.
T: Type
2.
L: T List
3.
u: T
4.
v: T List
5.
x,y:T. x before y v (L1,L2,L3:T List. v = (L1 @ [x] @ L2 @ [y] @ L3))
6.
x: T
7.
y: T
8.
x before y v L1,L2,L3:T List. [u / v] = (L1 @ [x] @ L2 @ [y] @ L3)
By:
InstHyp [x;y] -4
THEN
ThinTrivial
THEN
Analyze -1
THEN
InstConcl [[u / L1]]
Generated subgoal: