#include <perms.h>
static int Stoi1(_imp_string *Snum) {
  int I;
  int Inum;
  if ('0' > *Charno(*Snum, 1) || *Charno(*Snum, 1) > '9') return (-1);
  I = 1;
  Inum = 0;
  while ('0' <= *Charno(*Snum, I) && *Charno(*Snum, I) <= '9') {
    Inum = Inum * 10 + *Charno(*Snum, I) - '0';
    I++;
    if (I > *Length(*Snum)) break;
  }
  if (I >= *Length(*Snum))
    *Snum = _imp_str_literal("");
  else
    *Snum = Substring(*Snum, I, *Length(*Snum));
  return (Inum);
}
static int Stoi2(_imp_string *Snum) {
  int I;
  int Inum;
  if ('0' > *Charno(*Snum, 1) || *Charno(*Snum, 1) > '9') return (-1);
  I = 1;
  Inum = 0;
  while ('0' <= *Charno(*Snum, I) && *Charno(*Snum, I) <= '9') {
    Inum = Inum * 10 + *Charno(*Snum, I) - '0';
    I++;
    if (I > *Length(*Snum)) break;
  }
  if (I >= *Length(*Snum))
    *Snum = _imp_str_literal("");
  else
    *Snum = Substring(*Snum, I, *Length(*Snum));
  return (Inum);
}