#include <perms.h>
int _imp_mainep(int _imp_argc, char **_imp_argv) {
  _imp_enter();
  _imp_string S24 = _imp_str_literal("123");
  _imp_string S32 = _imp_str_literal("56789ABCD");
  _imp_string S4 = _imp_str_literal("123");
  _imp_string S8 = _imp_str_literal("6789AB");
  int W;
  int X;
  int Y;
  int Z;
  auto void RUNTEST(_imp_string S24, _imp_string S32, _imp_string S4,
                    _imp_string S8) {
    _imp_enter();
    _imp_string S;
    _imp_string A;
    _imp_string B;
    _imp_string C;
    NEWLINE(); /*ERROR: name_sym_idx is -1!*/       /*C_NAME*/
    W = MISSING_RHS; /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    Y = MISSING_RHS;
    PRINTSTRING(_imp_str_literal("Initial                  : A "));
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    SPACES(W - ());
    PRINTSTRING(_imp_str_literal(" B "));
    NEWLINE(); /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    PRINTSTRING(_imp_join(_imp_str_literal("  String Size            : "), ));
        /*ERROR: name_sym_idx is -1!*/             /*C_NAME*/
        /*ERROR: name_sym_idx is -1!*/             /*C_NAME*/
    SPACES(W - ()); /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    PRINTSTRING();
    NEWLINE(); /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    PRINTSTRING(_imp_join(_imp_str_literal("  Max String Length      : "), ));
        /*ERROR: name_sym_idx is -1!*/             /*C_NAME*/
        /*ERROR: name_sym_idx is -1!*/             /*C_NAME*/
    SPACES(W - ()); /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    PRINTSTRING();
    NEWLINE(); /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
        /*ERROR: name_sym_idx is -1!*/        /*C_NAME*/
    PRINTSTRING(_imp_join(_imp_str_literal("  Current String Length  : "), ));
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/ /*ERROR: name_sym_idx is -1!*/
        /*C_NAME*/ /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    SPACES(W - ()); /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
        /*ERROR: name_sym_idx is -1!*/             /*C_NAME*/
    PRINTSTRING();
    NEWLINE();
    PRINTSTRING(
        _imp_join(_imp_str_literal("                         : "), S24));
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    SPACES(() - ());
    PRINTSTRING(S32);
    NEWLINE();
    S24 = _imp_join(S24, S32);
    PRINTSTRING(_imp_str_literal(" strcat a = a.b          : "));
    NEWLINE();
    PRINTSTRING(
        _imp_join(_imp_str_literal("                         : "), S24));
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    SPACES(() - ());
    PRINTSTRING(S32);
    NEWLINE();
    S32 = S24;
    PRINTSTRING(_imp_str_literal(" strcpy b = a            : "));
    NEWLINE();
    PRINTSTRING(
        _imp_join(_imp_str_literal("                         : "), S24));
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    SPACES(() - ());
    PRINTSTRING(S32);
    NEWLINE();
    PRINTSTRING(
        _imp_join(_imp_str_literal("Comparing                : "), S24));
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    SPACES(W - ());
    PRINTSTRING(S32);
    NEWLINE();
    if (S24 == S32) {
      PRINTSTRING(_imp_str_literal("Comparing a = b is TRUE"));
    }
    if (S24 != S32) {
      PRINTSTRING(_imp_str_literal("Comparing a # b is TRUE"));
    }
    if (S24 > S32) {
      PRINTSTRING(_imp_str_literal("Comparing a > b is TRUE"));
    }
    if (S24 < S32) {
      PRINTSTRING(_imp_str_literal("Comparing a < b is TRUE"));
    }
    NEWLINES(2);
    PRINTSTRING(_imp_str_literal("Initial                  : A "));
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    SPACES(() - ());
    PRINTSTRING(_imp_str_literal(" B "));
    NEWLINE();
    PRINTSTRING(_imp_join(_imp_str_literal("                         : "), S4));
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    SPACES(() - ());
    PRINTSTRING(S8);
    NEWLINE();
    S4 = S8;
    PRINTSTRING(_imp_join(_imp_str_literal("After strjam a <- b      : "), S4));
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    SPACES(() - ());
    PRINTSTRING(S8);
    NEWLINE();
    S8 = _imp_join(S8, S4);
    PRINTSTRING(_imp_join(_imp_str_literal("After strjcat b <- b + a : "), S4));
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    SPACES(() - ());
    PRINTSTRING(S8);
    NEWLINE();
    PRINTSTRING(_imp_join(_imp_str_literal("Comparing                : "), S4));
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
        /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/
    SPACES(() - ());
    PRINTSTRING(S8);
    NEWLINE();
    if (S4 == S8) {
      PRINTSTRING(_imp_str_literal("Comparing a = b is TRUE"));
    }
    if (S4 != S8) {
      PRINTSTRING(_imp_str_literal("Comparing a # b is TRUE"));
    }
    if (S4 > S8) {
      PRINTSTRING(_imp_str_literal("Comparing a > b is TRUE"));
    }
    if (S4 < S8) {
      PRINTSTRING(_imp_str_literal("Comparing a < b is TRUE"));
    }
    NEWLINES(2);
    PRINTSTRING(
        _imp_str_literal("*************************************************"));
    NEWLINES(2);
    S = _imp_str_literal("61239AB");
    B = _imp_str_literal("123");
    if (!_imp_cond_resolve(S, A, B, C)) _imp_signal(7, 0, 0);
    PRINTSTRING(_imp_join(
        _imp_str_literal(" String resolution '"),
        _imp_join(
            S,
            _imp_join(
                _imp_str_literal("' -> A.('"),
                _imp_join(
                    B,
                    _imp_join(
                        _imp_str_literal("').C gives '"),
                        _imp_join(
                            A, _imp_join(
                                   _imp_str_literal("'('"),
                                   _imp_join(
                                       B, _imp_join(
                                              _imp_str_literal("')'"),
                                              _imp_join(C, _imp_str_literal(
                                                               "'"))))))))))));
    NEWLINES(2);
    _imp_leave();
  }
  /*ERROR: name_sym_idx is -1!*/ /*C_NAME*/;
  PRINTSTRING(_imp_str_literal("Load a value for s24"));
  NEWLINE();
  READ(S24);
  RUNTEST(S24, S32, S4, S8);
  _imp_leave();
  exit(0);
  return (0);
}