equalities and strings completed

This commit is contained in:
Oli Clive-Griffin 2021-06-03 13:31:49 +12:00
parent a9c22921a5
commit be01d1d320
2 changed files with 34 additions and 34 deletions

View file

@ -3,37 +3,37 @@
(meditations (meditations
"We shall contemplate truth by testing reality, via equality" "We shall contemplate truth by testing reality, via equality"
(= __ true) (= true true)
"To understand reality, we must compare our expectations against reality" "To understand reality, we must compare our expectations against reality"
(= __ (+ 1 1)) (= 2 (+ 1 1))
"You can test equality of many things" "You can test equality of many things"
(= (+ 3 4) 7 (+ 2 __)) (= (+ 3 4) 7 (+ 2 5))
"Some things may appear different, but be the same" "Some things may appear different, but be the same"
(= __ (= 2 2/1)) (= true (= 2 2/1))
"You cannot generally float to heavens of integers" "You cannot generally float to heavens of integers"
(= __ (= 2 2.0)) (= false (= 2 2.0))
"But a looser equality is also possible" "But a looser equality is also possible"
(= __ (== 2.0 2)) (= true (== 2.0 2))
"Something is not equal to nothing" "Something is not equal to nothing"
(= __ (not (= 1 nil))) (= true (not (= 1 nil)))
"Strings, and keywords, and symbols: oh my!" "Strings, and keywords, and symbols: oh my!"
(= __ (= "hello" :hello 'hello)) (= (= "hello" :hello 'hello))
"Make a keyword with your keyboard" "Make a keyword with your keyboard"
(= :hello (keyword __)) (= :hello (keyword "hello"))
"Symbolism is all around us" "Symbolism is all around us"
(= 'hello (symbol __)) (= 'hello (symbol "hello"))
"What could be equivalent to nothing?" "What could be equivalent to nothing?"
(= __ nil) (= nil nil)
"When things cannot be equal, they must be different" "When things cannot be equal, they must be different"
(not= :fill-in-the-blank __)) (not= :fill-in-the-blank :asdf))

View file

@ -4,67 +4,67 @@
(meditations (meditations
"A string is nothing more than text surrounded by double quotes" "A string is nothing more than text surrounded by double quotes"
(= __ "hello") (= "hello" "hello")
"But double quotes are just magic on top of something deeper" "But double quotes are just magic on top of something deeper"
(= __ (str 'world)) (= "world" (str 'world))
"You can do more than create strings, you can put them together" "You can do more than create strings, you can put them together"
(= "Cool right?" (str __ __)) (= "Cool right?" (str "Cool" " right?"))
"You can even get certain characters" "You can even get certain characters"
(= \C (get "Characters" __)) (= \C (get "Characters" 0))
"Or even count the characters" "Or even count the characters"
(= __ (count "Hello World")) (= 11 (count "Hello World"))
"But strings and characters are not the same" "But strings and characters are not the same"
(= __ (= \c "c")) (= false (= \c "c"))
"What if you only wanted to get part of a string?" "What if you only wanted to get part of a string?"
(= "World" (subs "Hello World" __ __)) (= "World" (subs "Hello World" 6 11))
"How about joining together elements in a list?" "How about joining together elements in a list?"
(= __ (string/join '(1 2 3))) (= "123" (string/join '(1 2 3)))
"What if you wanted to separate them out?" "What if you wanted to separate them out?"
(= "1, 2, 3" (string/join __ '(1 2 3))) (= "1, 2, 3" (string/join ", " '(1 2 3)))
"Maybe you want to separate out all your lines" "Maybe you want to separate out all your lines"
(= [__ __ __] (string/split-lines "1\n2\n3")) (= ["1" "2" "3"] (string/split-lines "1\n2\n3"))
"You may want to make sure your words are backwards" "You may want to make sure your words are backwards"
(= __ (string/reverse "hello")) (= "olleh" (string/reverse "hello"))
"Maybe you want to find the index of the first occurrence of a substring" "Maybe you want to find the index of the first occurrence of a substring"
(= 0 (string/index-of "hello world" __)) (= 0 (string/index-of "hello world" "h"))
"Or maybe the last index of the same" "Or maybe the last index of the same"
(= __ (string/last-index-of "hello world, hello" "hello")) (= 13 (string/last-index-of "hello world, hello" "hello"))
"But when something doesn't exist, nothing is found" "But when something doesn't exist, nothing is found"
(= __ (string/index-of "hello world" "bob")) (= nil (string/index-of "hello world" "bob"))
"Sometimes you don't want whitespace cluttering the front and back" "Sometimes you don't want whitespace cluttering the front and back"
(= __ (string/trim " \nhello world \t \n")) (= "hello world" (string/trim " \nhello world \t \n"))
"You can check if something is a char" "You can check if something is a char"
(= __ (char? \c)) (= true (char? \c))
"But it may not be" "But it may not be"
(= __ (char? "a")) (= false (char? "a"))
"But chars aren't strings" "But chars aren't strings"
(= __ (string? \b)) (= false (string? \b))
"Strings are strings" "Strings are strings"
(= true (string? __)) (= true (string? "asdf"))
"Some strings may be blank" "Some strings may be blank"
(= __ (string/blank? "")) (= true (string/blank? ""))
"Even if at first glance they aren't" "Even if at first glance they aren't"
(= __ (string/blank? " \n \t ")) (= true (string/blank? " \n \t "))
"However, most strings aren't blank" "However, most strings aren't blank"
(= __ (string/blank? "hello?\nare you out there?"))) (= false (string/blank? "hello?\nare you out there?")))