0
$\begingroup$

Among the three types of rotationally symmetric Pseudospherical surfaces $K=-1$ (Beltrami central, type 2 and type 3)

(http://xahlee.info/surface/gallery.html)

we have Dini twist addition term $ b\cdot \theta$ on the first classical

$$(x,y,z)=( a \text{ sech} u \cos \theta,\; a(\theta- \tanh \theta)+ b\cdot \theta,\;a \text{ sech} u \sin \theta) ;$$

that changes $K$ from (when $b=0$) $-1/a^2$ to $\dfrac{-1}{a^2+b^2}$.

Dini Twist pseudosphere

Attempting to find twisting parametrizations for types 2 and 3 by the same additional term to result in constant $K.$

From the definition of Gauss curvature we have the ODE primed on arc length $s$ as independent variable

$$ \;\kappa_1= \phi' ,\kappa_2-=\frac{\cos \phi}{r}, K= \kappa_1\kappa_2=\frac{\cos \phi\; \phi'}{r}=1/a^2$$

For visualisation purpose a numerical solution is attempted (instead of using closed form elliptic integrals representing the meridian) in order to parametrize twisted and type 2 (elliptic/conic) type 3 (hyperbolic) surfaces. Term $ b\cdot \theta$ added for Dini twist modification.

Gauss curvature is computed in the normal way, ( in terms of first and second fundamental form quotients ) and plotted below. However, it is found to vary.

Twisted PS meridians by z term  Dini addition

It appears that this Dini twist term addition cannot work for types 2 and 3, but works only for the central Beltrami PS.

Please help to find the correct parametrization of the type 2 and 3 pseudospheres.

Thanking you in anticipation.

$\endgroup$
4
  • 2
    $\begingroup$ It is mathematical, not mathematica question. Try to reformulate. $\endgroup$
    – yarchik
    Oct 3, 2020 at 13:01
  • $\begingroup$ This calculation showed such an addition fails. Tried reformulating but could not. Please help to indicate possible alternate reformulations and related references.Thanks. $\endgroup$
    – Narasimham
    Oct 3, 2020 at 13:06
  • $\begingroup$ You may be interested in ResourceFunction["GeneralizedHelicoid"] and ResourceFunction["TwistedSurface"] . I can't say if there's anything in there that solves your problem, but it may help simplify any code you write. There is also SurfaceData["DiniSurface", {"ParametricEquations", "GaussianCurvature"}] $\endgroup$
    – flinty
    Oct 3, 2020 at 13:09
  • $\begingroup$ Thanks, would go through it. $\endgroup$
    – Narasimham
    Oct 3, 2020 at 15:53

0

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.