Image:KleinBottle-01.png

Un article de Wikipédia, l'encyclopédie libre.

Logo Wikimedia Commons Ce fichier provient de Wikimedia Commons?. Les informations le concernant sont affichées ci-dessous (procédure).
Ci-dessous, retrouvez page de description du fichier provenant de Commons.

Contents

[edit] Summary

Standard immersion of a Klein bottle into R3. Made with Mathematica.

[edit] See also

Image:Klein bottle.svg

[edit] Licensing

Public domain I, the copyright holder of this work, hereby release it into the public domain. This applies worldwide.

In case this is not legally possible:
I grant anyone the right to use this work for any purpose, without any conditions, unless such conditions are required by law.

Afrikaans | Alemannisch | Aragonés | العربية | Asturianu | Български | Català | Česky | Cymraeg | Dansk | Deutsch | Eʋegbe | Ελληνικά | English | Español | Esperanto | Euskara | Estremeñu | فارسی | Français | Galego | 한국어 | हिन्दी | Hrvatski | Ido | Bahasa Indonesia | Íslenska | Italiano | עברית | Kurdî / كوردی | Latina | Lietuvių | Latviešu | Magyar | Македонски | Bahasa Melayu | Nederlands | ‪Norsk (bokmål)‬ | ‪Norsk (nynorsk)‬ | 日本語 | Polski | Português | Ripoarisch | Română | Русский | Shqip | Slovenčina | Slovenščina | Српски / Srpski | Svenska | ไทย | Tagalog | Türkçe | Українська | Tiếng Việt | Walon | ‪中文(简体)‬ | ‪中文(繁體)‬ | zh-yue-hant | +/-

[edit] Parameterization

This immersion of the Klein bottle into R3 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 0 \leq u < \pi:

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

For \pi \leq u < 2\pi:

x = 6 \cos u(1 + \sin u) - 4r\left(1 - \frac{\cos u}{2}\right) \cos v
y = 16 \sin u\,
z = 4r\left(1 - \frac{\cos u}{2}\right) \sin v

[edit] Mathematica source

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}]

Historique du fichier

Cliquer sur une date et une heure pour voir le fichier tel qu’il était à ce moment-là

Date et heureDimensionsUtilisateurCommentaire
actuel13 décembre 2006 à 01:39240×300 (64 Kio)Mahahahaneapneap (pngcrushed)
15 septembre 2006 à 12:21240×300 (77 Kio)Dark knight (Added transparency, unfortunately dimension rose)
4 mars 2005 à 04:23240×300 (57 Kio)Dbenbenn (losslessly compressed with pngcrush, 20% smaller)
3 mars 2005 à 19:44240×300 (71 Kio)Fropuff (Standard immersion of a Klein bottle. {{PD}})