Courbe en S

Une courbe en S.
Ça peut servir des fois.
Sait-on jamais !

Code:: rem ============================================================================
rem Courbe S
rem ============================================================================
picture 10 : full_space 10 : 2d_target_is 10
Courbe_S(300,220,0.6,0.6,2.8,1,2,1.6) : pause 2000 : cls
Courbe_S(300,220,0.3,0.6,0.3,1,2,0.6) : pause 2000 : cls
Courbe_S(300,220,0.6,1.0,2.0,1,1,1.6) : pause 2000 : cls
Courbe_S(300,220,0.8,1.0,1.6,1,1,1.0) : pause 2000 : cls
Courbe_S(300,220,0.6,0.6,0.6,2,2,0.8) : pause 2000 : cls
Courbe_S(300,220,0.8,1.0,1.8,1,1,0.4)

end
rem ============================================================================
SUB Courbe_S(xc,yc,a,b,c,k,p,q)
   dim_local x,y,t,dt,r
   dt = pi/180 : r = 100
   for t = 0-pi to pi step dt
   x = a*((exp(p*t)-1)/(exp(p*t)+1))-c*t*exp(0-q*t*t)*cos(k*t*t)
   y = b*((exp(p*t)-1)/(exp(p*t)+1))+c*t*exp(0-q*t*t)*sin(k*t*t)
   if t = 0-pi
   2d_poly_from xc-r*x,yc+r*y
   else
   2d_poly_to xc-r*x,yc+r*y
   end_if
   display
   next t
END_SUB
rem ============================================================================

Oui, ça peut servir à dessiner des volutes pour fer forgé.
Il y a quelque année, ça m'aurait été très utile quand j'ai construit une pergola.

Bravo pour les Maths, c'est ardu...

A+

Bon, tu peux l’utiliser comme esse pour suspendre tes morceaux de viandes préférés.
Tu peux aussi l’utiliser pour calculer une intégrale, mais là on s'approche du domaine des gros mots ! tongue

Des gros mots, il y en a plein ton code: x = a*((exp(p*t)-1)/(exp(p*t)+1))-c*t*exp(0-q*t*t)*cos(k*t*t)

Y faut quand même l'écrire ça ! drunken

et en plus ça fait des jolies courbes.

J'a' trouvé une page pleine de gros mots qui vont certainement t'intéresser => https://fr.wikipedia.org/wiki/Int%C3%A9grale_de_Gauss

A+

Je connais cette musique.
Nnnon, non pas la musique, je veux dire ces intégrales (de Gauss et de son élève Riemann, de Lebesgue, de Bertrand, etc.) qui, durant des années (quand j'étais âgé du tiers de l'âge que j'ai aujourd'hui), m’ont donné beaucoup de plaisir en me torturant la cervelle! I love you

Paydall a écrit:: ...m’ont donné beaucoup de plaisir en me torturant la cervelle!

En voilà une révélation Papydall, je ne te pensais pas adepte du SM...
lol!

Ça se passait à peu près à la même époque où tu étais né. Embarassed

Depuis, j’ai bien changé. tongue

Mais enfin, Papydall, tu m'as l'air d'être un matheux drôlement cultivé ! On dirait que tu es sorti d'une grande école comme Harvard, ou bien le M.I.T. ou bien Eton. Tu mérites bien le diplôme et le titre de "Docteur Honoris Causa", ou, pourquoi pas, le prestigieux "Prix Nobel de Mathématiques" pour avoir largement et remarquablement servi comme programmes dans Panoramic ! Je le dis peut-être par jalousie, non ? lol!

Parpaiun

Si tu consultes mon profil, tu remarqueras que je suis « Passionné des mathématiques et j’adore les fractales »

Citation :: On dirait que tu es sorti d'une grande école comme Harvard, ou bien le M.I.T. ou bien Eton.

Je suis sorti de l’Ecole de l’Aviation Civile et de la Météorologie de El Aouina –Tunis (Tunisie) où j’ai étudié la Météorologie qui embrasse une multitude des sciences et particulièrement la physique et les mathématiques.

Me retrouvant retraité, j’essaye de raviver mes connaissances en maths faute de savoir faire autre chose.
Pour le "Prix Nobel de Mathématiques" qui n’existe d’ailleurs pas (allez savoir pourquoi Monsieur Nobel n’a pas jugé bon de mentionner la science mathématique comme « nobélisable » !!!), je le reçois toutes les fois où je résous la moindre petite question que je me pose et ça me comble de bonheur!

» Une nouvelle courbe
» La courbe des larmes
» numérique : Courbe de Bézier
» Défi2 = les moindres carrés
» dessiner une chouette courbe colorée