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

classical crossover silent movie with glitch pop

June 2nd, 2024suno

Lyrics

' 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.

Recommended

Dark Frontier
Dark Frontier

Space rock, universe, uplifting, drum, rock, dark, synth, synthwave

世界杯之歌:荣耀战场
世界杯之歌:荣耀战场

electric bass and hard rockbeats quickly igniting atmosphere verse With passionate melody Bridge slows down slightly

All Night Long
All Night Long

gritty rock electric

Phantom of My Heart
Phantom of My Heart

lo-fi, Indie, calm

Vampire Love
Vampire Love

metal driving

Cat versus Titan
Cat versus Titan

Acapella funny

Cat's Fury
Cat's Fury

aggressive thrash metal

Moonlit Shadows
Moonlit Shadows

haunting dark wave gothic

Bound By A Hidden Groove
Bound By A Hidden Groove

melodic brostep, dream trance, eurotrance, nocturnal, passionate, female vocals

Kipling´s IF
Kipling´s IF

latin pop and tresillo rhytm. Flamenco guitar.

Shadows of Despair
Shadows of Despair

Rawphoric Hardstyle uptempo

Kings of the Highway
Kings of the Highway

Anthemic Trap Rock

Flower
Flower

hard rock, Singer Male, Up-tempo, rock, metal, heavy metal, bass, drum, guitar, drum and bass

Spáðu 2
Spáðu 2

experimental house

Night Lights (Extended Mix)
Night Lights (Extended Mix)

deep bouncy detroit house

shadows
shadows

Slow twerk, sultry, chopped and screwed, slow trap, heavy bass , Arab twerk, black female singer, 2024 soul, horn

Soft Whisper
Soft Whisper

dark, electro, seductive