#include <perms.h>
static int Firstpos(_imp_string *S, int K) {
  int I;
  Printstring(*S);
  Printsymbol(':');
  Printsymbol(K);
  Newline();
  for (I = 1; I <= *Length(*S); I++)
    if (*Charno(*S, I) == K) return (I);
  return (0);
}
int _imp_mainep(int _imp_argc, char **_imp_argv) {
  _imp_string S = _imp_str_literal("12345.67");
  if (!Firstpos(S, '.')) {
    Printstring(_imp_str_literal("Bnag"));
    Newline();
  }
  exit(0);
  return (1);
}
