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

(CharacterLength=
  length
. vap$((=.!arg).!arg):? [?length&!length
);