广义表的表头和表尾的求解

举例子：
已知L=（a,b,c,((d)），求表中的d。
L1=Tail(L); //L1=(b,c,(d));
L2=Tail(L1);//L2=(c,(d));
L3=Tail(L2);//L3=((d));
L4=Head(L3);//L4=(d)
L5=Head(L4);//L5=d;

Head(Head(Tail(Tail((Tail(a,b,c,((d)))))))