Page 3 sur 3

Re: À propos de la routine surface()

Posté : sam. 4 juil. 2015, 11:30
par GM
Déterrage d'un ancien sujet pour dire, que dans mes 3 exemples de la page :
  • il y avait une erreur de notation, répétée plusieurs fois : CH qui devait être CB. J'ai corrigé.
  • il n'y avait pas utilité d'utiliser des "pairs" et "arc"... alors qu'il existe "Arc" utilisant des "triples".

Code : Tout sélectionner

settings.render=4; import graph3; import gm;
size(8cm);
currentprojection=orthographic(-20,-10,20);

real AO=15, OH=7, HC=6, OC=OH+HC, AH=sqrt(AO^2-OH^2), CB=sqrt(AO^2-OC^2), ep=.8;
triple O=(0,0,0), H=(-OH,0,0), A=(-OH,AH,0), C=(-OC,0,0), B=(-OC,-CB,0);

path3 p= O--Arc(c=O,v1=A,v2=B,normal=-Z)--cycle;
transform3 t=shift(0,0,ep);

draw(extrude(p,ep*Z),blue,nolight);
draw(surface(p^^(t*p)),paleblue,nolight);

cote3D(Label(format("$%f\,\textrm{cm}$",OH),red),O,H,offset=0);
cote3D(Label(format("$%f\,\textrm{cm}$",HC),red),H,C,offset=0);
cote3D(Label(format("$%f\,\textrm{cm}$",AO),red),O,A);
cote3D(Label("$x$",red),H,A,offset=0);
cote3D(Label("$y$",red),C,B,offset=0);
Ma définition de cote3D est ici : http://svn.noordover.org/publ/depot_pub ... ers/gm.asy