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.
추천
Get Back
Grunge, Alternative, Deep male voice, Atmosphere, Underground, Slow, Minor Key
Miranda Lost Connection
1984, boogie, rock, SYNTH WAVE, CHILL COW BELL FEMALE VOICE
Coffee Shop
uplift funky synthwave
Vengo de lejos, cuando vuelvo… Rap son pop cubano
rap cubano, coros voces mixtas, hot latin
Embrace Enchantment
Electronic Dance Ballad
Jodi naat likhte likhte
Islamic Nasheed Islamic music Islamic halal music
Çanakkale
depressive rock
OL Drømmen
female voice, pop, electro, rap, alternative pop
Vines and Echoes
pop melodic ethereal
Ночной Город
электронный мелодичный поп
Eternal Blooms
Lo-Fi Hip-Hop, Chillhop, Nostalgic, Warm, Acoustic Guitar, Piano, Synth-Pads, Drum-Beat, Vinyl-Crackles
that one
folk 70 rb soul old school motown, funk latin groove, bounce
Perseverar
rock, metal, hard rock
Glowing
synth-driven pop
Waiting for you
slow sad trance, warm and dark male vocals,
Society's Chains
hiphop rhythmic raw
Spring Pulse Korean
ambient house p-funk
زنگ تفریح
پاپ، شاد، کودکانه