//trees J*t(I n,I m){J*p=malloc(24);*p=n,p[1]=m?(J)t(2*n-1…
//trees
J*t(I n,I m){J*p=malloc(24);*p=n,p[1]=m?(J)t(2*n-1,m-1):0,p[2]=m?(J)t(2*n,m-1):0;R p;}
V u(J*p){if(p[1])u((J*)p[1]),u((J*)p[2]);free(p);}
I c(J*p){R p[1]?*p+c((J*)p[1])-c((J*)p[2]):*p;}