#include <perms.h>
int _imp_mainep(int _imp_argc, char **_imp_argv) {
  _imp_enter();
  int CHAR;
  int NUMBER;
  _imp_string TEXT;
  PRINTSYMBOL('P');
  PRINTSYMBOL('a');
  PRINTSYMBOL('s');
  PRINTSYMBOL('S'); /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
  PRINTSYMBOL();
  PRINTSYMBOL(80);
  PRINTSYMBOL(97);
  PRINTSYMBOL(115);
  PRINTSYMBOL(83); /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
  PRINTSYMBOL();
  PRINTSTRING(_imp_str_literal("P"));
  PRINTSTRING(_imp_str_literal(""));
  PRINTSTRING(_imp_str_literal("asS\n"));
  PRINTSTRING(_imp_str_literal("The THREE above lines must be identical."));
  NEWLINE();
  PRINTSTRING(
      _imp_str_literal("The Quick Brown \"Fox\" Jumped Over The Lazy Dog."));
  NEWLINE();
  PRINTSTRING(_imp_str_literal("The next two lines must be identical."));
  NEWLINE();
  CHAR = 'P';
  TEXT = _imp_str_literal("P   A   S   S");
  PRINTSTRING(TEXT);
  NEWLINE();
  PRINTSYMBOL(CHAR);
  PRINTSTRING(_imp_str_literal("   "));
  SPACES(0);
  PRINTSYMBOL('A');
  SPACES(2);
  PRINTSTRING(_imp_str_literal(" S"));
  SPACE();
  SPACE();
  SPACE();
  PRINTSYMBOL('S');
  NEWLINE();
  NEWLINES(3);
  PRINTSTRING(_imp_str_literal(
      "This line is seperated from the above by THREE blank lines."));
  NEWLINES(2);
  PRINTSTRING(_imp_str_literal("Each of the following SIX lines must match."));
  NEWLINE();
  NUMBER = 123456;
  PRINTSTRING(_imp_str_literal("     123456"));
  NEWLINE();
  WRITE(123456, 10);
  NEWLINE();
  WRITE(NUMBER, 10);
  NEWLINE();
  SPACES(4);
  WRITE(123456, 1);
  NEWLINE();
  SPACES(5);
  WRITE(123456, -1);
  NEWLINE();
  SPACES(5);
  WRITE(123456, 0);
  NEWLINES(2);
  PRINTSTRING(_imp_str_literal("Each of the following SIX lines must match."));
  NEWLINE();
  NUMBER = -123456;
  PRINTSTRING(_imp_str_literal("    -123456"));
  NEWLINE();
  WRITE(-123456, 10);
  NEWLINE();
  WRITE(NUMBER, 10);
  NEWLINE();
  SPACES(4);
  WRITE(-123456, 1);
  NEWLINE();
  SPACES(4);
  WRITE(-123456, -1);
  NEWLINE();
  SPACES(4);
  WRITE(-123456, 0);
  NEWLINES(2);
  PRINTSTRING(_imp_str_literal("Opening THREE Files on different streams."));
  NEWLINE();
  OPENOUTPUT(1, _imp_str_literal("$One"));
  OPENOUTPUT(2, _imp_str_literal("$Two"));
  OPENOUTPUT(3, _imp_str_literal("$Three"));
  SELECTOUTPUT(1);
  PRINTSTRING(_imp_str_literal("This is file ONE"));
  NEWLINE();
  CLOSEOUTPUT();
  SELECTOUTPUT(2);
  PRINTSTRING(_imp_str_literal("This is file TWO"));
  NEWLINE();
  CLOSEOUTPUT();
  SELECTOUTPUT(3);
  PRINTSTRING(_imp_str_literal("This is file THREE"));
  NEWLINE();
  CLOSEOUTPUT();
  SELECTOUTPUT(0);
  PRINTSTRING(
      _imp_str_literal("Each file has been written to and then closed."));
  NEWLINES(2);
  _imp_leave();
  exit(0);
  return (0);
}
