/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        G E N E R A T I O N   D U   T E T R A E D R E   R E G U L I E R  :                                                         */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xtc/TetraedreRegulier.01$vv$c' :                                                                               */
/*                                                                                                                                   */
/*                    Jean-Francois COLONNA (LACTAMME, 20261006081131).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
#define   NSOMMETS  4
#define   NARETES   6
#include  "Polyedres.01.vv.I"
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        G E N E R A T I O N   D E S   S O M M E T S   D U   D O D E C A E D R E  :                                                 */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
double    Xmin_Tetraedre=+INFINI,Ymin_Tetraedre=+INFINI,Zmin_Tetraedre=+INFINI;
double    Xmax_Tetraedre=-INFINI,Ymax_Tetraedre=-INFINI,Zmax_Tetraedre=-INFINI;
                                        /* Extrema du dodecaedre=.                                                                   */
static    void      tetraedron(void)
          {
          int       n=0;
          p[n++] = (POINT){+1,+1,+1};
          p[n++] = (POINT){-1,-1,+1};
          p[n++] = (POINT){-1,+1,-1};
          p[n++] = (POINT){+1,-1,-1};
          EXTREMA_SOMMETS(Xmin_Tetraedre,Ymin_Tetraedre,Zmin_Tetraedre,Xmax_Tetraedre,Ymax_Tetraedre,Zmax_Tetraedre);
          }
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        P R O G R A M M E   P R I N C I P A L  :                                                                                   */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
void      main(int argc,char *argv[])
          {
          if        (argc >= 2)
                    {
                    GET_ARGUMENT(1,futur_epsilon1,epsilon1);
                    if        (argc >= 3)
                              {
                              GET_ARGUMENT(2,futur_epsilon2,epsilon2);
                              if        (argc >= 4)
                                        {
                                        printf("Les arguments en sur-nombre sont ignores.\n");
                                        }
                              else
                                        {
                                        }
                              }
                    else
                              {
                              }
                    }
          else
                    {
                    }
          tetraedron();
          EDITIONS_FINALES("Tetraedre"
                          ,Xmin_Tetraedre,Ymin_Tetraedre,Zmin_Tetraedre
                          ,Xmax_Tetraedre,Ymax_Tetraedre,Zmax_Tetraedre
                           );
          bonds("Tetraedre");
          return;
          }