Zamknięta sinusoida na okręgu

Wyrażenie całkowitej liczby długości fali, która odpowiada danej orbicie kołowej nie jest skomplikowane. Poniżej pokazuję procedurę, która realizuje to zagadnienie:

'VBA Excel

Sub sinoncircle()

Pi = 3.1415

pi2 = 2 * Pi

i = 1     'numer wiersza

a = 10    'liczba ramion

b = 1 / a 'odwrotność - warunek "gwiazdowania"

 For teta = 0 To pi2 Step 0.01

   r = 1 + b * Sin(a * teta)

   x = r * Cos(teta)

   y = r * Sin(teta)

   Cells(i, 1) = x

   Cells(i, 2) = y

   i = i + 1

 Next teta

End Sub

'powyższa procedura oblicza

'trajektorię drgającego punktu na okręgu

'w płaszczyźnie tego okręgu

Wynikiem działania tego programu i wyświetlenia wyników wykres (Excel) zamieszczony poniżej:

Wynik ten obrazuje mniemanie, że elektron krążąc np. po pierwszej orbicie Bohra może wykonywać ruch drgający.