Les articles de Jean Debord

papydall a écrit:

Tu indiques que l’argument thêta appartient à l’intervalle   ]-pi,pi].
Je pense qu’il y a une erreur de frappe : c’est l’intervalle fermé [-pi,pi] et non semi-ouvert ]-pi,pi]

La fonction CArg telle qu'elle est programmée retourne une valeur de (-pi) pour un nombre réel négatif alors qu'elle devrait retourner pi (d'après la définition de la fonction atan2). Je vais corriger cela.

NB : pour les applications, voir la section "Exemples" dans l'article : elle vous propose de faire vous-même des programmes de tracé de fractales. Si vous n'y arrivez pas, les "corrigés" ont été publiés dans le forum du compilateur.

Voici la procédure CArg corrigée, avec quelques exemples. J'ai vérifié que les résultats sont les mêmes qu'avec la fonction atan2 de FreeBASIC.

Code:

dim Pi, PiDiv2, r_arg, ErrCode%

Pi = 4 * atn(1)
PiDiv2 = Pi / 2

CArg( 0,  0) : print r_arg  : ' 0
CArg( 1,  0) : print r_arg  : ' 0
CArg(-1,  0) : print r_arg  : ' 3.14159265358979 (Pi)
CArg( 0,  1) : print r_arg  : ' 1.5707963267949 (Pi/2)
CArg( 0, -1) : print r_arg  : ' -1.5707963267949 (-Pi/2)
CArg( 1,  1) : print r_arg  : ' 0.785398163397448 (Pi/4)
CArg(-1,  1) : print r_arg  : ' 2.35619449019234 (3*Pi/4)
CArg(-1, -1) : print r_arg  : ' -2.35619449019234 (-3*Pi/4)
CArg( 1, -1) : print r_arg  : ' -0.785398163397448 (-Pi/4)

end

sub CArg(a_x, a_y)
' Argument : r_arg = arg(a_x + i a_y)
' Resultat dans (-Pi, Pi]
' Equivaut a atan2(a_y, a_x)

 ErrCode% = 0
 
 if a_y = 0
   if a_x >= 0
     r_arg = 0
   else
     r_arg = Pi
   end_if    
 else
   if a_x = 0
     r_arg = sgn(a_y) * PiDiv2
   else
     ' 4e / 1er quadrant : -Pi/2..Pi/2
     r_arg = atn(a_y / a_x)
     if a_x < 0
       if a_y > 0
         ' 2e quadrant : Pi/2..Pi
         r_arg = r_arg + Pi
       else
         ' 3e quadrant : -Pi..-Pi/2
         r_arg = r_arg - Pi
       end_if
     end_if  
   end_if
 end_if
end_sub

Les résultats sont bien dans l'intervalle ]-pi, pi]. La valeur (-pi) n'est jamais retournée.

Si on tient à obtenir toujours un nombre positif pour l’argument d’un complexe, on ajoutera le test suivant :

Code:

IF r_arg < 0 then r_arg = r_arg + 2*pi

La valeur  retournée  sera dans [0,2pi[.

Mais est-ce nécessaire ?

Oui l'argument est défini modulo 2*Pi. C'est ce qui explique que certaines fonctions, comme le logarithme complexe, ont plusieurs valeurs.

NB : j'ai mis l'article à jour. J'ai ajouté dans l'introduction une note disant que l'on peut passer la partie théorique en première lecture.

Même en 2ème pour les non matheux ....

J'ai déposé dans le dossier "Articles en français / Articles à corriger" l'article numéro 9 sur les fractales.

Cet article traite des figures générées par la formule [c (z^p - z^q) - 1]^r dont quelques exemples ont déjà été présentés dans la section "Présentation et bavardage / Images fractales".

Cette formule provient du site www.fractalforums.com que je recommande vivement.

J'ai déposé l'article n° 10

Il traite de la fonction c[(z+k)^p + 1/(z+k)^q], déjà présentée dans la section des images fractales et également trouvée sur fractalforums.com

Merci Jean!

J'ai déposé dans les "Articles en Français / Articles à corriger" un nouvel article intitulé : "De PANORAMIC à FreeBASIC : le fonctionnement d'un compilateur".

Le compilateur PANORAMIC traduit le code en FreeBASIC mais le processus est opaque et on ne peut pas modifier le code généré, ce qui ne facilite pas la correction des bugs !

Pour rendre les choses plus claires, l'article propose d'effectuer la traduction manuellement en utilisant une bibliothèque externe pour les objets graphiques.

La méthode est démontrée avec un exemple très simple : un éditeur de texte rudimentaire. S'il y a un intérêt, on pourra présenter des exemples plus réalistes.

Avec mes meilleurs voeux pour l'année nouvelle !

J'ai lu l'article il est très intéressant et me donne envie de faire quelques commentaires:

1/ Oui, il y a clairement un intérêt

2/ Penses tu que la conversion manuelle effectuée puisse être automatisée ? (Pas évident, je pense à moins de demander une mise en forme données du code source d'origine ou une sacrée réflexion dans l'écriture du programme de conversion ...)
Si tu vois une solution, penses tu que tu pourrais en écrire un qui reprennent quelques unes des fonctions principales de Panoramic (je pense qu'il serait trop ambitieux et inexploitable pour un article de vouloir pouvoir traduire automatiquement toutes les commandes de Panoramic)

3/ Oui, je pense qu'un second article avec d'autres exemples et approfondissant le sujet me parait être une très bonne idée.

Merci Jean pour cet article

@ Jean Debord,

Je vais lire cet article avec beaucoup d' attention.
Rien que le nom de sujet appelle à d' autres articles.


@ Les auteurs

Je vous admire.
Certains doivent en être à plus de dix articles pour le mag
alors que je n' arrive toujours pas à structurer mon premier...

Si tu as une idée sympa Ygeronimi, lance-toi et partage ton "brouillon" et on t'aidera. L'un des trucs le plus dur à avoir c'est la bonne idée (Regarde cet enfoiré de JL35 qui nous sort tout le temps de petits bijoux de petits utilitaires bien pratiques par ce qu'il à plein d'idées ... sans parler de Klaus qui est hors catégorie ... )

Euh... l'enfoiré te salue bien... bonne année quand même !

Bonne année à toi et j'espère que tu trouveras encore pleins de bonnes idées pour me faire rager de ne pas les avoir eu moi même... et encore merci pour tout ces utilitaires bien pratiques.

Merci pour vos commentaires !

J'ai bien sûr envisagé de faire un traducteur automatique, comme Jack l'a fait pour son propre compilateur.

Mais comme l'explique très bien Jicehel, c'est un projet très ambitieux. C'est tout à l'honneur de Jack d'y être parvenu, même s'il y a encore des limitations.

Une solution serait de définir une variante du langage Panoramic en gardant la simplicité mais en sacrifiant certaines possibilités telles que la 3D et en modifiant un peu la syntaxe pour faciliter la traduction. En compensation on ajouterait quelques extensions qui sont déjà dans FreeBasic, notamment les fonctions, le passage par référence, l'accès aux bibliothèques etc.

Je ne me vois pas me lancer tout seul dans un tel projet, mais cela pourrait être un défi à relever pour la "communauté".

PS. Pour les articles à venir, pas de problème ! Je suis en train de travailler sur l'adaptation de mon programme Panomand

Jean, si je peu aider, je le ferais avec plaisir. Je pense en effet qu'il faut formaliser un peu le formatage surtout pour les début et faire un système où l'on puisse ajouter instructions par instructions dans un premier temps pour voir le projet évoluer.
Je ne sais pas si ça vaut le coup de se lancer à fond la dedans, mais au moins pour montrer le mécanisme, ce serait bien de faire quelques instructions. Après, vouloir tout faire, c'est quasiment reprogrammer un compilateur et c'et comme tu le dis énormément de boulot. Pas sûr que l'on en soit capable et que l'on en ait le temps ...

Merci, Jicehel

Serait-il possible de créer un nouveau forum dans la section des projets en commun ? je suppose que c'est Jack qui s'en charge ? Ce serait plus pratique pour discuter.

Je propose comme titre : "Projet n° 2 : Construisons un compilateur"

Je pense qu'il vaudrait mieux commencer par définir le langage source : ce que nous gardons de la syntaxe Panoramic et ce que nous ajoutons en provenance de FreeBasic, en essayant de conserver la simplicité qui fait la force de Panoramic.

Voici quelques idées d'ajouts éventuels :

- définition de constantes :

const Pi = 3.14159

- constantes binaires ou hexadécimales : &b1010, &hABCD

- variables initialisées :

dim i% = 10, x = 1.2, a$ = "oui"

- pour les SUBs : passage systématique des paramètres par référence et possibilité de passer des tableaux :

sub SP(i%, x, a$, p%(), q(), r$())

- transformation des appels de DLLs en appels de SUBs

- pour les objets graphiques, c'est la partie la plus complexe ! On pourrait s'inspirer des procédures KGF_OBJ de Klaus

Une fois qu'on s'est mis d'accord sur un type de syntaxe, on pourrait écrire le sous-programme qui traduirait l'instruction correspondante en FreeBASIC

Sans vouloir gêner votre réflexion intéressante, je me pose tout de même une question: Est-ce que c'est encore Panoramic ? Ou serait-ce un autre langage dérivé de Panoramic et agissant comme une enveloppe de FreeBasic ? Et dans ce cas, pourquoi ne pas passer directement à FreeBasic ou un de ses clones ?

Je ne veux heurter personne, et je n'ai peut-être pas tout compris de votre projet.

Je me pose les mêmes questions que toi Klaus.

C'est un langage intermédiaire entre Panoramic et FreeBASIC. Le but est d'associer la simplicité de Panoramic et la puissance de FreeBASIC. Pour cela on prend des éléments de chaque langage et on essaie de les associer de la manière la plus efficace possible.

Bien sûr on pourrait programmer directement en FreeBASIC, mais la syntaxe est beaucoup plus complexe. Donc l'idée c'est d'écrire le code dans un langage proche de Panoramic et de le traduire en FreeBASIC à l'aide d'un traducteur automatique.

Il ne s'agit en aucun cas de faire un clone de Panoramic (ni de FreeBasic d'ailleurs !)

J'ai fait quelques petites modifications à l'article soumis.

Principalement j'ai ajouté le numéro 1 pour montrer que c'est le premier article d'une série.

Le deuxième article présentera un début de "compilateur" pour un langage appelé FBPano (intermédiaire entre Panoramic et FreeBASIC). Cette version sera limitée aux fonctions non graphiques de Panoramic.

Le troisième article présentera les bibliothèques et les appels de DLL. Comme le compilateur doit fonctionner aussi bien sous Linux que sous Windows, il y a pas mal d'explications à donner.

Ensuite, on passera aux objets graphiques avec FLTK.

Ca promet d'être interessant  
Je testerais ça avec beaucoup d'intérets

@Jean_debord
Comme d’habitude, rien à dire ou plutôt MERCI, un bon et bel article.
J’attends la suite.

C'est clair merci Jean. Tes articles sont vraiment biens faits (et je suis plus facilement par rapport au niveau de maths du dernier )

Merci pour vos compliments

Le deuxième article est presque fini. Il reste encore un peu de travail à faire sur le programme de démonstration, mais le tout devrait pouvoir être soumis dès la parution du premier article.

Attention : pour tester le programme de démonstration, il faudra avoir installé FreeBASIC auparavant.