/*************************************************************************************************************************************/ /* */ /* D E F I N I T I O N D E L A S P I R A L E D E B O U T E I L L E S D E J E E N E R : */ /* */ /* */ /* Definition de la surface (due a Patrice Jeener, 'v $xrs/bKlein.G1$K') : */ /* */ /* Elle est definie parametriquement */ /* en fonction des deux parametres 'u' */ /* et 'v' : */ /* */ /* W(u,v) = J.sin(K.v) + L */ /* */ /* v */ /* --- */ /* A */ /* F (u,v) = e .[(B.cos(C.v)) + (D.cos(E.v)) + (F.W(u,v).sin(G.v).cos(H.u))] */ /* x */ /* */ /* v */ /* --- */ /* A */ /* F (u,v) = e .[(B.sin(C.v)) - (D.sin(E.v)) + (F.W(u,v).cos(G.v).cos(H.u))] */ /* y */ /* */ /* v */ /* --- */ /* A */ /* F (u,v) = e .W(u,v).sin(I.u) */ /* z */ /* */ /* avec : */ /* */ /* u ∈ [ -pi, +pi ] */ /* */ /* v ∈ [ -2.pi, +2.pi ] */ /* */ /* et : */ /* */ /* A = +10 */ /* B = +8 */ /* C = +1 */ /* D = +1 */ /* E = B */ /* F = -9/16 */ /* G = +7/2 */ /* H = +1 */ /* I = +1 */ /* J = +1 */ /* K = +9 */ /* L = +3/2 */ /* */ /* en general... */ /* */ /* */ /*************************************************************************************************************************************/