Data commit

Task/String-length/Bracmat/string-length-1.bracmat

@@ -0,0 +1,7 @@
+(ByteLength=
+  length
+.   @(!arg:? [?length)
+  & !length
+);
+
+out$ByteLength$𝔘𝔫𝔦𝔠𝔬𝔡𝔢

Task/String-length/Bracmat/string-length-2.bracmat

@@ -0,0 +1,16 @@
+(CharacterLength=
+  length c
+.     0:?length
+    & @( !arg
+       :   ?
+           ( %?c
+           & utf$!c:?k
+           & 1+!length:?length
+           & ~
+           )
+           ?
+       )
+  | !length
+);
+
+out$CharacterLength$𝔘𝔫𝔦𝔠𝔬𝔡𝔢

Task/String-length/Bracmat/string-length-3.bracmat

@@ -0,0 +1,14 @@
+(CharacterLength=
+  length c p
+.     0:?length:?p
+    & @( !arg
+       :   ?
+           ( [!p %?c
+           & utf$!c:?k
+           & 1+!length:?length
+           )
+           ([?p&~)
+           ?
+       )
+  | !length
+);

Task/String-length/Bracmat/string-length-4.bracmat

@@ -0,0 +1,4 @@
+(CharacterLength=
+  length
+. vap$((=.!arg).!arg):? [?length&!length
+);