####################################################################################################################################### # # # G E N E R A T I O N D ' U N P S E U D O - T O R E " E P Y C Y C L O I D A L " T R I D I M E N S I O N N E L : # # # # # # Author of '$xiirs/.EPIC.41.1.$U' : # # # # Jean-Francois Colonna (LACTAMME, 20170113095825). # # # ####################################################################################################################################### $Z setParam _____Zoom 0.064 $Z setParam _____RotationX 1.0 $Z setParam _____EpicycloidePara "$K_VIDE" $Z setParam _____Redirection "$K_VIDE" $Z eval $xrs/epicycloide.21$X \ $Z np=1 brume=FAUX \ $Z PARAMETRE_Ra=+0.8 \ $Z PARAMETRE_Rb=+0.8 \ $Z PARAMETRE_B=$PaRaMeTrE_B \ $Z PARAMETRE_C=$PaRaMeTrE_C \ $Z PARAMETRE_D=$PaRaMeTrE_D \ $Z PARAMETRE_E=$PaRaMeTrE_E \ $Z PARAMETRE_F=$PaRaMeTrE_F \ $Z PARAMETRE_G=$PaRaMeTrE_G \ $Z PARAMETRE_H=$PaRaMeTrE_H \ $Z PARAMETRE_I=$PaRaMeTrE_I \ $Z PARAMETRE_M=$PaRaMeTrE_M \ $Z PARAMETRE_N=$PaRaMeTrE_N \ $Z PARAMETRE_O=$PaRaMeTrE_O \ $Z PARAMETRE_P=$PaRaMeTrE_P \ $Z nombre_paralleles=20 \ $Z nombre_points_entre_deux_paralleles=4 \ $Z nombre_meridiens=640 \ $Z nombre_points_entre_deux_meridiens=10 \ $Z faciliter_parametrage_u_v=VRAI \ $Z Vrayon=0.12 \ $Z ZOOM=$_____Zoom \ $Z ROTATION_OX=$_____RotationX \ $Z normale=FAUX \ $Z Lz=1000 \ $Z N_AU_CARRE=VRAI message_N_AU_CARRE=FAUX \ $Z $_____EpicycloidePara \ $Z chiffres=0 \ $Z R=$_____ImageR \ $Z $formatI \ $Z $_____Redirection $Z # Le 'eval' est indispensable a cause de l'eventuelle '$_____Redirection'... #