czech:Kleinova láhev je těleso,ve kterém nelze přejít přes okraj. Technicky vzato má jen jednu stranu. V knize Hravá matematika od Radka Chajdy jsem našel otázku: lze do Kleinovy láhve něco nalít? Ano lze do ní něco nalít a ještě není potřeba víčko.

Lukáš HOZDA 1.11.2009

File:KleinBottle-01.svg是此文件的矢量版本。 如果此文件质量不低于原点阵图，就应该将这个PNG格式文件替换为此文件。 File:KleinBottle-01.png → File:KleinBottle-01.svg 更多信息请参阅Help:SVG/zh。 其他语言 Alemannisch ∙ Bahasa Indonesia ∙ Bahasa Melayu ∙ British English ∙ català ∙ čeština ∙ dansk ∙ Deutsch ∙ eesti ∙ English ∙ español ∙ Esperanto ∙ euskara ∙ français ∙ Frysk ∙ galego ∙ hrvatski ∙ Ido ∙ italiano ∙ lietuvių ∙ magyar ∙ Nederlands ∙ norsk bokmål ∙ norsk nynorsk ∙ occitan ∙ Plattdüütsch ∙ polski ∙ português ∙ português do Brasil ∙ română ∙ Scots ∙ sicilianu ∙ slovenčina ∙ slovenščina ∙ suomi ∙ svenska ∙ Tiếng Việt ∙ Türkçe ∙ vèneto ∙ Ελληνικά ∙ беларуская (тарашкевіца) ∙ български ∙ македонски ∙ нохчийн ∙ русский ∙ српски / srpski ∙ татарча/tatarça ∙ українська ∙ ქართული ∙ հայերեն ∙ বাংলা ∙ தமிழ் ∙ മലയാളം ∙ ไทย ∙ 한국어 ∙ 日本語 ∙ 简体中文 ∙ 繁體中文 ∙ עברית ∙ العربية ∙ فارسی ∙ +/−

 

本文件是希伯来语维基百科特色图片（תמונות מומלצות），并被视为最好的图像之一。 如果你认为本文件应该被选为维基共享资源特色内容，请推荐本文件。 如果你拥有相似质量的可采用适当著作权许可协议发布的图像，一定要上传、标记并推荐它。

Image:Klein bottle.svg

我，本作品著作权人，释出本作品至公有领域。这适用于全世界。 在一些国家这可能不合法；如果是这样的话，那么： 我无条件地授予任何人以任何目的使用本作品的权利，除非这些条件是法律规定所必需的。

This immersion of the Klein bottle into R³ is given by the following parameterization. Here the parameters u and v run from 0 to 2π and r is a fixed positive constant.

For ${\displaystyle 0\leq u<\pi }$:

${\displaystyle x=6\cos u(1+\sin u)+4r\left(1-{\frac {\cos u}{2}}\right)\cos u\cos v}$

${\displaystyle y=16\sin u+4r\left(1-{\frac {\cos u}{2}}\right)\sin u\cos v}$

${\displaystyle z=4r\left(1-{\frac {\cos u}{2}}\right)\sin v}$

For ${\displaystyle \pi \leq u<2\pi }$:

${\displaystyle x=6\cos u(1+\sin u)-4r\left(1-{\frac {\cos u}{2}}\right)\cos v}$

${\displaystyle y=16\sin u\,}$

${\displaystyle z=4r\left(1-{\frac {\cos u}{2}}\right)\sin v}$

KleinBottle[r_:1] =
 Function[{u, v},
   UnitStep[Sin[u]]
   {
       6 Cos[u](1 + Sin[u]) + 4r(1 - Cos[u]/2) Cos[u]Cos[v],
       16 Sin[u] + 4r(1 - Cos[u]/2) Sin[u]Cos[v],
       4r(1 - Cos[u]/2) Sin[v]
   }
   + (1 - UnitStep[Sin[u]])
   {
       6 Cos[u](1 + Sin[u]) - 4r(1 - Cos[u]/2) Cos[v],
       16 Sin[u],
       4r(1 - Cos[u]/2) Sin[v]
   }
 ]

 ParametricPlot3D[Evaluate[KleinBottle[][u, v]], {u, 0, 2Pi}, {v, 0, 2Pi},
   PlotPoints -> {50, 19}, Boxed -> False, Axes -> False,
   ViewPoint -> {0.454, -2.439, -2.301}]