Sculpture en verre

Pour toute demande d'aide sur des exemples non finalisés, c'est ici.
Les exemples aboutis et intéressants seront ajoutés aux sous-forums qui suivent.

Règles du forum
Pour toute demande d'aide pour la conception (ou la confirmation d'un code) d'une figure Asymptote, c'est ici.

J'invite ceux qui ont régulièrement des questions à poser à aller dans leur panneau de l'utilisateur pour indiquer dans la signature de leurs messages :

  1. Nom du système d'exploitation (W7 ou Ubuntu 12.04 ou ...)
  2. Version d'Asymptote et éditeur utilisé pour les figures Asymptote
  3. Distribution LaTeX et éditeur utilisé pour les tex.


On va gagner du temps dans les réponses !
Fabrice
Messages : 111
Enregistré le : sam. 13 mars 2010, 11:41

Sculpture en verre

Message non lu par Fabrice » ven. 2 nov. 2018, 12:54

Bonjour,

L'idée est de proposer une figure pour une correction d'un devoir maison proposant l'exercice suivant :

" Un artiste veut concevoir une sculpture composée d'une boule en verre à l'intérieur de laquelle se trouve emprisonné un cylindre de vide.
L'artiste souhaite que la sphère soit de diamètre 60 centimètres et que le cylindre soit de diamètre 20 centimètres.
Les bases du cylindre sont des cercles de la sphère.
Calculer la masse de la sculpture."

J'ai fait le code suivant mais cela ne doit pas être correct car le point C ne se trouve pas à la fois sur le cylindre et sur la boule.
Merci.
Fabrice

Code : Tout sélectionner

import solids;

size(7cm);

currentprojection=perspective(
camera=(10.1022246017574,0.0246057107509454,2.43708516399144),
up=(-0.00740713239330967,-0.00041758572018715,0.0307068297952407),
target=(-0.000134346968299504,0.000250190865872746,-0.000164514310995401),
zoom=0.911465703581417,
angle=36.6515981588573,
autoadjust=false);

real r=1;
real h=4*sqrt(2);
real R=3;

triple Centre=(0,0,0);
triple centre=(0,0,-h/2);
triple pB=(0,r,0);
triple pC=(r,r,h/2);

dotfactor=3.5;


surface s=shift(Centre)*scale3(R)*unitsphere;

surface c=shift(centre)*zscale3(h)*scale3(r)*unitcylinder;

draw(s,lightblue+opacity(0.1));

draw(c,lightblue+opacity(0.1));

draw(Centre--pB--pC--cycle,dashed);

dot(Centre,blue);
dot(pC,red);
dot(pB,green);

label("$A$",Centre,SW);
label("$B$",pB,E);
label("$C$",pC,E);
Debian Strech + Asymptote 2.42-12 + Emacs24 + TeXLive 2017

Avatar du membre
GM
Administrateur du site
Administrateur du site
Messages : 1364
Enregistré le : dim. 7 mars 2010, 14:50

Re: Sculpture en verre

Message non lu par GM » ven. 2 nov. 2018, 17:39

Fabrice a écrit :
ven. 2 nov. 2018, 12:54
J'ai fait le code suivant mais cela ne doit pas être correct car le point C ne se trouve pas à la fois sur le cylindre et sur la boule.
Bonsoir,

rien d'étonnant en ayant donné comme valeur r à l'abscisse de C.

Les point (0,r,h/2) et (r,0,h/2) sont sur le cylindre mais pas (r,r,h/2).
Index des fonctions - Exemple de lien donnant le résultat d'une recherche sur les mots 'arc' et 'triple' : http://asy.marris.fr/indexasy/?filtre=arc triple
Mes configurations (le 10/10/17) :
PC n°1 :Windows 10 - Asymptote(2.41)+MikTeX2.9 - Editeurs : Notepad++ et TeXworks.
Mes autres PC :Ubuntu 16.04LTS - Asymptote(2.42 git) + TexLive2017 - Editeur : TeXworks.
Merci de préciser la votre pour faciliter l'aide des autres !

Fabrice
Messages : 111
Enregistré le : sam. 13 mars 2010, 11:41

Re: Sculpture en verre

Message non lu par Fabrice » sam. 3 nov. 2018, 11:59

Bonjour,
En effet, grosse étourderie de ma part !
Ceci étant, je trouve le rendu moyen : y a-t-il possibilité d'améliorer tout cela ?
Merci.
Fabrice

PS : j'ai oublié mon mot de passe et je demande donc à le réactiver. Je reçois un email avec un mot de passe provisoire que je souhaiterais personnaliser. Dans le panneau de configuration, je ne vois rien pour le faire.
Debian Strech + Asymptote 2.42-12 + Emacs24 + TeXLive 2017

Avatar du membre
GM
Administrateur du site
Administrateur du site
Messages : 1364
Enregistré le : dim. 7 mars 2010, 14:50

Re: Sculpture en verre

Message non lu par GM » sam. 3 nov. 2018, 13:25

Bonjour,
Fabrice a écrit : Ceci étant, je trouve le rendu moyen : y a-t-il possibilité d'améliorer tout cela ?
Désolé mais je manque de temps ce weekend pour regarder cela.
Fabrice a écrit : PS : j'ai oublié mon mot de passe et je demande donc à le réactiver. Je reçois un email avec un mot de passe provisoire que je souhaiterais personnaliser. Dans le panneau de configuration, je ne vois rien pour le faire.
Image
Index des fonctions - Exemple de lien donnant le résultat d'une recherche sur les mots 'arc' et 'triple' : http://asy.marris.fr/indexasy/?filtre=arc triple
Mes configurations (le 10/10/17) :
PC n°1 :Windows 10 - Asymptote(2.41)+MikTeX2.9 - Editeurs : Notepad++ et TeXworks.
Mes autres PC :Ubuntu 16.04LTS - Asymptote(2.42 git) + TexLive2017 - Editeur : TeXworks.
Merci de préciser la votre pour faciliter l'aide des autres !

Répondre