#include <perms.h>

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

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

  //     2    %integer Low = 0

  int LOW;
  LOW = 0;

  //     3    %integerarray A, B, C(1:2, Low:4)

  int A[2][4 - LOW + 1];
  struct _imp_dv A_dv = {A, sizeof(int) /*, dims, <bounds> */};

  int B[4 - LOW + 1];
  struct _imp_dv B_dv = {B, sizeof(int) /*, dims, <bounds> */};

  int C[4 - LOW + 1];
  struct _imp_dv C_dv = {C, sizeof(int) /*, dims, <bounds> */};

  //     4  %endofprogram

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