{ TYPE definitions for using EDWIN from Pascal }

     pointfm = record
                x, y : integer
              end;

     ptsarray = array [0..12] of pointfm;
     transfm = array [0..8] of real;