At:
append commutes under sublist
1
1
1
1
1
1
1.
T: Type
2.
Discrete{T}
3.
eq: {T
}
4.
eq
T
T

5.
x:T. eq(x,x)
6.
x,y:T. eq(x,y) 
eq(y,x)
7.
x,y,z:T. eq(x,y) 
eq(y,z) 
eq(x,z)
8.
L: T List
9.
M: T List
10.
EQ: {T=
}
11.
EQ
T
T

12.
x,y:T. EQ(x,y) 
x = y
13.
z: T
14.
z(
EQ) (L @ M)
z(
EQ) (M @ L)
By:
Inst
Thm*
T:Type, EQ:{T=
}. EQ
{T
}
[T;EQ]
Generated subgoal:
1 | 15. EQ {T } z( EQ) (M @ L) |
About: