Spirallift
Sándor Kabai
https://www.pacospiralift.com/solutions/spiralift-solutions/
A coiled band with a vertical surface is unreeled and a coiled band with a horizontal surface are extended simultaneously. While moving in the upward direction they engage to form a rigid column. This concept can be used for creating a lifting device.
https://www.pacospiralift.com/solutions/spiralift-solutions/
A coiled band with a vertical surface is unreeled and a coiled band with a horizontal surface are extended simultaneously. While moving in the upward direction they engage to form a rigid column. This concept can be used for creating a lifting device.
In[]:=
Manipulate[dia=0.8;p=0.8;vert=ParametricPlot3D[{Cos[β],Sin[β],pβ/2/Pi+v},{β,0,βact},{v,0,p},MeshNone,BoundaryStyleBlack,PerformanceGoal"Quality"][[1]];hor={ParametricPlot3D[{rCos[β],rSin[β],pβ/2/Pi},{β,0,βact},{r,dia,1.3},MeshNone,BoundaryStyleBlack,PlotStyle{Cyan},PerformanceGoal"Quality"][[1]]};horbase={ParametricPlot3D[{rCos[α],rSin[α],pα/2/Pi/2},{α,0,-2Pi},{r,dia,1.3},MeshNone,BoundaryStyleBlack,PlotStyle{Cyan},PerformanceGoal"Quality"][[1]]};horbase1={ParametricPlot3D[{rCos[α],rSin[α],0.1α/2/Pi/2-0.35},{α,-2Pi,-10Pi-10Pi/βact},{r,dia,1.3},PlotStyle{Cyan},MeshNone,BoundaryStyleBlack,PerformanceGoal"Quality"][[1]]};reel=Cylinder[{{0.18,0,0},{0.18,0,0.8}},0.79];Graphics3D[{reel,vert,hor,horbase,horbase1},ViewPoint{3,-10,2},BoxedFalse,SphericalRegionTrue,ImageSize400,PlotRange{{-2,2},{-2,2},{-1,4}},ViewAngle0.1],{{βact,7.6Pi,"thread length"},0.1,7.6Pi,0.01},TrackedSymbols{βact}]
Out[]=
