OrthopticSurfaceHyperbolicParaboloid::usage="The orthoptic surface of a surface is the geometric locus of the points through which pass 3 planes orthogonal to each other and tangents to the original surface. References: Personal.";
Development:
Obtaining the orthoptic surface of the hyperbolic paraboloid -:
2
x
9
2
y
4
=z
Let the tangent plane (where the normal vector is an unitary vector):
Ax+By+Cz==D;
Condition of tangent between a plane and a hyperbolic paraboloid with saddle point at the origin:
Tangent plane:
2x
x
0
2
a
2y
y
0
2
b
z
0
A
C
B
C
D
C
x
0
A
2
a
2C
y
0
B
2
b
2C
z
0
D
C
Sustituting the point {,,} in the hyperbolic paraboloid’s equation and simplifying:
x
0
y
0
z
0
1
2
a
2
-
A
2
a
2C
1
2
b
2
B
2
b
2C
D
C
2
A
2
a
2
B
2
b
So for the hyperbolic paraboloid that concerns us:
9-4==-4CD;
2
A
2
B
So for the three planes we have:
9-4==-4;9-4==-4;9-4==-4;
2
A
1
2
B
1
C
1
D
1
2
A
2
2
B
2
C
2
D
2
2
A
3
2
B
3
C
3
D
3
Adding member to member the three equations and considering that the rows of an orthogonal matrix are also unit vectors:
-4(++)==9++-4++;-4(++)==9(1)-4(1)==5;
C
1
D
1
C
2
D
2
C
3
D
3
2
A
1
2
A
2
2
A
3
2
B
1
2
B
2
2
B
3
C
1
D
1
C
2
D
2
C
3
D
3
Since the three normal vectors are mutually orthogonal and unitary, (and by properties of orthogonal matrices) it is simplified to:
-4(++)==-4(x+y+z)-4(x+y+z)-4(x+y+z);
C
1
D
1
C
2
D
2
C
3
D
3
C
1
A
1
B
1
C
1
C
2
A
2
B
2
C
2
C
3
A
3
B
3
C
3
-4(++)==-4x(++)-4y(++)-4z++;-4(++)==-4x(0)-4y(0)-4z(1);-4(++)==-4z;
C
1
D
1
C
2
D
2
C
3
D
3
C
1
A
1
C
2
A
2
C
3
A
3
C
1
B
1
C
2
B
2
C
3
B
3
2
C
1
2
C
2
2
C
3
C
1
D
1
C
2
D
2
C
3
D
3
C
1
D
1
C
2
D
2
C
3
D
3
So it turns out how we expected Monge’s plane: == -- which is the orthoptic surface of the hyperbolic paraboloid. There are many similarities in 2D with the parabola and its orthoptic curve, the directrix. Finally, the equation sought is:
z
2
a
2
b
4
z==-;
5
4
Animation:
In[]:=
Manipulatea2=9;b2=4;u1[α_,β_]:={Sin[α]Sin[β],Cos[β],Cos[α]Sin[β]};u2[α_]:={Cos[α],0,-Sin[α]};u3[α_,β_]:={Sin[α]Cos[β],-Sin[β],Cos[α]Cos[β]};d1[α_,β_]:=-;d2[α_]:=-;d3[α_,β_]:=-;q[α_,β_]:=d1[α,β]u1[α,β]+d2[α]u2[α]+d3[α,β]u3[α,β];ShowContourPlot3D-==z,{x,-16,16},{y,-16,16},{z,-16,16},ColorFunction->"SolarColors",MeshNone,MaxRecursion->3,ContourPlot3Dz==-,{x,-16,16},{y,-16,16},{z,-16,16},ContourStyle{Green,Opacity[0.5]},MeshNone,If[u1[α,β][[3]]≠0,Graphics3D[{Gray,Opacity[0.5],Hyperplane[u1[α,β],d1[α,β]]}],Nothing],If[u2[α][[3]]≠0,Graphics3D[{Gray,Opacity[0.5],Hyperplane[u2[α],d2[α]]}],Nothing],If[u3[α,β][[3]]≠0,Graphics3D[{Gray,Opacity[0.5],Hyperplane[u3[α,β],d3[α,β]]}],Nothing],If[u1[α,β][[3]]≠0&&u2[α][[3]]≠0&&u3[α,β][[3]]≠0,Graphics3D[{Black,Thick,Sphere[q[α,β],0.3],Line[{q[α,β],q[α,β]+3u1[α,β]}],Line[{q[α,β],q[α,β]+3u2[α]}],Line[{q[α,β],q[α,β]+3u3[α,β]}]}],Nothing],BoxRatios->Automatic,Axes->True,BoxedFalse,AxesOrigin->{0,0,0},AxesLabel->{x,y,z},PlotRange->16,ImageSize->900,ViewPoint{5,-2.4,2.},Style["Orthoptic surface: Monge's plane",Bold,Large],{{α,0.00002,"α angle (Turn H)"},0.000001,2π,0.00001},Delimiter,β,,"β angle (Turn V)",-,,0.00001,ControlPlacement->Top,AutorunSequencing->{1,2}
a2-b2
2
u1[α,β][[1]]
2
u1[α,β][[2]]
4u1[α,β][[3]]
a2-b2
2
u2[α][[1]]
2
u2[α][[2]]
4u2[α][[3]]
a2-b2
2
u3[α,β][[1]]
2
u3[α,β][[2]]
4u3[α,β][[3]]
2
x
9
2
y
4
5
4
π
4
π
2
π
2
Out[]=
Note: It should be remembered that the tangent plane at any point of a hyperbolic paraboloid intersects two generatrix lines (it is a double-ruled surface) that intersect at that point, unlike an ellipsoid or a sphere where the tangent point is an isolated point.
These points on a hyperbolic paraboloid are called hyperbolic points (negative Gauss curvature).
These points on a hyperbolic paraboloid are called hyperbolic points (negative Gauss curvature).

