on master help sign in
Merge pull request #617 from cxk280/master
5fd30d5rmariani
reference/library/4b.md+19−25
@@ -185,7 +185,8 @@ XX document
185
185
186To lowercase
186To lowercase
187
187
188−Produce the case insensitive (all lowercase) `++cord` of a `++tape`.
188+Turn all occurences of uppercase letters in any `++tape` into lowercase
189+letters. Returns a `++tape`.
189
190
190#### Accepts
191#### Accepts
191
192
@@ -193,31 +194,28 @@ Produce the case insensitive (all lowercase) `++cord` of a `++tape`.
193
194
194#### Produces
195#### Produces
195
196
196−A `++cord`.
197+A `++tape`.
197
198
198#### Source
199#### Source
199
200
200```
201```
201 ++ cass :: lowercase
202 ++ cass :: lowercase
202 |= vib/tape
203 |= vib/tape
203− %+ rap 3
204+ ^- tape
204 (turn vib |=(a/@ ?.(&((gte a 'A') (lte a 'Z')) a (add 32 a))))
205 (turn vib |=(a/@ ?.(&((gte a 'A') (lte a 'Z')) a (add 32 a))))
205```
206```
206
207
207#### Examples
208#### Examples
208
209
209```
210```
210− > (cass "john doe")
211+ > (cass "JOHN DOE")
211− 7.309.170.810.699.673.450
212−
213− > `cord`(cass "john doe")
212+ "john doe"
214− 'john doe'
215
213
216− > (cass "abc, 123, !@#")
214+ > (cass "abc ABC 123 !@#")
217− 2.792.832.775.110.938.439.066.079.945.313
215+ "abc abc 123 !@#"
218
216
219− > `cord`(cass "abc, 123, !@#")
217+ > (cass "AaBbCcDdEeFfGgHhIiJjKkLlMmNnOoPpQqRrSsQqRrVvWwXxYyZz")
220− 'abc, 123, !@#'
218+ "aabbccddeeffgghhiijjkkllmmnnooppqqrrssqqrrvvwwxxyyzz"
221```
219```
222
220
223---
221---
@@ -259,8 +257,8 @@ A `++cord`.
259
257
260To uppercase
258To uppercase
261
259
262−Turn all occurances of lowercase letters in any `++tape` into uppercase
260+Turn all occurences of lowercase letters in any `++tape` into uppercase
263−letters, as a `++cord`.
261+letters. Returns a `++tape`.
264
262
265#### Accepts
263#### Accepts
266
264
@@ -268,32 +266,28 @@ letters, as a `++cord`.
268
266
269#### Produces
267#### Produces
270
268
271−A `++cord`.
269+A `++tape`.
272
270
273#### Source
271#### Source
274
272
275```
273```
276 ++ cuss :: uppercase
274 ++ cuss :: uppercase
277− |= vib=tape
275+ |= vib/tape
278− ^- @t
276+ ^- tape
279− %+ rap 3
280− (turn vib |=(a=@ ?.(&((gte a 'a') (lte a 'z')) a (sub a 32))))
277+ (turn vib |=(a/@ ?.(&((gte a 'a') (lte a 'z')) a (sub a 32))))
281```
278```
282
279
283#### Examples
280#### Examples
284
281
285```
282```
286 > (cuss "john doe")
283 > (cuss "john doe")
287− 'JOHN DOE'
284+ "JOHN DOE"
288
285
289 > (cuss "abc ABC 123 !@#")
286 > (cuss "abc ABC 123 !@#")
290− 'ABC ABC 123 !@#'
287+ "ABC ABC 123 !@#"
291−
292− > `@ud`(cuss "abc")
293− 4.407.873
294
288
295 > (cuss "AaBbCcDdEeFfGgHhIiJjKkLlMmNnOoPpQqRrSsQqRrVvWwXxYyZz")
289 > (cuss "AaBbCcDdEeFfGgHhIiJjKkLlMmNnOoPpQqRrSsQqRrVvWwXxYyZz")
296− 'AABBCCDDEEFFGGHHIIJJKKLLMMNNOOPPQQRRSSQQRRVVWWXXYYZZ'
290+ "AABBCCDDEEFFGGHHIIJJKKLLMMNNOOPPQQRRSSQQRRVVWWXXYYZZ"
297```
291```
298
292
299---
293---