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