[Résolu]Bug ?

[Good07]

Je ne veux pas poster directement dans la section Bug car je me plante peut-être carrément. Je suis en train de m'arracher les cheveux sur un programme de trois lignes que voici:
Il ne s'agit que d'un petit morceau d'un programme d'astronomie mais l'ensemble me donne des résultats (erronés ?) à cause de ces trois lignes.

Code : Tout sélectionner

Y1.d=2*#PI
L.d=-3938.1550674341765
L=L-Y1*Int(L/Y1)
Debug L

Je travaille sur Mac, mais je l'ai essayé sous Seven et XP et le résultat est le même.
J'obtiens : -4.881065139755 ...
Le problème c'est que je n'obtiens pas du tout le même résultat avec d'autres basics.
RealBasic me donne 1.40212
Basic GFA idem
Basic Amstrad 1.40212059
Oui je sais, j'ai déterré des reliques, mais on a l'âge de ses artères et puis le Basic GFA à toujours été une référence pour moi .

Je ne sais plus à quel Saint me vouer et un petit coup de pouce et de test me serai bien utile.

Merci par avance pour vos réponses.

[lepiaf31]

Pourquoi un bug ? Je fais le calcul avec ma calculatrice et je trouve bien le résultat qu'affiche PureBasic. Regardes :
Y1 = 2*#Pi = 6.283185307
L = -3938.1550674341765
Int(L/Y1) = -626
Y1*Int(L/Y1) = -3933.274002
donc L-Y1*Int(L/Y1) = -4.881065434

d'où le resultat trouvé, je ne vois aucun bug .

[Good07]

Merci pour ta réponse lepiaf31.
Oui je sais, mais alors pourquoi les autres basics ne donnent-ils pas la même réponse au calcul ?
J'utilise la dernière version de RealBasic et j'aurais admis quelques décimales d'erreur mais là, le résultat est complètement différent. J'ai essayé de modifier et de rajouter des parenthèses, mais le résultat est toujours le même.
J'avais aussi utilisé la calculatrice mais à force je ne sais plus qui à raison.
Je tape exactement les mêmes lignes et les réponse sont différentes ... D'un basic à l'autre.
Je sais que notre ami Dobro est aussi un spécialiste du GFA il pourra peut-être confirmer.

[lepiaf31]

Hum je ne peux pas t'aider je ne connais pas ces langages, désolé ..

[zaphod]

...

[Good07]

Bonjour à tous,

En fait, c'est Zaphod qui a apporté la réponse, c'est un problème avec les nombres négatifs ce qui fait qu'il faut utiliser Trunc en GFA et CEIL en REALbasic au lieu de Int(). Désolé d'avoir soupçonné un bug dans notre PB préféré et merci pour vos prompts réponses.