dreaming helene
dead mouse
source de mon program en pascal
highlander
evidemment les images seraient mieux en gif ou bmp plutot qu'en super high jpg compression... tanpis.
une fractale(ou un fractale?) est un objet presentant la meme structure quelque soit l'echelle d'observation nous voila bien avance... bref c'est des maths, mais on peut tout de meme dire qu'une feuille, qu'un flocon de neige que les poumons ont une structure fractale
application: compression de donne et decompression temp reel; electrode a structure fractale pour augmenter la surface de contact ect..
une simple double boucle suffit pour calculer la couleur au point M(a,b): en utilisant deux suites: (Un) et (Vn) tel que U0=V0=0 . on laisse tourner la boucle:
UnČ-VnČ+a=>Un+1 2*Un*Vn+b=>Vn+1
jusqu'a ce que UnČ+VnČ soit superieur a 4 ou que n ait atteint une valeur suffisante (disons 67 pour un 486) plus pour un pentium 200mhz moins pour une CASIO9900GC et encore moins pour une HP48 (n=20 max)
on affiche la couleur UnČ+VnČ en M (c'est une possibilite on peut aussi afficher n)
voici les sources du program et des unites, il n'y a qu'a changer *.txt par *.pas et compiler
soursime est une unite souris pratique et reutilisable ; t256 est une unite graphique dans le meme cas fondimag presente aussi un algorithme de compression simple pour image a faible couleur(donc pas pour fractal!) il decoupe l'image en carre de meme couleur pour en savoir plus: cf contact en bas de la page go to contact
tapez ceci directement dans un prog libre:
Range -2,.5,0,-1,1,0:-2->I: .03125->P: .01953->Q: Lbl 1:I+P->I:-1->J: Lbl 2:J+Q->J:0->U~V:20->W: Lbl A: U->T:UČ-VČ+I->U: 2TV+J->V:UČ+VČ->S: S>=4=>Goto B:Dsz W: Goto A:Lbl B:V=0=>Isz V:Frac (Int (S*7)/2)#0=>Goto C: Plot I,J:Plot I,-J:Lbl C: J<0=>Goto 2:I<2=>Goto 1
# correspond au = barre; -> a la fleche simple; => a la double fleche; >= a superieur ou egal
vous pouvez m'envoyer un mail envoyer un courrier maintenant