1STRING-FETCHNONSTRINGERRORNONINTEGERERRORINDXSTRING-STORENONCHARACTERERRORSETINDXSTRING-LENGTHSIZEADD1STRING-UPPER-BOUNDSTRING-EMPTY?EQNPUTENTRYEXPR1$ 61V+ +61v+1V+  ++>>x 61V+ +61v+1V+  +61v+1V+  ++>>>x61V+ +,+>x61V+ ++>x6#1V+! #+,O@+>x@@ 0 0,Z&	 0 /,Z& 0 /,Z& 0 .,Z& 0 .+xxxxxx*"A*"DQ *QE(q*
E"QW`