String case: Difference between revisions
m
→{{header|K}}
m (→{{header|K}}) |
m (→{{header|K}}) |
||
Line 2,002:
=={{header|K}}==
{{works with|Kona}}
<syntaxhighlight lang="k">▼
<syntaxhighlight lang="k"> s:"alphaBETA"
upper:{i:_ic x; :[96<i; _ci i-32;_ci i]}'
lower:{i:_ic x; :[91>i; _ci i+32;_ci i]}' / for reference
lower:_: / built in▼
upper s
"ALPHABETA"
Line 2,013 ⟶ 2,012:
</syntaxhighlight>
lower: {`c$x+32*(x>"@")*x<"["}
upper "This is a test."
| |||