#include <perms.h>

//          Edinburgh IMP77 Compiler - Version 8.4
//
//     1  %begin

int main(int argc, char **argv) { /*%begin*/
  _imp_initialise(argc, argv);

  //     2    %string (255) a, b

  _imp_string255 A;
  _imp_string255 B;

  //     3
  //     4    %if a < b %start

  if (_imp_strcmp((_imp_string *)/*?*/ &A, (_imp_string *)/*?*/ &B) >= 0) goto L_0001;

    //     5    %else %if a = b

  goto L_0002;
L_0001:;

  if (_imp_strcmp((_imp_string *)/*?*/ &A, (_imp_string *)/*?*/ &B) != 0) goto L_0003;

    //     6    %else %if a < "DEF"

  goto L_0002;
L_0003:;

  if (_imp_strcmp((_imp_string *)/*?*/ &A, (_imp_string *)/*?*/ _imp_str_literal_ptr("DEF")) >= 0) goto L_0004;

    //     7    %else %if a = "DEF"

  goto L_0002;
L_0004:;

  if (_imp_strcmp((_imp_string *)/*?*/ &A, (_imp_string *)/*?*/ _imp_str_literal_ptr("DEF")) != 0) goto L_0005;

    //     8    %else %if "GHI" > b

  goto L_0002;
L_0005:;

  if (_imp_strcmp((_imp_string *)/*?*/ _imp_str_literal_ptr("GHI"), (_imp_string *)/*?*/ &B) <= 0) goto L_0006;

    //     9    %finish

L_0006:;
L_0002:;

//    10
//    11  %endofprogram

  _imp_stop(0);
  return 0;
end_0:;
}