#include <perms.h>

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

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

  //     2    %integer a,b,c

  int A;
  int B;
  int C;

  //     3
  //     4    a = 123

  A = 123;

  //     5    b = 234

  B = 234;

  //     6    c = 345

  C = 345;

  //     7
  //     8    a = +123

  A = 123;

  //     9    a = -123

  A = -123;

  //    10    a = ~123

  A = (~123);

  //    11
  //    12  ! a = b+c
  //    13  ! a = b-c
  //    14    a = b*c

  A = B * C;

  //    15  ! a = b//c
  //    16
  //    17  ! a = b^^c
  //    18
  //    19  ! a = b<<c
  //    20  ! a = b>>c
  //    21
  //    22    a = b!c

  A = B | C;

  //    23    a = b!!c

  A = B ^ C;

  //    24    a = |b|

  A = _imp_IMOD(B);

  //    25
  //    26  ! a = b&c
  //    27
  //    28    a = b %if a = b

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

//    29    a = b %if a # b

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

//    30    a = b %if a > b

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

//    31    a = b %if a < b

  if (A >= B) goto L_0004;
  A = B;
L_0004:;

//    32    a = b %if a <= b

  if (A > B) goto L_0005;
  A = B;
L_0005:;

//    33    a = b %if a >= b

  if (A < B) goto L_0006;
  A = B;
L_0006:;

//    34
//    35  %endofprogram

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