1 {
   2 #! /bin/bash
   3 echo '
   4 1 2 3
   5 4 5 6
   6 
   7 10
   8 20
   9 
  10 A
  11 10 20 30
  12 
  13 ' | ./mrd_r0
  14 exit 0
  15 }
  16 program mrd_r0;
  17 uses mtx09;
  18 var r:mtx;
  19 begin
  20   while mrd(r) do mwr(r)
  21 end.
  22 {
  23 1   2   3
  24 4   5   6
  25 
  26 10
  27 20
  28 
  29 A
  30 10   20   30
  31 
  32 }