`strtov'
--------

strtov(STR)
     :: STR ($BJ8;zNs(B) $B$rITDj85$KJQ$($k(B.

RETURN
     $BITDj85(B

STR
     $BITDj85$H$7$FJQ492DG=$JJ8;zNs(B

   * $BITDj85$H$7$FJQ492DG=$JJ8;zNs$rITDj85$KJQ$($k(B.

   * $BITDj85$H$7$FJQ492DG=$JJ8;zNs$H$O(B, $B1Q>.J8;z$G;O$^$j(B, $B1Q;z(B,
     $B?t;z$*$h$S5-9f(B `_' $B$G:n$i$l$kJ8;zNs$G$"$k(B.

   * `rtostr()' $B$HAH9g$;$F(B, $B%W%m%0%i%`Cf$G<+F0E*$KITDj85$r@8@.$7$?$$;~$K(B
     $BMQ$$$i$l$k(B.

     [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]

$B;2>H(B
     *Note `rtostr': rtostr, *Note `type': type, *Note `uc': uc.

