supression de variables

[MrNavet]

Je vous présente mon balayeur de ti89 :

Code: Select all

()
Prgm
Local l1,l2,l3,l,t,i,j

seq(i,i,48,57)-l1
seq(i,i,97,122)-l2
seq(i,i,128,148)-l3
augment(augment(l1,l2),l3)-l
dim(l)-n

For i,1,n
 For j,1,n
char(l[i])char(l[j])-t
  Try
DelVar #t
  Else

  EndTry
 EndFor
EndFor

EndPrgm


L'ennui c'est que ce balayeur ne doit pas être très bien payé, car il travaille trèès lentement... Il doit traiter 57 malheureux caractères (a...z ; alpha...omega et 0..9), et j'ai préférer arrêter après 1min de calcul (Théoriquement ça le fait en 2min et des bricoles)
Le test permet de zapper les variables archivées, je ne sais pas si on peut comprimer l'assigiation dans la variable t et le Delvar #t en une ligne ; mais je ne me fais pas trop d'illusions, c'est vraiment trop lent. snif...

Me reste plus qu'à apprendre le calcul mental
Ce qui ne serait pas complètement inutile d'ailleurs...

[MrNavet]

Euh au fait, pour en rajouter une couche : On peut faire en sorte, en bricolant un peu, que la ti89 fasse une distinction dans les variables entre majuscules et minuscules ?

[Loulou 54]

Je crois que non... Que tu tapes X sto=> A ou sto=>a, tu obtiens a dans les deux cas...

[Bisam]

Tu as oublié le caractère µ qui a le mauvais goût d'être tout seul dans son coin à la 181ème place.
Par ailleurs, tu peux optimiser un peu ton code de cette façon :

Code: Select all

()
Prgm
Local ch,l,i,j

augment(augment(augment(seq(i,i,48,57),seq(i,i,97,122)),seq(i,i,128,148)),{181})-l
dim(l)-n

For i,11,n            @ le premier caractère ne peut pas être un chiffre
 char(l[i])-ch     @ il n'a pas besoin de recalculer à chaque fois ce caractère
 For j,1,n
   Delvar #(chchar(l[j]))
 EndFor
EndFor

EndPrgm


C'est tout de même normal qu'il rame un peu : tu lui fais effacer 48*58=2784 variables.

[MrNavet]

Code: Select all

For i,11,n            @ le premier caractère ne peut pas être un chiffre
 char(l[i])-ch    @ il n'a pas besoin de recalculer à chaque fois ce caractère

J'avais essayé de faire comme ça initialement, mais visiblement ça ne marche pas J'ai du faire une étape intermédiaire et tout assigner dans la variable t : #t fonctionne mais pas #(chchar(l[j])), ca me fait "indirection string is not a valide variable name" Etrange...

Tu as oublié le caractère µ qui a le mauvais goût d'être tout seul dans son coin à la 181ème place.

Bien vu, je l'avais pas vu le mu. Pareil pour effacer des chiffres, c'est un peu idiot en effet

[Bisam]

J'avais essayé de faire comme ça initialement, mais visiblement ça ne marche pas J'ai du faire une étape intermédiaire et tout assigner dans la variable t : #t fonctionne mais pas #(chchar(l[j])), ca me fait "indirection string is not a valide variable name" Etrange...

J'ai essayé et j'ai trouvé ce qui coince : c'est le caractère "pi". Il ne peut pas faire partie d'un nom de variable apparemment et est automatiquement interprêté comme le nombre "pi".

Je pense qu'il doit y avoir des problèmes aussi avec le "pi" majuscule et le "sigma" majuscule placés en début de mots...
Je vais faire d'autres tests.