DistSky

Description :

Cette fonction permet d'obtenir la distance d'un objet à un autre par la connaissance des coordonnées équatoriales de chacun des objets.La distance est exprimée en radians (compris en radians entre 0 et 2*PI).

Syntaxe :

DISTSKY  Alpha1  Alpha2  Delta1  Delta2  Dist


Variables :

Paramètres Entrées / Sorties Type Description
Alpha1 Entrée Réel Ascension droite de l'objet 1 en radians (voir la fonction GetObjectCoord)
Alpha2 Entrée Réel Ascension droite de l'objet 2 en radians (voir la fonction GetObjectCoord)
Delta1 Entrée Réel Déclinaison de l'objet 1 en radians (voir la fonction GetObjectCoord)
Delta2 Entrée Réel Déclinaison de l'objet 2 en radians (voir la fonction GetObjectCoord)
Dist Sortie Réel Distance entre les 2 objets en radians

Voir aussi :
GetObjectCoord

Exemple :

NOW Date
GETRADECMOON Date AlphaM DeltaM ElevationM
GETRADECSUN Date AlphaS DeltaS ElevationS
DISTSKY AlphaM AlphaS DeltaM DeltaS Dist
Dist=Dist*TODEG
PRINT "Distance Soleil-Lune en ° = " Dist

Télécharger l'exemple