input geometriesyr16;

input donyespacetetraedre;
beginfig(1);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,20,10,600);
  DessineObjet;
%fin;
endfig;
beginfig(2);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,20,10,600);
  DessineObjetColore;
%fin;
endfig;
input donyespacecube;
beginfig(3);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,20,10,600);
  DessineObjet;
%fin;
endfig;
beginfig(4);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,20,10,600);
  DessineObjetColore;
  %fin;
endfig;
input donyespaceoctaedre;
beginfig(5);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,20,10,600);
  DessineObjet;
%fin;
endfig;
beginfig(6);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,20,10,600);
  DessineObjetColore;
%fin;
endfig;
input donyespacedodecaedre;
beginfig(7);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,30,10,600);
  DessineObjet;
%fin;
endfig;
beginfig(8);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,30,10,600);
  DessineObjetColore;
%fin;
endfig;
input donyespaceicosaedre;
beginfig(9);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,30,10,600);
  DessineObjet;
%fin;
endfig;
beginfig(10);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,30,10,600);
  DessineObjetColore;
  %fin;
endfig;
%%changement de point de vue
  input donyespacetetraedre;
beginfig(11);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,20,80,600);
  DessineObjet;
%fin;
endfig;
beginfig(12);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(10,20,80,600);
  DessineObjetColore;
%fin;
endfig;
input donyespacecube;
beginfig(13);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,20,80,600);
  DessineObjet;
%fin;
endfig;
beginfig(14);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(10,20,80,600);
  DessineObjetColore;
  %fin;
endfig;
input donyespaceoctaedre;
beginfig(15);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,20,80,600);
  DessineObjet;
%fin;
endfig;
beginfig(16);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(10,20,80,600);
  DessineObjetColore;
%fin;
endfig;
input donyespacedodecaedre;
beginfig(17);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,30,80,600);
  DessineObjet;
%fin;
endfig;
beginfig(18);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,30,80,600);
  DessineObjetColore;
%fin;
endfig;
input donyespaceicosaedre;
beginfig(19);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,30,80,600);
  DessineObjet;
%fin;
endfig;
beginfig(20);
%figure(-1.5u,-1.5u,1.5u,1.5u);
  Initialisation(5,30,80,600);
  DessineObjetColore;
%fin;
endfig;
end