Discussion :

[lathenor]

Bonjour à tous,

j'ai un petit souci pour faire fonctionner ceci (en TCL/TK) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
set b 200
set longueur 31
set angle [expr atan($b/$longueur)]
set angle [tostr [rad2deg $angle]]

j'ai également rajouter ceci au debut de mon script:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
package require math::bigfloat
namespace import ::math::bigfloat::*

mais j'ai une erreur :
BigFoat expected : received '1.40564764938'

quelqu'un serait il pourquoi ?


l'aide OFFICIEL me dit de rajouter ca :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
package require Tcl 8.5
package require math::bigfloat ?2.0?

Alors que la verison 8.5 n'est pas sorti ???

[Canvas]

Bonsoir,

Le package ::math::bigfloat est fait pour des calculs en grande précision.
Si tu n'en n'a pas besoin pas la peine de l'utiliser.

Les 3 premières lignes de ton code fonctionne sans problèmes.
Voici ce que cela donne à la console de Tcl:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
% set b 200
200
% set longueur 31
31
%set angle [expr atan($b/$longueur)]
1.40564764938

La fonction rad2deg fait la conversion radian vers degré.
C'est très facile de créer une procédure pour cela:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
proc rad2deg a {return [expr {180*$a/3.1415926}]}

Donc le code devient:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
proc rad2deg a {return [expr {180*$a/3.1415926}]}
set b 200
set longueur 31
set angle [rad2deg [expr {atan($b/$longueur)}]]

On doit obtenir un angle de 80.5376791658 degré.

Quand tu utilise la commande expr, il vaut mieux mettre le contenu entre des accolades. Le calcul se fait plus rapidement surtout si il est répétitif.

Si tu tiens absolument à utiliser ::math::bigfloat, il y a deux alternatives:
- Installer une version alpha de Tcl8.5
- Lire ceci: http://tcllib.sourceforge.net/doc/bi...#SECTid81d56a8

En espérant que cela aide un petit peu.

----
Canvas

[lathenor]

Oui, merci beaucoup, en fait j'ai suivi ton conseil.

J'ai laisser tomber ::math::bigfloat
et j'ai simplement recréé une procedure qui convertie les radians en degres ^^