#include <perms.h>

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

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

  //     2    %constinteger Max Lines = 20, Max Line Width = 80
  //     3    %byte %integer %array AA, BB (1:Max Lines*Max Line Width)

  unsigned char AA[20 * 80 - 1 + 1];
  struct _imp_dv AA_dv = {AA, sizeof(unsigned char) /*, dims, <bounds> */};

  unsigned char BB[20 * 80 - 1 + 1];
  struct _imp_dv BB_dv = {BB, sizeof(unsigned char) /*, dims, <bounds> */};

  //     4    %byte %integer %array     CC (1:Max Lines*Max Line Width)

  unsigned char CC[20 * 80 - 1 + 1];
  struct _imp_dv CC_dv = {CC, sizeof(unsigned char) /*, dims, <bounds> */};

  //     5  %endofprogram

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