#include <perms.h>
int _imp_mainep(int _imp_argc, char **_imp_argv) {
  static int Fail = 0;
  int I;
  int Fact(int N, int Mult) {
    if (N <= 1) return (Mult);
    return (Fact(N - 1, Mult * N));
  }
  void Compare(int I, int J) {
    if (I != J) {
      Printstring(_imp_str_literal("ERROR"));
      Write(I, 5);
      Write(J, 5);
      Fail = 1;
      Newline();
    }
  }
  for (I = 2; I <= 100; I++) Compare(Fact(I, 1), I * Fact(I - 1, 1));
  if (!Fail) Printstring(_imp_str_literal("TEST OK"));
  exit(0);
  return (1);
}
