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.
推荐歌曲
I'm Okay
Slow, melancholy, male vocals, minimal house, sad, micropop, synthwave, Bedroom Pop, Acoustic Pop, High Definition
Durt Monsta
Beatnik punk robot dubstep slinky dank chill hop funk prog slacker 6-note-bounce
En cada paso,
country Gospel
Shining Heart
K-Pop, Female Idol Group (Upbeat)
House of Whispers
dark autotune 2-step, horror trap
I love my Cuontry
pop rock, pop, hip hop, punk
알스가 글렌 어렴 시절 무슨 잘못이라도 했나요?
Future funk, House, Future bass, Hypnagogic pop, minor chord progression, drum and bass, J-pop
Toxic Goodbye
Bounce drop, electric guitar, metal, high notes, cinematic, orchestral, powerful
Звёзды в небесах
акцент на акустической гитаре мелодичный поп
Espansão de dominio
Electro Pop, Pop, Pop Rock
Wonderbaer
15th century music
Dreamwoman v2
rnb, rap, hip hop
Suomalainen polkka
Suomalainen polkka, Harmonikka
Echoes in the Dark
bass-heavy industrial dark techno
Bluetooth Boogie Walnut
banjo fast anthemic rock melodic country
Wat soll dat?
industrial, männliche raue Stimme, metal, drum and bass, Chor, rap, guitar, drum, tar, pop
Vsauce
Lofi
Тень Вовина Сада
male vocalist,folk,indie folk,singer-songwriter,contemporary folk,melodic,melancholic,chamber folk