apply LList.cons_hcongr
case cons
α : Sort u_1
l m n : Nat
bs : LList α m
cs : LList α n
n✝ : Nat
a✝ : α
as✝ : LList α n✝
ih : (as✝.append bs).append cs ≅ as✝.append (bs.append cs)
⊢ a✝ :: (as✝.append bs).append cs ≅ a✝ :: as✝.append (bs.append cs)
case cons.a
α : Sort u_1
l m n : Nat
bs : LList α m
cs : LList α n
n✝ : Nat
a✝ : α
as✝ : LList α n✝
ih : (as✝.append bs).append cs ≅ as✝.append (bs.append cs)
⊢ α = α

case cons.a
α : Sort u_1
l m n : Nat
bs : LList α m
cs : LList α n
n✝ : Nat
a✝ : α
as✝ : LList α n✝
ih : (as✝.append bs).append cs ≅ as✝.append (bs.append cs)
⊢ n + (m + n✝) = n + m + n✝

case cons.a
α : Sort u_1
l m n : Nat
bs : LList α m
cs : LList α n
n✝ : Nat
a✝ : α
as✝ : LList α n✝
ih : (as✝.append bs).append cs ≅ as✝.append (bs.append cs)
⊢ a✝ ≅ a✝

case cons.a
α : Sort u_1
l m n : Nat
bs : LList α m
cs : LList α n
n✝ : Nat
a✝ : α
as✝ : LList α n✝
ih : (as✝.append bs).append cs ≅ as✝.append (bs.append cs)
⊢ (as✝.append bs).append cs ≅ as✝.append (bs.append cs)