1 {#
   2 
   3 FOO
   4  1 2 3 4
   5 
   6 ROI
   7   1000 1500
   8   1800 1900
   9   2000 2200
  10 
  11 BAR
  12   2 3 5
  13   2 4 6
  14 
  15 &}
  16 program equrs;
  17 uses mtx09;
  18 var a:mtx;
  19 begin
  20   tra;
  21   equ(a,'1,2');
  22   equ(a,'1 2 3');
  23   equ(a,'1 2 3; 4 5 6; 7 8 9;');
  24   equ(a,'');
  25   equ(a,'./equrs.pas,ROI')
  26 end.
  27 {
  28 # equ [1,2]
  29 1   2
  30 
  31 # equ [1,3]
  32 1   2   3
  33 
  34 # equ [3,3]
  35 1   2   3
  36 4   5   6
  37 7   8   9
  38 
  39 # equ [0,0]
  40 
  41 # mrd [3,2]
  42 ROI
  43 1000   1500
  44 1800   1900
  45 2000   2200
  46 
  47 # equ:./equrs.pas,ROI [3,2]
  48 ROI
  49 1000   1500
  50 1800   1900
  51 2000   2200
  52 
  53 }