var pH=[]; var cpt=0; var fHilbert=function(n,Cx,Cy,Cz,ux,uy,uz,vx,vy,vz,wx,wy,wz){ ux/=2;uy/=2;uz/=2; vx/=2;vy/=2;vz/=2; wx/=2;wy/=2;wz/=2; if (n>0) { fHilbert2(n-1,Cx-ux-vx-wx,Cy-uy-vy-wy,Cz-uz-vz-wz,-vx,-vy,-vz,ux,uy,uz,wx,wy,wz); fHilbert(n-1,Cx-ux+vx-wx,Cy-uy+vy-wy,Cz-uz+vz-wz,wx,wy,wz,ux,uy,uz,vx,vy,vz); fHilbert(n-1,Cx-ux+vx+wx,Cy-uy+vy+wy,Cz-uz+vz+wz,wx,wy,wz,ux,uy,uz,vx,vy,vz); fHilbert2(n-1,Cx-ux-vx+wx,Cy-uy-vy+wy,Cz-uz-vz+wz,-ux,-uy,-uz,-wx,-wy,-wz,-vx,-vy,-vz); fHilbert2(n-1,Cx+ux-vx+wx,Cy+uy-vy+wy,Cz+uz-vz+wz,-ux,-uy,-uz,-wx,-wy,-wz,-vx,-vy,-vz); fHilbert(n-1,Cx+ux+vx+wx,Cy+uy+vy+wy,Cz+uz+vz+wz,-wx,-wy,-wz,-ux,-uy,-uz,vx,vy,vz); fHilbert(n-1,Cx+ux+vx-wx,Cy+uy+vy-wy,Cz+uz+vz-wz,-wx,-wy,-wz,-ux,-uy,-uz,vx,vy,vz); fHilbert2(n-1,Cx+ux-vx-wx,Cy+uy-vy-wy,Cz+uz-vz-wz,vx,vy,vz,-ux,-uy,-uz,wx,wy,wz); } else { if (cpt0) { fHilbert(n-1,Cx+ux-vx-wx,Cy+uy-vy-wy,Cz+uz-vz-wz,vx,vy,vz,-ux,-uy,-uz,wx,wy,wz); fHilbert2(n-1,Cx+ux+vx-wx,Cy+uy+vy-wy,Cz+uz+vz-wz,-wx,-wy,-wz,-ux,-uy,-uz,vx,vy,vz); fHilbert2(n-1,Cx+ux+vx+wx,Cy+uy+vy+wy,Cz+uz+vz+wz,-wx,-wy,-wz,-ux,-uy,-uz,vx,vy,vz); fHilbert(n-1,Cx+ux-vx+wx,Cy+uy-vy+wy,Cz+uz-vz+wz,-ux,-uy,-uz,-wx,-wy,-wz,-vx,-vy,-vz); fHilbert(n-1,Cx-ux-vx+wx,Cy-uy-vy+wy,Cz-uz-vz+wz,-ux,-uy,-uz,-wx,-wy,-wz,-vx,-vy,-vz); fHilbert2(n-1,Cx-ux+vx+wx,Cy-uy+vy+wy,Cz-uz+vz+wz,wx,wy,wz,ux,uy,uz,vx,vy,vz); fHilbert2(n-1,Cx-ux+vx-wx,Cy-uy+vy-wy,Cz-uz+vz-wz,wx,wy,wz,ux,uy,uz,vx,vy,vz); fHilbert(n-1,Cx-ux-vx-wx,Cy-uy-vy-wy,Cz-uz-vz-wz,-vx,-vy,-vz,ux,uy,uz,wx,wy,wz); } else { if (cpt