#include <perms.h>

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

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

  //     2    %routine do it

  void DOIT(void) {
    //     3    %end

    return;
  } /* end of DOIT */

  //     4    %integer a,b

  int A;
  int B;

  //     5    do it %if %not a = b

  if (A == B) goto L_0001;
  DOIT();
L_0001:;

//     6    %comment do it %if %not a = b
//     7    do it %unless %not a = b

  if (A != B) goto L_0002;
  DOIT();
L_0002:;

//     8    %comment do it %unless %not a = b
//     9    %if %not a = b %then do it

  if (A == B) goto L_0003;
  DOIT();
L_0003:;

//    10    %comment %if %not a = b %then do it
//    11    %unless %not a = b %then do it

  if (A != B) goto L_0004;
  DOIT();
L_0004:;

//    12    %comment %unless %not a = b %then do it
//    13  %endofprogram

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