DEFINITION llt_head_sx()
TYPE =
∀
a1:
A
.
∀
a2:
A
.(
llt
a1 (
AHead
a1 a2))
BODY =
Show proof