fixed wolf shape in Clifford torus

This commit is contained in:
Zeno Rogue 2023-01-07 20:40:57 +01:00
parent 64b5c52b80
commit 14d6e33768
2 changed files with 3 additions and 3 deletions

View File

@ -493,7 +493,7 @@ void geometry_information::make_skeletal(hpcshape& sh, ld push) {
hyperpoint yzspin(ld alpha, hyperpoint h) {
if(gproduct) return product::direct_exp(cspin(1, 2, alpha) * product::inverse_exp(h));
else if(embedded_plane && geom3::sph_in_low()) {
else if(embedded_plane && moved_center()) {
h = gpushxto0(tile_center()) * h;
h = cspin(1, 2, alpha) * h;
h = rgpushxto0(tile_center()) * h;

View File

@ -387,8 +387,6 @@ EX ld edge_of_triangle_with_angles(ld alpha, ld beta, ld gamma) {
}
EX hyperpoint hpxy(ld x, ld y) {
if(sl2) return hyperpoint(x, y, 0, sqrt(1+x*x+y*y));
if(rotspace) return hyperpoint(x, y, 0, sqrt(1-x*x-y*y));
if(embedded_plane) {
geom3::light_flip(true);
hyperpoint h = hpxy(x, y);
@ -396,6 +394,8 @@ EX hyperpoint hpxy(ld x, ld y) {
swapmatrix(h);
return h;
}
if(sl2) return hyperpoint(x, y, 0, sqrt(1+x*x+y*y));
if(rotspace) return hyperpoint(x, y, 0, sqrt(1-x*x-y*y));
return PIU(hpxyz(x,y, translatable ? 1 : sphere ? sqrt(1-x*x-y*y) : sqrt(1+x*x+y*y)));
}