
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* D E F I N I T I O N D E S T R O I S F O N C T I O N S ' F ' : */
/* */
/* */
/* Definition : */
/* */
/* Le tore est defini parametriquement */
/* en fonction des deux parametres 'u' */
/* (appele aussi 'distance polaire' ou */
/* 'teta' ou encore 'latitude') et 'v' */
/* (appele aussi 'longitude' ou 'phi') : */
/* */
/* XPlan(u,v) = B.cos(C,v) - D.cos(E.v) */
/* YPlan(u,v) = F.sin(G.v) - H.sin(I.v) */
/* Definition d'une courbe plane "epycycloidale". */
/* */
/* dXPlan(u,v) = d#XPlan(u,v) */
/* dYPlan(u,v) = d#YPlan(u,v) */
/* La tangente T est donc {+dXPlan(u,v),+dYPlan(u,v). */
/* */
/* Psi(u,v) = arctg(-dXPlan(u,v),+dYPlan(u,v)) */
/* La normale N est perpendiculaire a la normale T */
/* et est donc {+dYPlan(u,v),-dXPlan(u,v)}. */
/* */
/* Xellipse(u,v) = Ra.cos(u) */
/* Yellipse(u,v) = 0 */
/* Zellipse(u,v) = Rb.sin(u) */
/* Definition d'une ellipse dans le plan {OX,OZ}. */
/* */
/* F (u,v) = [Xellipse(u,v)*cos(psi)] - [Yellipse(u,v)*sin(psi)] + XPlan(u,v) */
/* x */
/* */
/* F (u,v) = [Xellipse(u,v)*sin(psi)] + [Yellipse(u,v)*cos(psi)] + YPlan(u,v) */
/* y */
/* */
/* F (u,v) = Zellipse(u,v) */
/* z */
/* Definition d'une ellipse dont le centre est le point */
/* courant {XPlan(u,v),YPlan(u,v),0} et situee dans le */
/* plan {N,OZ}. */
/* */
/* et (parametres par defaut) : */
/* */
/* A=8 */
/* a=1 */
/* L=4 */
/* */
/* B=A+a */
/* C=1 */
/* D=L.a */
/* E=(A+a)/a */
/* */
/* F=A+a */
/* G=1 */
/* H=L.a */
/* I=(A+a)/a */
/* */
/* avec : */
/* */
/* u E [ 0 , 2.p ] */
/* */
/* v E [ 0 , 2.p ] */
/* */
/* (ou 'p' designe 'pi'). */
/* */
/* Tout ceci est tres inspire de 'v $xtc/epycycloide.03$c' */
/* en faisant : */
/* */
/* u = phi E [0,2.p] */
/* v = teta E [0,2.p] */
/* */
/* */
/*************************************************************************************************************************************/