dedekind flower (remix v6, visual basic 1.0) ft. godel

classical crossover silent movie with glitch pop

June 2nd, 2024suno

가사

' Define a structure to hold the Dedekind cuts Type DedekindCut L() As Double R() As Double End Type ' Initialize Dedekind cuts between 11 and 13 Sub Main() Dim cuts(3) As DedekindCut ' First cut: Simple representation ReDim cuts(0).L(1) cuts(0).L(0) = 11 cuts(0).L(1) = 12 ' Second cut: More detailed representation ReDim cuts(1).L(0) cuts(1).L(0) = 11 ReDim cuts(1).R(0) cuts(1).R(0) = 12 ' Third cut: Intermediate values ReDim cuts(2).L(10) cuts(2).L(0) = 11 cuts(2).L(1) = 11.1 cuts(2).L(2) = 11.2 cuts(2).L(3) = 11.3 cuts(2).L(4) = 11.4 cuts(2).L(5) = 11.5 cuts(2).L(6) = 11.6 cuts(2).L(7) = 11.7 cuts(2).L(8) = 11.8 cuts(2).L(9) = 11.9 cuts(2).L(10) = 12 ReDim cuts(2).R(9) cuts(2).R(6) = 12.7 cuts(2).R(7) = 12.8 cuts(2).R(8) = 12.9 cuts(2).R(9) = 13 ' Fourth cut: Finer cuts ReDim cuts(3).L(13) cuts(3).L(0) = 11 cuts(3).L(1) = 11.1 cuts(3).L(2) = 11.2 ReDim cuts(3).R(15) cuts(3).R(0) = 12 cuts(3).R(1) = 12.01 ' Fifth cut: Detailed around specific values Dim specificCut As DedekindCut ReDim specificCut.L(5) specificCut.L(0) = 11 ' Define a structure to hold the Dedekind cuts Type DedekindCut L() As Double R() As Double End Type ' Initialize Dedekind cuts between 11 and 13 Sub Main() Dim cuts(3) As DedekindCut ' First cut: Simple representation ReDim cuts(0).L(1) cuts(0).L(0) = 11 cuts(0).L(1) = 12 ' Second cut: More detailed representation ReDim cuts(1).L(0) cuts(1).L(0) = 11 ReDim cuts(1).R(0) cuts(1).R(0) = 12 ' Third cut: Intermediate values ReDim cuts(2).L(10) cuts(2).L(0) = 11 cuts(2).L(1) = 11.1 cuts(2).L(2) = 11.2 cuts(2).L(3) = 11.3 cuts(2).L(4) = 11.4 cuts(2).L(5) = 11.5 cuts(2).L(6) = 11.6 cuts(2).L(7) = 11.7 cuts(2).L(8) = 11.8 cuts(2).L(9) = 11.9 cuts(2).L(10) = 12 ReDim cuts(2).R(9) cuts(2).R(6) = 12.7 cuts(2).R(7) = 12.8 cuts(2).R(8) = 12.9 cuts(2).R(9) = 13 ' Fourth cut: Finer cuts ReDim cuts(3).L(13) cuts(3).L(0) = 11 cuts(3).L(1) = 11.1 cuts(3).L(2) = 11.2 ReDim cuts(3).R(15) cuts(3).R(0) = 12 cuts(3).R(1) = 12.01 ' Fifth cut: Detailed around specific values Dim specificCut As DedekindCut ReDim specificCut.L(5) specificCut.L(0) = 11 ' Define a structure to hold the Dedekind cuts Type DedekindCut L() As Double R() As Double End Type ' Initialize Dedekind cuts between 11 and 13 Sub Main() Dim cuts(3) As DedekindCut ' First cut: Simple representation ReDim cuts(0).L(1) cuts(0).L(0) = 11 cuts(0).L(1) = 12 ' Second cut: More detailed representation ReDim cuts(1).L(0) cuts(1).L(0) = 11 ReDim cuts(1).R(0) cuts(1).R(0) = 12 ' Third cut: Intermediate values ReDim cuts(2).L(10) cuts(2).L(0) = 11 cuts(2).L(1) = 11.1 cuts(2).L(2) = 11.2 cuts(2).L(3) = 11.3 cuts(2).L(4) = 11.4 cuts(2).L(5) = 11.5 cuts(2).L(6) = 11.6 cuts(2).L(7) = 11.7 cuts(2).L(8) = 11.8 cuts(2).L(9) = 11.9 cuts(2).L(10) = 12 ReDim cuts(2).R(9) cuts(2).R(6) = 12.7 cuts(2).R(7) = 12.8 cuts(2).R(8) = 12.9 cuts(2).R(9) = 13 ' Fourth cut: Finer cuts ReDim cuts(3).L(13) cuts(3).L(0) = 11 cuts(3).L(1) = 11.1 cuts(3).L(2) = 11.2 ReDim cuts(3).R(15) cuts(3).R(0) = 12 cuts(3).R(1) = 12.01 ' Fifth cut: Detailed around specific values Dim specificCut As DedekindCut ReDim specificCut.L(5) specificCut.L(0) = 11 ' Define a structure to hold the Dedekind cuts Type DedekindCut L() As Double R() As Double End Type ' Initialize Dedekind cuts between 11 and 13 Sub Main() Dim cuts(3) As DedekindCut ' First cut: Simple representation ReDim cuts(0).L(1) cuts(0).L(0) = 11 cuts(0).L(1) = 12 ' Second cut: More detailed representation ReDim cuts(1).L(0) cuts(1).L(0) = 11 ReDim cuts(1).R(0) cuts(1).R(0) = 12 ' Third cut: Intermediate values ReDim cuts(2).L(10) cuts(2).L(0) = 11 cuts(2).L(1) = 11.1 cuts(2).L(2) = 11.2 cuts(2).L(3) = 11.3 cuts(2).L(4) = 11.4 cuts(2).L(5) = 11.5 cuts(2).L(6) = 11.6 cuts(2).L(7) = 11.7 cuts(2).L(8) = 11.8 cuts(2).L(9) = 11.9 cuts(2).L(10) = 12 ReDim cuts(2).R(9) cuts(2).R(6) = 12.7 cuts(2).R(7) = 12.8 cuts(2).R(8) = 12.9 cuts(2).R(9) = 13 ' Fourth cut: Finer cuts ReDim cuts(3).L(13) cuts(3).L(0) = 11 cuts(3).L(1) = 11.1 cuts(3).L(2) = 11.2 ReDim cuts(3).R(15) cuts(3).R(0) = 12 cuts(3).R(1) = 12.01 ' Fifth cut: Detailed around specific values Dim specificCut As DedekindCut ReDim specificCut.L(5) specificCut.L(0) = 11 ' un un un un unstructured to hold the Dedekind cuts Type DedekindCut L() As Double R() As Double End Type Dim specificCut As DedekindCut ReDim specificCut.L(5) specificCut.L(0) = 11 d e d e k i n d d e. d. e. k. i. n. d. kind dede.

추천

Golden Nights
Golden Nights

70s, catchy melodies, pop, disco rhythms, Retro, Female singer, cheesy,

You Know You Want to Be
You Know You Want to Be

EBM, goth, industrial

Descend Into Darkness
Descend Into Darkness

Vocal Symphonic heavy metal, Wicked Guitar Riff Intro, Catchy, Metal Violin Solo in the middle

Rainy Day Glow
Rainy Day Glow

bedroom pop chill romantic

Slow Flow Time
Slow Flow Time

laid-back dance pop groovy

Bahaaaaaaaa
Bahaaaaaaaa

Mariachi

Raven's Wrath
Raven's Wrath

aggressive intense death metal

City Sweat
City Sweat

funky punk rock

Цыганские Народные Песни
Цыганские Народные Песни

female vocalist,rock,pop rock,melodic,passionate,sad,power pop,anthemic,choir,rock ballad,traditional,russian folk music,traditional folk

Brotherhood of Gamers
Brotherhood of Gamers

anthemic electric rock

ชีวิตเปี่ยมด้วยฝัน
ชีวิตเปี่ยมด้วยฝัน

ลูกทุ่ง จังหวะสามช่า สนุก ให้กำลังใจ

Saint Terrance
Saint Terrance

atmospheric indie rock, female lead

123 vai
123 vai
123 vai 123 vai

aleatorio

People are strange
People are strange

'80s dark trance New Wave alternative rock

under the starry sky
under the starry sky

pop, pop internacional

Solar Celebration
Solar Celebration

electronic,electronic dance music,house,progressive house,electro house,party,energetic,melodic,futuristic,repetitive,eclectic,epic,atmospheric

Ranger's Rage
Ranger's Rage

adventure metal, ambient violins, breakdown