Interférences à deux ondes, hyperboloïde

Tout ce qui concerne l'utilisation ou l'installation d'Asymptote.

Modérateur: gdm_asy

Règles du forum
Merci d'éviter le style SMS dans vos messages et de penser à utiliser la fonction Recherche avant de poster un message. Pour joindre des fichiers à vos messages, consulter ce sujet.
> Penser à utiliser les balises Code pour poster du code.

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar projetmbc » Lundi 11 Janvier 2010, 09:38

Pour le côté kitch abordé dans un autre post, je dirais qu'en utilisant LaTeX, il ne faudrait pas retomber dans le travers que l'on a en utilisant Word de "Microshiote" ou OOWriter, à savoir mettre de la couleur de partout...

Quant à bclogo, l'idée est pas mal mais il est vrai que les images sont quelque peu naïves. On peut en proposer d'autres donc "y-a-plus-qu'à...". Ceci étant dit, faire une image, ne serait-ce qu'un logo, c'est du boulot...
Dernière édition par projetmbc le Lundi 11 Janvier 2010, 10:07, édité 1 fois.
projetmbc
Péta-utilisateur
 
Messages: 1897
Inscription: Samedi 29 Décembre 2007, 00:58
Statut actuel: Actif et salarié | Enseignant

Publicité

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar OG » Lundi 11 Janvier 2010, 09:42

oleanet a écrit:
OG a écrit: C'est un choix ambitieux par rapport
à une gestion facette. O.G.


Et oui! Les intersections de facettes c'est tranquille à côté, c'est sur! Mais ça a ses limites aussi. Je précise que dans la figure que j'ai proposée les facettes ne sont même pas lissées, j'ai simplement diminué le contrast.


Je précise que je ne sais pas comment sont gérées les surfaces par texgraph. Facettes, carreaux de Bézier ou autre chose quand la sortie
est en raytracing ?


O.G.
OG
Modérateur
 
Messages: 2285
Inscription: Lundi 12 Mars 2007, 11:20
Localisation: Rouen
Statut actuel: Actif et salarié | Maître de conférence

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar oleanet » Lundi 11 Janvier 2010, 10:04

OG a écrit:Je précise que je ne sais pas comment sont gérées les surfaces par texgraph. Facettes, carreaux de Bézier ou autre chose quand la sortie
est en raytracing ?
O.G.


Ce sont des facettes, et les images que j'ai postées sont des exports en pgf. J'essaie avec povray mais j'ai un peu de mal à utiliser la fonction povImplicit avec les coefficiens variables, faudrait que je sollicite à nouveau l'auteur...
oleanet
Méga-utilisateur
 
Messages: 258
Inscription: Dimanche 24 Décembre 2006, 15:17

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar GMaths » Lundi 11 Janvier 2010, 10:07

Une dernière version :

asy : http://docs.gmaths.net/tempo/hyperboloide_deux_nappes_4.asy
(Je précise qu'il y a un ou deux petits problèmes avec la version précédente, notamment lorsque l'on souhaite modifier c ou vx, que j'ai rectifiés dans celle-ci.)

pdf (à voir impérativement avec acrobat reader récent) : http://docs.gmaths.net/tempo/hyperboloide_deux_nappes_4.pdf (2,4 Mo !!)

Un aperçu du pdf :

Image
GMaths
Exa-utilisateur
 
Messages: 2031
Inscription: Lundi 01 Octobre 2007, 09:20
Statut actuel: Actif et salarié | Enseignant

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar projetmbc » Lundi 11 Janvier 2010, 10:09

Ce dernier exemple est très "lisible". Bravo !

PS : peut-être manque-t-il un léger dégradé pour marquer le fait que les hyperboloïdes "vont" du plan transparent au plan gris. C'était juste histoire d'être pénible ce matin. ;-) Sur ce faut que j'aille bosser...
projetmbc
Péta-utilisateur
 
Messages: 1897
Inscription: Samedi 29 Décembre 2007, 00:58
Statut actuel: Actif et salarié | Enseignant

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar GMaths » Lundi 11 Janvier 2010, 10:15

OG a écrit:Pour la mémoire as-tu essayé de diminuer 15 dans le code
Code: Tout sélectionner
 surface s=surface(f,(-vx,-vy),(vx,vy),15,15,Spline);

Oui, j'avais déjà pensé à réduire et je l'ai encore fait.
J'ai dessiné aussi la moitié des hyperboloïdes.
Et j'ai supprimé maintenant l'effet d'éclairage.

On peut aussi conseiller à ceux qui ont des problèmes de mémoire avec la 3D :
  • de ne faire que des traits fins : pas de bp, laisser l'épaisseur par défaut.
  • limiter les surfaces avec de la transparence
GMaths
Exa-utilisateur
 
Messages: 2031
Inscription: Lundi 01 Octobre 2007, 09:20
Statut actuel: Actif et salarié | Enseignant

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar OG » Lundi 11 Janvier 2010, 10:26

GMaths a écrit:
OG a écrit:Pour la mémoire as-tu essayé de diminuer 15 dans le code
Code: Tout sélectionner
 surface s=surface(f,(-vx,-vy),(vx,vy),15,15,Spline);

Oui, j'avais déjà pensé à réduire et je l'ai encore fait.


elle marche bien cette fonction de surface spline tout de même !

O.G.
OG
Modérateur
 
Messages: 2285
Inscription: Lundi 12 Mars 2007, 11:20
Localisation: Rouen
Statut actuel: Actif et salarié | Maître de conférence

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar GMaths » Lundi 11 Janvier 2010, 10:28

J'avais raté ce message :
oleanet a écrit:A cause de bclogo? Bah! Je l'ai vu ton document et je le trouve très bien, ce n'est pas parce que pg est calé en programmation TeX que ses goûts artistiques font référence, non? :lol:

:lol: :lol:

Pour ceux qui se demande dont on parle, on parle de cela.
projetmbc a écrit:Pour le côté kitch abordé dans un autre post, je dirais qu'en utilisant LaTeX, il ne faudrait pas retomber dans le travers que l'on a en utilisant Word de "Microshiote" ou OOWriter, à savoir mettre de la couleur de partout...

Quant à bclogo, l'idée est pas mal mais il est vrai que les images sont quelque peu naïves. On peut en proposer d'autres donc "y-a-plus-qu'à...". Ceci étant dit, faire une image, ne serait-ce qu'un logo, c'est du boulot...
C'est mon intention d'en faire : logos et barres personnelles à terme... pour se démarquer un peu de tous les utilisateurs de bclogo. J'ai déjà commencé puisque l'environnement exercice (de mon sujet de ds, posté il y a quelques temps) a été créé ainsi.

_______________________________

C'est fini la 3D pour moi aujourd'hui... c'est au tour des copies, jusque demain 8h.
Il devient urgent de m'y mettre si je veux avoir le temps de dormir un peu ce soir. :mrgreen:
GMaths
Exa-utilisateur
 
Messages: 2031
Inscription: Lundi 01 Octobre 2007, 09:20
Statut actuel: Actif et salarié | Enseignant

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar GMaths » Lundi 11 Janvier 2010, 10:29

OG a écrit:elle marche bien cette fonction de surface spline tout de même ! O.G.
Oui, merci à l'auteur. :wink:

Un dernier essai avec currentlight=light((0,0,1),(0,0,-1));
http://docs.gmaths.net/tempo/hyperboloide_deux_nappes_5a.png

Je préfère l'avant dernier sans éclairage.
GMaths
Exa-utilisateur
 
Messages: 2031
Inscription: Lundi 01 Octobre 2007, 09:20
Statut actuel: Actif et salarié | Enseignant

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar cjorssen » Lundi 11 Janvier 2010, 14:37

GMaths a écrit:Modification sensible du code : http://docs.gmaths.net/tempo/hyperboloide_deux_nappes_3.asy

  • Changement de notations
  • Changement de couleurs
  • Suppression d'un axe
  • Ajout d'un plan

Nouveau Pdf : http://docs.gmaths.net/tempo/hyperboloide_deux_nappes_3.pdf (2,25Mo)


C'est tout simplement génial. Il me faut du temps pour digérer le code... Bon, sinon, maintenant, pour ceux qui veulent s'amuser, on peut s'attaquer à l'intersection des hyperboloïdes par un plan perpendiculaire à (S1S2) : ça doit être des cercles :-)

En tout cas, un grand merci : je vais enfin pouvoir présenter une figure potable de ce truc grâce à vous.

--
Christophe
cjorssen
Déca-utilisateur
 
Messages: 49
Inscription: Jeudi 05 Novembre 2009, 15:08
Statut actuel: Actif et salarié | Enseignant

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar GMaths » Lundi 11 Janvier 2010, 19:45

Avant de laisser mourir le sujet...
... je précise que j'ai mis deux des exemples, dans la galerie que j'avais intitulée "Sciences Physiques" (sans savoir ce que j'allais y mettre) :
http://www.marris.org/asymptote/Sciences_physiques/index.html
GMaths
Exa-utilisateur
 
Messages: 2031
Inscription: Lundi 01 Octobre 2007, 09:20
Statut actuel: Actif et salarié | Enseignant

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar projetmbc » Lundi 11 Janvier 2010, 20:33

GMaths a écrit:
projetmbc a écrit:Pour le côté kitch abordé dans un autre post, je dirais qu'en utilisant LaTeX, il ne faudrait pas retomber dans le travers que l'on a en utilisant Word de "Microshiote" ou OOWriter, à savoir mettre de la couleur de partout...

Quant à bclogo, l'idée est pas mal mais il est vrai que les images sont quelque peu naïves. On peut en proposer d'autres donc "y-a-plus-qu'à...". Ceci étant dit, faire une image, ne serait-ce qu'un logo, c'est du boulot...
C'est mon intention d'en faire : logos et barres personnelles à terme... pour se démarquer un peu de tous les utilisateurs de bclogo. J'ai déjà commencé puisque l'environnement exercice (de mon sujet de ds, posté il y a quelques temps) a été créé ainsi.

Je suis très preneur de ce genre de chose... Tiens moi au courant.
projetmbc
Péta-utilisateur
 
Messages: 1897
Inscription: Samedi 29 Décembre 2007, 00:58
Statut actuel: Actif et salarié | Enseignant

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar oleanet » Lundi 11 Janvier 2010, 20:48

projetmbc a écrit:
GMaths a écrit:
projetmbc a écrit:Pour le côté kitch abordé dans un autre post, je dirais qu'en utilisant LaTeX, il ne faudrait pas retomber dans le travers que l'on a en utilisant Word de "Microshiote" ou OOWriter, à savoir mettre de la couleur de partout...

Quant à bclogo, l'idée est pas mal mais il est vrai que les images sont quelque peu naïves. On peut en proposer d'autres donc "y-a-plus-qu'à...". Ceci étant dit, faire une image, ne serait-ce qu'un logo, c'est du boulot...
C'est mon intention d'en faire : logos et barres personnelles à terme... pour se démarquer un peu de tous les utilisateurs de bclogo. J'ai déjà commencé puisque l'environnement exercice (de mon sujet de ds, posté il y a quelques temps) a été créé ainsi.

Je suis très preneur de ce genre de chose... Tiens moi au courant.


Un des auteurs de bclogo utililse lui-même bclogo, j'ai fait une capture dans un de ses résumés de cours sur son site:

Image

Je ne trouve pas cela spécialement kitch, je trompe????

PS: il vaudrait peut-être mieux un autre fil pour ce sujet!
oleanet
Méga-utilisateur
 
Messages: 258
Inscription: Dimanche 24 Décembre 2006, 15:17

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar projetmbc » Lundi 11 Janvier 2010, 21:20

oleanet a écrit:Je ne trouve pas cela spécialement kitch, je trompe????

Pour des collégiens pourquoi pas...
oleanet a écrit:il vaudrait peut-être mieux un autre fil pour ce sujet!

Il y a un post sur ce sujet : voir cette page (je connais bien l'auteur de ce post).
projetmbc
Péta-utilisateur
 
Messages: 1897
Inscription: Samedi 29 Décembre 2007, 00:58
Statut actuel: Actif et salarié | Enseignant

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar oleanet » Lundi 11 Janvier 2010, 22:33

J'ai enfin réussi à faire un export vers povray. J'en ai profité pour ajouter une coupe suivant un axe perpendiculaire à l'axe (S1S2):

Image
oleanet
Méga-utilisateur
 
Messages: 258
Inscription: Dimanche 24 Décembre 2006, 15:17

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar OG » Lundi 11 Janvier 2010, 22:46

Jolies assiettes !
Le $S1$ devrait plutôt être $S_1$ ?
À quoi ressemble le code par curiosité.
Merci

O.G.
OG
Modérateur
 
Messages: 2285
Inscription: Lundi 12 Mars 2007, 11:20
Localisation: Rouen
Statut actuel: Actif et salarié | Maître de conférence

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar oleanet » Lundi 11 Janvier 2010, 22:59

OG a écrit:Le $S1$ devrait plutôt être $S_1$ ?


Oui, j'ai mis du texte simple (non compilé par TeX), il faut rajouter l'option TeXify:=1 aux labels pour avoir du texte compilé par TeX mais c'est un peu plus long.

À quoi ressemble le code par curiosité.


Le code texgraph est le suivant:

Code: Tout sélectionner
[
view(-9,9,-6,8),Marges(0,0,0,0),size(12),
background(full,darkgray),
view3D(-5,5,-5,5,-5,6),
Ze:=4.5, Xe:=1.15, d:=1, S1:=M(d,0,0), S2:=M(-d,0,0),lambda:=0.2,
ecranZ:=[M(0,0,Ze),vecK], ecranX:=[M(Xe,0,0),vecI], {270*(5-k)/5,1,1)}
povScene(
        povPlan(ecranZ,[color:=slategray, opacity:=0.4,border:=1,bordercolor:=0, shadow:=0]),
        povPlan(ecranX,[color:=slategray, opacity:=0.4, border:=1,bordercolor:=0, shadow:=0]),
        view3D(-7,7,-7,7,-1,7),povAxes(M(0,0,0), [arrows:=1]), view3D(-5,5,-5,5,-5,6),
        for k from 0 to 5 do
           alpha:=sqr(k*lambda),
           a:=(4*d^2-alpha), b:=-alpha, c:=-d*d*alpha, D:=alpha^2/4+c,
           povImplicit(a*pow(x,2)+b*pow(y,2)+c*pow(z,2)+D,[color:=MixColor(yellow,k/5,red,1-k/5),
                                                       clip:=1, clipwin:=[M(-5,-5,-4.5),M(0,5,Ze+0.025)]]),
           sep3D,
           povImplicit(a*pow(x,2)+b*pow(y,2)+c*pow(z,2)+D,[color:=MixColor(yellow,k/5,red,1-k/5),
                                                       clip:=1, clipwin:=[M(0.1,-5,-5),M(Xe+0.025,5,Ze+0.025)]]),
           sep3D
        od,
        povLabel(S1, "S1", [TeXify:=1, scale:=1.5, labelpos:=[0.5,-i],LabelStyle:=top,showdot:=1, dotscale:=2, dotcolor:=gold]),
        ),
Display3D()
]


mais l'auteur a du remanier un fichier de manière à ce que la commande povImplicit reconnaisse les variables locales (c'est à cause de ça que je n'y arrivais pas avant...), cela ne marche donc pas avec la version actuelle, j'imagine qu'il y aura une mise à jour prochainement.

PS: je peux aussi communiquer le fichier source povray si ça intéresse. La deuxième ligne indique les options de compilation à utiliser

Code: Tout sélectionner
//TeXgraph 1.95
//options: +W640 +H497 +A +P +FN
# include "shapes.inc"
global_settings { charset utf8
                  ambient_light rgb 1.5
}
background{color rgb<0.66274509803921,0.66274509803921,0.66274509803921>}
camera{ orthographic
        location 17916.4728671689*<-0.60402277355505,0.71984631039295,0.34202014332566>
        sky <0.21984631039295,-0.26200263022938,0.9396926207859>
        up 14*y
        right 18*x
        look_at <0,0,0>
        translate <0.21984631039295,-0.26200263022938,0.9396926207859>}
light_source { 17916.4728671689*<-0.45637808897214,0.37276941524163,0.80793688055846> color rgb<1,1,1>}
#declare labelbase = 0.7;
#declare fonte = "timrom.ttf";
// déclarations des objets
#declare objet1 =
mesh2{ vertex_vectors{ 4,
<-5,5,4.5>,
<-5,-5,4.5>,
<5,-5,4.5>,
<5,5,4.5>
                       }
        face_indices{ 2,
<0,1,2>, <0,2,3>
                       }
}
#declare objet2 =
union{
cylinder { <-5,5,4.5>
   <-5,-5,4.5> 0.0175}
cylinder { <-5,-5,4.5>
   <5,-5,4.5> 0.0175}
cylinder { <5,-5,4.5>
   <5,5,4.5> 0.0175}
cylinder { <5,5,4.5>
   <-5,5,4.5> 0.0175}
}
#declare objet3 =
mesh2{ vertex_vectors{ 4,
<-1.15,5,6>,
<-1.15,5,-5>,
<-1.15,-5,-5>,
<-1.15,-5,6>
                       }
        face_indices{ 2,
<0,1,2>, <0,2,3>
                       }
}
#declare objet4 =
union{
cylinder { <-1.15,5,6>
   <-1.15,5,-5> 0.0175}
cylinder { <-1.15,5,-5>
   <-1.15,-5,-5> 0.0175}
cylinder { <-1.15,-5,-5>
   <-1.15,-5,6> 0.0175}
cylinder { <-1.15,-5,6>
   <-1.15,5,6> 0.0175}
}
#declare objet5 =
union{
cone { <0,7,0> 0
   <0,6.75,0> 0.1}
cone { <-7,0,0> 0
   <-6.75,0,0> 0.1}
cone { <0,0,7> 0
   <0,0,6.75> 0.1}
cylinder { <0,-7,0>
   <0,6.75,0> 0.0175}
cylinder { <7,0,0>
   <-6.75,0,0> 0.0175}
cylinder { <0,0,-1>
   <0,0,6.75> 0.0175}
}
#declare labelsize =0.8695652173913;
#declare objet6 =
  text{ ttf fonte
"x"
0.0125 0 scale labelbase*labelsize
translate<-Text_Space(fonte,"x",labelbase, 0)/2,
-Text_Space(fonte,"x",labelbase, 0)/2,
0>
matrix<0.76604444311897,0.64278760968654,0,
0.21984631039295,-0.26200263022938,0.9396926207859,
-0.60402277355505,0.71984631039295,0.34202014332566,
-7.7,0,0>
}
#declare labelsize =0.8695652173913;
#declare objet7 =
  text{ ttf fonte
"y"
0.0125 0 scale labelbase*labelsize
translate<-Text_Space(fonte,"y",labelbase, 0)/2,
-Text_Space(fonte,"x",labelbase, 0)/2,
0>
matrix<0.76604444311897,0.64278760968654,0,
0.21984631039295,-0.26200263022938,0.9396926207859,
-0.60402277355505,0.71984631039295,0.34202014332566,
0,7.7,0>
}
#declare labelsize =0.8695652173913;
#declare objet8 =
  text{ ttf fonte
"z"
0.0125 0 scale labelbase*labelsize
translate<-Text_Space(fonte,"z",labelbase, 0)/2,
0,
0>
matrix<0.76604444311897,0.64278760968654,0,
0.21984631039295,-0.26200263022938,0.9396926207859,
-0.60402277355505,0.71984631039295,0.34202014332566,
0,0,7.2>
}
#declare objet9 =
  isosurface{function{(4)*pow(x,2)+(0)*pow(y,2)+(0)*pow(z,2)+(0)}
    contained_by{ box{ <-5,-5,-4.5> <0,5,4.525>}}
    open
evaluate 33.4256694367498,1.5,0.7
    matrix <-1,0,0,
         0,1,0,
         0,0,1,
         0,0,0>
     }
#declare objet10 =
  isosurface{function{(4)*pow(x,2)+(0)*pow(y,2)+(0)*pow(z,2)+(0)}
    contained_by{ box{ <0.1,-5,-5> <1.175,5,4.525>}}
    open
evaluate 1.68115420129271,1.5,0.7
    matrix <-1,0,0,
         0,1,0,
         0,0,1,
         0,0,0>
     }
#declare objet11 =
  isosurface{function{(3.96)*pow(x,2)+(-0.04)*pow(y,2)+(-0.04)*pow(z,2)+(-0.0396)}
    contained_by{ box{ <-5,-5,-4.5> <0,5,4.525>}}
    open
evaluate 32.9852840027701,1.5,0.7
    matrix <-1,0,0,
         0,1,0,
         0,0,1,
         0,0,0>
     }
#declare objet12 =
  isosurface{function{(3.96)*pow(x,2)+(-0.04)*pow(y,2)+(-0.04)*pow(z,2)+(-0.0396)}
    contained_by{ box{ <0.1,-5,-5> <1.175,5,4.525>}}
    open
evaluate 1.63736611265005,1.5,0.7
    matrix <-1,0,0,
         0,1,0,
         0,0,1,
         0,0,0>
     }
#declare objet13 =
  isosurface{function{(3.84)*pow(x,2)+(-0.16)*pow(y,2)+(-0.16)*pow(z,2)+(-0.1536)}
    contained_by{ box{ <-5,-5,-4.5> <0,5,4.525>}}
    open
evaluate 31.9432748845799,1.5,0.7
    matrix <-1,0,0,
         0,1,0,
         0,0,1,
         0,0,0>
     }
#declare objet14 =
  isosurface{function{(3.84)*pow(x,2)+(-0.16)*pow(y,2)+(-0.16)*pow(z,2)+(-0.1536)}
    contained_by{ box{ <0.1,-5,-5> <1.175,5,4.525>}}
    open
evaluate 2.70512807017544,1.5,0.7
    matrix <-1,0,0,
         0,1,0,
         0,0,1,
         0,0,0>
     }
#declare objet15 =
  isosurface{function{(3.64)*pow(x,2)+(-0.36)*pow(y,2)+(-0.36)*pow(z,2)+(-0.3276)}
    contained_by{ box{ <-5,-5,-4.5> <0,5,4.525>}}
    open
evaluate 30.2107494690674,1.5,0.7
    matrix <-1,0,0,
         0,1,0,
         0,0,1,
         0,0,0>
     }
#declare objet16 =
  isosurface{function{(3.64)*pow(x,2)+(-0.36)*pow(y,2)+(-0.36)*pow(z,2)+(-0.3276)}
    contained_by{ box{ <0.1,-5,-5> <1.175,5,4.525>}}
    open
evaluate 6.09743984302862,1.5,0.7
    matrix <-1,0,0,
         0,1,0,
         0,0,1,
         0,0,0>
     }
#declare objet17 =
  isosurface{function{(3.36)*pow(x,2)+(-0.64)*pow(y,2)+(-0.64)*pow(z,2)+(-0.5376)}
    contained_by{ box{ <-5,-5,-4.5> <0,5,4.525>}}
    open
evaluate 27.7979471837488,1.5,0.7
    matrix <-1,0,0,
         0,1,0,
         0,0,1,
         0,0,0>
     }
#declare objet18 =
  isosurface{function{(3.36)*pow(x,2)+(-0.64)*pow(y,2)+(-0.64)*pow(z,2)+(-0.5376)}
    contained_by{ box{ <0.1,-5,-5> <1.175,5,4.525>}}
    open
evaluate 10.8362434903047,1.5,0.7
    matrix <-1,0,0,
         0,1,0,
         0,0,1,
         0,0,0>
     }
#declare objet19 =
  isosurface{function{(3)*pow(x,2)+(-1)*pow(y,2)+(-1)*pow(z,2)+(-0.75)}
    contained_by{ box{ <-5,-5,-4.5> <0,5,4.525>}}
    open
evaluate 24.7122201061865,1.5,0.7
    matrix <-1,0,0,
         0,1,0,
         0,0,1,
         0,0,0>
     }
#declare objet20 =
  isosurface{function{(3)*pow(x,2)+(-1)*pow(y,2)+(-1)*pow(z,2)+(-0.75)}
    contained_by{ box{ <0.1,-5,-5> <1.175,5,4.525>}}
    open
evaluate 16.9100144275162,1.5,0.7
    matrix <-1,0,0,
         0,1,0,
         0,0,1,
         0,0,0>
     }
#declare objet21 = union{
   prism{linear_sweep bezier_spline  -0.0125, 0.0125, 64,
<-0.01989666666634,0.17004770833446>,<-0.01989666666634,0.17004770833446>,<-0.04508499999967,0.26783770833446>,<-0.04508499999967,0.26783770833446>,
<-0.04508499999967,0.26783770833446>,<-0.01502833333301,0.29159729166779>,<0.03667125000032,0.30345062500113>,<0.07995708333365,0.30345062500113>,
<0.07995708333365,0.30345062500113>,<0.20219458333365,0.30345062500113>,<0.24061208333365,0.22386395833446>,<0.24061208333365,0.16517937500112>,
<0.24061208333365,0.16517937500112>,<0.24061208333365,0.09950979166779>,<0.19589750000031,0.06532562500112>,<0.13932958333365,0.03807354166778>,
<0.13932958333365,0.03807354166778>,<0.08344958333365,0.01013354166778>,<0.04990041666698,-0.01918229166554>,<0.04990041666698,-0.07506229166554>,
<0.04990041666698,-0.07506229166554>,<0.04990041666698,-0.12464520833221>,<0.08556625000032,-0.17634479166555>,<0.15536333333365,-0.17634479166555>,
<0.15536333333365,-0.17634479166555>,<0.21965708333364,-0.17634479166555>,<0.27553708333364,-0.12956645833221>,<0.27130375000031,-0.03664479166554>,
<0.27130375000031,-0.03664479166554>,<0.27130375000031,-0.03664479166554>,<0.29157083333364,-0.03664479166554>,<0.29157083333364,-0.03664479166554>,
<0.29157083333364,-0.03664479166554>,<0.29157083333364,-0.03664479166554>,<0.30972125000031,-0.14353645833222>,<0.30972125000031,-0.14353645833222>,
<0.30972125000031,-0.14353645833222>,<0.28252208333364,-0.17983729166554>,<0.21473583333365,-0.20079229166555>,<0.16377708333365,-0.20079229166555>,
<0.16377708333365,-0.20079229166555>,<0.02825750000031,-0.19941645833221>,<-0.01291166666634,-0.12115270833221>,<-0.01291166666634,-0.04643437499888>,
<-0.01291166666634,-0.04643437499888>,<-0.01291166666634,0.01643062500112>,<0.02127250000031,0.05622395833445>,<0.09181041666698,0.09252479166779>,
<0.09181041666698,0.09252479166779>,<0.13234458333365,0.11347979166779>,<0.18192750000031,0.13723937500112>,<0.18192750000031,0.19031479166779>,
<0.18192750000031,0.19031479166779>,<0.18192750000031,0.23989770833446>,<0.14562666666698,0.27900312500113>,<0.08482541666698,0.27900312500113>,
<0.08482541666698,0.27900312500113>,<0.01778000000032,0.27900312500113>,<-0.00804333333301,0.24201437500113>,<0.00031750000032,0.17004770833446>,
<0.00031750000032,0.17004770833446><0.00031750000032,0.17004770833446><-0.01989666666634,0.17004770833446><-0.01989666666634,0.17004770833446>
sturm    }
   prism{linear_sweep bezier_spline  -0.0125, 0.0125, 60,
<-0.26516541666634,-0.30302729166555>,<-0.26516541666634,-0.30302729166555>,<-0.26516541666634,-0.28895145833221>,<-0.26516541666634,-0.28895145833221>,
<-0.26516541666634,-0.28895145833221>,<-0.26516541666634,-0.28895145833221>,<-0.224419583333,-0.28556479166555>,<-0.224419583333,-0.28556479166555>,
<-0.224419583333,-0.28556479166555>,<-0.214259583333,-0.28461229166555>,<-0.20843874999967,-0.28069645833222>,<-0.20843874999967,-0.26180520833221>,
<-0.20843874999967,-0.26180520833221>,<-0.20843874999967,-0.26180520833221>,<-0.20843874999967,0.02389187500112>,<-0.20843874999967,0.02389187500112>,
<-0.20843874999967,0.02389187500112>,<-0.20843874999967,0.02389187500112>,<-0.206004583333,0.02680229166778>,<-0.206004583333,0.02680229166778>,
<-0.206004583333,0.02680229166778>,<-0.206004583333,0.02680229166778>,<-0.10609791666634,0.00981604166778>,<-0.10609791666634,0.00981604166778>,
<-0.10609791666634,0.00981604166778>,<-0.10609791666634,0.00981604166778>,<-0.10609791666634,-0.00230187499887>,<-0.10609791666634,-0.00230187499887>,
<-0.10609791666634,-0.00230187499887>,<-0.10609791666634,-0.00230187499887>,<-0.15118291666634,-0.0076464583322>,<-0.15118291666634,-0.0076464583322>,
<-0.15118291666634,-0.0076464583322>,<-0.15943791666634,-0.00865187499887>,<-0.16282458333301,-0.01251479166554>,<-0.16282458333301,-0.02659062499887>,
<-0.16282458333301,-0.02659062499887>,<-0.16282458333301,-0.02659062499887>,<-0.16282458333301,-0.26180520833221>,<-0.16282458333301,-0.26180520833221>,
<-0.16282458333301,-0.26180520833221>,<-0.16282458333301,-0.27101270833222>,<-0.16139583333301,-0.27683354166555>,<-0.15848541666634,-0.28022020833222>,
<-0.15848541666634,-0.28022020833222>,<-0.15605124999967,-0.28360687499888>,<-0.152188333333,-0.28508854166555>,<-0.14684374999967,-0.28556479166555>,
<-0.14684374999967,-0.28556479166555>,<-0.14684374999967,-0.28556479166555>,<-0.10609791666634,-0.28895145833221>,<-0.10609791666634,-0.28895145833221>,
<-0.10609791666634,-0.28895145833221>,<-0.10609791666634,-0.28895145833221>,<-0.10609791666634,-0.30302729166555>,<-0.10609791666634,-0.30302729166555>,
<-0.10609791666634,-0.30302729166555><-0.10609791666634,-0.30302729166555><-0.26516541666634,-0.30302729166555><-0.26516541666634,-0.30302729166555>
sturm    }
matrix<-0.76604444311897,-0.64278760968654,0,
-0.60402277355505,0.71984631039295,0.34202014332566,
0.21984631039295,-0.26200263022938,0.9396926207859,
-1.10992315519648,0.13100131511469,-0.46984631039295>
}
#declare objet22 =
sphere { <-1,0,0> 0.1
        }
// rendu des objets
object{ objet1
        pigment{ color rgb<0.43921568627451,0.50196078431372,0.56470588235294> transmit 0.6}
        finish{ ambient 0.35  diffuse 0.8 }
         no_shadow     }
object{ objet2
        pigment{ color rgb<0,0,0> transmit 0.6}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
         no_shadow     }
object{ objet3
        pigment{ color rgb<0.43921568627451,0.50196078431372,0.56470588235294> transmit 0.6}
        finish{ ambient 0.35  diffuse 0.8 }
         no_shadow     }
object{ objet4
        pigment{ color rgb<0,0,0> transmit 0.6}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
         no_shadow     }
object{ objet5
        pigment{ color rgb<0,0,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
object{ objet6
        pigment{ color rgb<0,0,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
         no_shadow     }
object{ objet7
        pigment{ color rgb<0,0,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
         no_shadow     }
object{ objet8
        pigment{ color rgb<0,0,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
         no_shadow     }
object{ objet9
        pigment{ color rgb<1,0,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
object{ objet10
        pigment{ color rgb<1,0,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
object{ objet11
        pigment{ color rgb<1,0.2,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
object{ objet12
        pigment{ color rgb<1,0.2,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
object{ objet13
        pigment{ color rgb<1,0.4,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
object{ objet14
        pigment{ color rgb<1,0.4,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
object{ objet15
        pigment{ color rgb<1,0.6,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
object{ objet16
        pigment{ color rgb<1,0.6,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
object{ objet17
        pigment{ color rgb<1,0.8,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
object{ objet18
        pigment{ color rgb<1,0.8,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
object{ objet19
        pigment{ color rgb<1,1,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
object{ objet20
        pigment{ color rgb<1,1,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
object{ objet21
        pigment{ color rgb<0,0,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
         no_shadow     }
object{ objet22
        pigment{ color rgb<1,0.84313725490196,0>}
        finish{ ambient 0.35  diffuse 0.8 phong 0.5}
     }
oleanet
Méga-utilisateur
 
Messages: 258
Inscription: Dimanche 24 Décembre 2006, 15:17

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar GMaths » Mardi 12 Janvier 2010, 13:08

L'image est jolie... mais j'ai du mal à comprendre les "assiettes" : j'essaierai de comprendre le paramétrage (mathématique) plus tard pour comprendre à quels hyperboloïdes elles correspondent, vis à vis de ceux tracés dans le demi-espace d'inéquation x<0.
GMaths
Exa-utilisateur
 
Messages: 2031
Inscription: Lundi 01 Octobre 2007, 09:20
Statut actuel: Actif et salarié | Enseignant

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar oleanet » Mardi 12 Janvier 2010, 13:47

GMaths a écrit:L'image est jolie... mais j'ai du mal à comprendre les "assiettes" : j'essaierai de comprendre le paramétrage (mathématique) plus tard pour comprendre à quels hyperboloïdes elles correspondent, vis à vis de ceux tracés dans le demi-espace d'inéquation x<0.


Il s'agit toujours des mêmes hyperboloïdes depuis le début!! Mais quand tu les tranches horizontalement (z=Cte) tu vois des hyperboles, et quand tu les tranches verticalement (x=Cte) tu vois des cercles. On parle d'assiettes parce que la transparence du plan fait qu'on voit le "fond" des nappes d'hyperboloïdes.

Plus préciséement, les nappes dans le demi-espace x<0 sont clippées avec le plan horizontal z=4.5 (plus un epsilon pour bien voir les bords), alors que les nappes dans le demi-espace x>0 ont été clippées avec le plan x=1.15 (plus un epsilon pour bien voir les bords). Et pour utiliser les capacités de povray j'ai utilisé la forme implicite des équations et non pas paramétrique (qui aurait donné des facettes).

En espérant que cela soit plus clair.
oleanet
Méga-utilisateur
 
Messages: 258
Inscription: Dimanche 24 Décembre 2006, 15:17

Re: [Asymptote] Interférences à deux ondes, hyperboloïde

Messagepar GMaths » Mardi 12 Janvier 2010, 14:06

oleanet a écrit:En espérant que cela soit plus clair.
Non, car tu ne m'as pas compris.
Bien sûr que je connais la nature des courbes à obtenir...

... j'ai juste du mal à croire que les 4 cercles que l'on voit, puissent être les sections des 4 nappes symétriques des 4 nappes tracées dans le demi-espace d'inéquation x<0 : c'est visuellement que cela me semble bizarre.
Mais je te crois, ne t'inquiète pas. ;-) C'est ma vue 3D qui défaille... :lol:

Edition : (quelques minutes plus tard) après avoir regardé un peu plus attentivement la figure..., c'est ok ! :-D
GMaths
Exa-utilisateur
 
Messages: 2031
Inscription: Lundi 01 Octobre 2007, 09:20
Statut actuel: Actif et salarié | Enseignant

PrécédenteSuivante

Retourner vers Asymptote

Qui est en ligne

Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 1 invité