CALCUL DE LA DISTANCE MINIMALE ENTRE DEUX DROITES DANS L'ESPACE - COORDONNÉES DE

Messages postés
17280
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
21 juillet 2019
- - Dernière réponse : lexsty
Messages postés
173
Date d'inscription
samedi 10 décembre 2005
Statut
Membre
Dernière intervention
18 juin 2017
- 30 janv. 2012 à 22:08
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/35051-calcul-de-la-distance-minimale-entre-deux-droites-dans-l-espace-coordonnees-des-deux-points-les-plus-proches-et-de-leur-milieu

Renfield
Messages postés
17280
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
21 juillet 2019
58 -
j'ai un peu de mal....

soit les droites sont parallèles, auquel ca, la distance la plus proche est 0

soit elles sont parallèles, auquel ca, la distance minimale est de toute facon la seule distance que tu peux obtenir...

coté code :

l'utilisation de
Global ax, ay, az, bx, by, bz, cx, cy, cz, dx, dy, dz, a, b, c, d, e, f
Global g, h, i, j, k, l, m, n, o, p, q, dt, r, s, t, u, v, x, X2, z, Z2, y, Y2
Global X1, Y1, z1, xm, ym, zm
est tout simplement inconcevable, nous ne sommes plus en Basic sur CPC6128...

le code :
Dim ax, ay, az, bx, by, bz, cx, cy, cz, dx, dy, dz, a, b, c, d, e, f As Double
Dim g, h, i, j, k, l, m, n, o, p, q, dt, r, s, t, u, v, X, X2, z, Z2, Y, Y2 As Double
Dim X1, Y1, z1, xm, ym, zm As Double

ne déclare que f, Y2 et zm en tant que double, les autres sont tous des Variant

por le reste, les commentaire gaches un peu la lecture, mais les calculs mis en oeuvre me parraissent un peu trop complexes
cs_juju12
Messages postés
966
Date d'inscription
samedi 3 avril 2004
Statut
Membre
Dernière intervention
4 mars 2010
4 -
2 droites non parallèles ne se croisent pas nécessairement dans l'espace...
Renfield
Messages postés
17280
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
21 juillet 2019
58 -
ah ok, "dans l'espace" veux dire en 3D....
pourquoi chercher des mots simples...
violent_ken
Messages postés
1822
Date d'inscription
mardi 31 mai 2005
Statut
Membre
Dernière intervention
26 octobre 2010
-
Salut, plusieurs remarques.

1) Un des deux form inutile, le module aussi
2) mauvaise déclaration des variables :
Global ax, ay, az, bx, by, bz, cx, cy, cz, dx, dy, dz, a, b, c, d, e, f où est passé le type de données ???
Dim X1, Y1, z1, xm, ym, zm As Double seule zm est déclarée en double, le reste l'est en Variant...

Comme pour ton autre source sur le même thème, une mise à jour est nécessaire il me semble...

Renfield ==> "dans l'espace" est le terme mathématique approprié. "en 3D" le sous entend, mais il n'y a pas que l'espace qui est en 3 dimensions...
@+
cs_bgu
Messages postés
4
Date d'inscription
mercredi 25 mai 2005
Statut
Membre
Dernière intervention
26 octobre 2006
-
Je n'ai pas regardé ton code.
Mais le zip "Methode de calcul.zip" me servira.
Merci.