`strtov'
--------

strtov(STR)
     :: STR ($@J8;zNs(J) $@$rITDj85$KJQ$($k(J.

RETURN
     $@ITDj85(J
STR
     $@ITDj85$H$7$FJQ492DG=$JJ8;zNs(J

   * $@ITDj85$H$7$FJQ492DG=$JJ8;zNs$rITDj85$KJQ$($k(J.
   * $@ITDj85$H$7$FJQ492DG=$JJ8;zNs$H$O(J, $@1Q>.J8;z$G;O$^$j(J, $@1Q;z(J, $@?t;z$*(J
     $@$h$S5-9f(J `_' $@$G:n$i$l$kJ8;zNs$G$"$k(J.
   * `rtostr()' $@$HAH9g$;$F(J, $@%W%m%0%i%`Cf$G<+F0E*$KITDj85$r@8@.$7$?$$;~(J
     $@$KMQ$$$i$l$k(J.

     [0] A="afo";
     afo
     [1] for (I=0;I<3;I++) {B=strtov(A+rtostr(I)); print([B,type(B)]);}
     [afo0,2]
     [afo1,2]
     [afo2,2]

$@;2>H(J
     `rtostr', `type', `uc'

