InterestingConstructions::usage="(a) Given a curve, γ: {0, u, Sin[u]​}​, 0 < u < π, calculate (i) its Frenet trihedron, (ii) its curvature, (iii) its torsion. (b) The tubular surface of radius 1 determined by γ, that is, the surface S of vector equation r[u, v] =
R
​[u] + Cos[v]
N
​[u] + Sin[v]
B
​[u]​, 0 < u < π, 0 ≤ v < 2π, where
R
​[u] its position vector of γ. It is requested: 1 Express the surface base {​
g
u
​,
g
v
​} in the Frenet trihedron of γ. 2 Calculate the first fundamental form of S. 3 Discuss if any of the lines
γ
1
: S ⋂ y =
π
2
​​,
γ
2
: S ⋂ {x = 1}​,
γ
3
: S ⋂ {z = 0} it is an asymptotic or geodesic line of S, reasoning the answer. References: www2.caminos.upm.es; Personal. ";
Development (a):
(i) Frenet triherdon:
In[]:=
γ[u_]:={0,u,Sin[u]};​​
γ'[u]
Norm[γ'[u]]
​​
(γ'[u]γ''[u])γ'[u]
Norm[γ'[u]γ''[u]]Norm[γ'[u]]
​​
γ'[u]γ''[u]
Norm[γ'[u]γ''[u]]
In[]:=
T[u_]:=0,
1
1+
2
Abs[Cos[u]]
,
Cos[u]
1+
2
Abs[Cos[u]]
;
In[]:=
N1[u_]:=0,
Cos[u]Sin[u]
1+
2
Abs[Cos[u]]
Abs[Sin[u]]
,-
Sin[u]
1+
2
Abs[Cos[u]]
Abs[Sin[u]]
;
In[]:=
B[u_]:=-
Sin[u]
Abs[Sin[u]]
,0,0;
(ii) Its curvature:
In[]:=
κ=
Norm[γ'[u]γ''[u]]
3
Norm[γ'[u]]
Abs[Sin[u]]
3/2
(1+
2
Abs[Cos[u]]
)
;
(iii) Its torsion:
In[]:=
χ=
Det[{γ'[u],γ''[u],γ'''[u]}]
2
Norm[γ'[u]γ''[u]]
0;
It’s a flat curve.
Development (b):
1) Express the surface base {
g
u
,
g
v
} in the Frenet trihedron of γ (Tube surface: The normal plane subtended by N and B is used. It is a surface that envelops the curve as if it were a cable or hose of radius r1):
In[]:=
γ[u_]:={0,u,Sin[u]};r1=1;​​r[u,v]=γ[u]+r1(Cos[v]N1[u]+Sin[v]B[u])
-
Sin[u]Sin[v]
Abs[Sin[u]]
,u+
Cos[u]Cos[v]Sin[u]
1+
2
Abs[Cos[u]]
Abs[Sin[u]]
,Sin[u]-
Cos[v]Sin[u]
1+
2
Abs[Cos[u]]
Abs[Sin[u]]
;
In[]:=
ParametricPlot3D-
Sin[u]Sin[v]
Abs[Sin[u]]
,u+
Cos[u]Cos[v]Sin[u]
1+
2
Abs[Cos[u]]
Abs[Sin[u]]
,Sin[u]-
Cos[v]Sin[u]
1+
2
Abs[Cos[u]]
Abs[Sin[u]]
,{u,0,π},{v,0,2π}
Out[]=
2) Calculate the first fundamental form of S:
In[]:=
ResourceFunction["FirstFundamentalFormCoefficients"]-
Sin[u]Sin[v]
Abs[Sin[u]]
,u+
Cos[u]Cos[v]Sin[u]
1+
2
Abs[Cos[u]]
Abs[Sin[u]]
,Sin[u]-
Cos[v]Sin[u]
1+
2
Abs[Cos[u]]
Abs[Sin[u]]
,{u,v}//FullSimplify
Out[]=

3
(1+
2
Abs[Cos[u]]
)
2
Cos[u]
2
Sin[v]
2
(Abs[Sin[u]]-Sin[u]
′
Abs
[Sin[u]])
+
2

3/2
(1+
2
Abs[Cos[u]]
)
2
Abs[Sin[u]]
Cos[u]-Abs[Sin[u]]Cos[v](Cos[u]+
2
Abs[Cos[u]]
Cos[u]+Abs[Cos[u]]
2
Sin[u]
′
Abs
[Cos[u]])+(1+
2
Abs[Cos[u]]
)Cos[u]Cos[v]Sin[u]
′
Abs
[Sin[u]]
+
2

3/2
(1+
2
Abs[Cos[u]]
)
2
Abs[Sin[u]]
+Abs[Sin[u]]Cos[v]((1+
2
Abs[Cos[u]]
)Cos[2u]+Abs[Cos[u]]Cos[u]
2
Sin[u]
′
Abs
[Cos[u]])-(1+
2
Abs[Cos[u]]
)
2
Cos[u]
Cos[v]Sin[u]
′
Abs
[Sin[u]]

3
(1+
2
Abs[Cos[u]]
)
4
Abs[Sin[u]]
,(Cos[v]Sin[u]Sin[v](Abs[Sin[u]](2(1+
2
Abs[Cos[u]]
)Cos[u](
2
Abs[Cos[u]]
-Cos[2u])-Abs[Cos[u]](3+Cos[2u])
2
Sin[u]
′
Abs
[Cos[u]])-(1+
2
Abs[Cos[u]]
)(
2
Abs[Cos[u]]
-
2
Cos[u]
)Sin[2u]
′
Abs
[Sin[u]]))2
2
(1+
2
Abs[Cos[u]]
)
3
Abs[Sin[u]]
,
2
Sign[Sin[u]]
2
Cos[v]
+
(1+
2
Cos[u]
)
2
Sin[v]
1+Cos[u]Cos[Conjugate[u]]

They depend on the value of u and v.
3)Discussifanyofthelines
γ
1
:Sy=
π
2
,
γ
2
:S⋂{x=1},
γ
3
:S⋂{z=0}itisanasymptoticorgeodesiclineofS,reasoningtheanswer.:
Sy=
π
2

:
In[]:=
Solveu+
Cos[u]Cos
π
2
Sin[u]
1+
2
Abs[Cos[u]]
Abs[Sin[u]]
==
π
2
,u
Out[]=
u
π
2

In[]:=
ParametricPlot3D-
Sin
π
2
Sin[v]
AbsSin
π
2

,
π
2
,Sin
π
2
-
Cos[v]Sin
π
2

1+
2
AbsCos
π
2

AbsSin
π
2

,{v,0,2π}
Out[]=
In[]:=
ShowParametricPlot3D-
Sin[u]Sin[v]
Abs[Sin[u]]
,u+
Cos[u]Cos[v]Sin[u]
1+
2
Abs[Cos[u]]
Abs[Sin[u]]
,Sin[u]-
Cos[v]Sin[u]
1+
2
Abs[Cos[u]]
Abs[Sin[u]]
,{u,0,π},{v,0,2π},ContourPlot3Dy==
π
2
,{x,-5,5},{y,-5,5},{z,-5,5}
Out[]=
It must be a geodesic curve because it is the shortest and straightest route between two points on the surface, because it is a circumference.
S ⋂ {x = 1}:
It is a sinusoidal form, it must be a geodesic (it is on the surface of the tube since x = 1 and the radius of the tube (surface) is 1).
​
S ⋂ {z = 0}:
It has the behavior of a semicubic parabola, but is on the surface of tube, must be a geodesic line.
​
Here the geodesic lines of the surface appear, as you can see from circular shapes and some curves that start from a vertex (origin) in semicubical parabolic shape and curves that sinusoidal shape. In fact, all the curves are part of the geodesic lines from different angles of view. A geodesic line can also be asymptotic if it is a straight line, none of the curves studied above is straight line.