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